Form ohne Titelleiste resizen

[iaby]

hallo zusammen,

mein problem ist folgendes:
ich habe eine form ohne titelleiste(bsNone) und über die komplette form eine TImage komponente gelegt. Nun will ich das ganze resizen, ich weiss aber net wie ich das machen soll.
ausserdem soll man die form noch verschieben können. dazu gibt es ja auch anleitungen, aber das funktioniert auf einem image nicht! nur wenn man direkt auf die form klickt, aber die liegt bei mir ja komplett unter dem image!

weiss jemand rat?

gruss,
iaby

[Stanlay Hanks]

Hallo.
Geht FormX.Resize nicht?
Zu dem anderen: Du könntest ins OnMouseMove des Forms was schreiben.
Vielleicht was in der Richtung: Form1.Left := Mouse.CursorPos.X oder so.
Ich hab das jetzt nicht probiert, müsste aber theoretisch hinhauen.

[Daniel B]

Aber Er kann das Formular doch nicht greifen, sondern nur das Image

[Aya]

Hi,

er kann doch einfach das OnMouseMove Event vom Image benutzen:

Delphi-Quellcode:

var
  Form1: TForm1;
  Move=true: boolean;
  mx, my: Integer;

implementation

{$R *.dfm}

procedure TForm1.ImageMouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  Move=true:=true;
  mx:=x;
  my:=y;
end;

procedure TForm1.ImageMouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  Move=true:=false;
end;

procedure TForm1.ImageMouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
  if Move=true then begin
    Form1.Top:=Mouse.CursorPos.Y-my;
    Form1.Left:=Mouse.CursorPos.X-mx;
  end;
end;

Für das Resize im grunde genauso.. nur halt mit Width/Height des Forms verändern.

Au'revoir,
Aya~

[Stanlay Hanks]

[Edit] Ahh, jetzt is mir aufgefallen, was daniel meint. ich hab statt Onlick des IMAGES, onlick des FORMS geschrieben. Danke für die Korrektur [/Edit]Genauso hatte ich das mit Bewegen des Forms gemeint. Aber vielleicht hab ich mich auch unklar/undeutlich/falsch/missverständlich ausgedrückt (sorry :oops:).

Aber ich glaube, ich hab nicht ganz verstanden, was mit dem Resize gemeint war. Ich glaub, ich hab da was missinterpretiert...kann mir wer erklähren, was genau gemacht werden soll?

Man liest sich, Stanlay :hi:

PS: Was ist der DP Blast?

[DP @ Home]

Zitat:

Zitat von Stanlay Hanks

PS: Was ist der DP Blast?

Lass Dich überraschen ;-)

:witch:

[Stanlay Hanks]

[OT - Tut mir leid, ehrlich] Hat das was mit diesem neuen Wurm zu tun? Naja. ich glaub, wenn schon der Hausgeist schreibt ( :cat: ), dann kann ich keine normale Antwort erwarten... Ich werd besser nicht mehr nachfragen, sonst wird der Thread noch wegen offTopic geschlossen, was ich nicht will.

Man liest sich, Stanlay :hi:

[/OffTopic]

[iaby]

ich musste es noch leicht umwandeln, aber jetzt funktioniert es perfekt!
vielen Dank!!!

gruss,
iaby