[DELPHi] Form überall verschieben!?...

Huhu... ich wollte die Form überall verschieben was ich auch hinbekomme^^

Code:

---

procedure TForm1.MouseDown
  (Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer) ;
begin
  ReleaseCapture;
  SendMessage(Form1.Handle, WM_SYSCOMMAND, 61458, 0) ;
end;

---

mein problem ist nur, das fenster sich beim verschieben nicht aktualisiert sondern das fenster die position erst einnimmt wenn man die maus wieder loslässt...

sprich ich will das das fenster sozusagen über den bildschirm zu ziehen ist und die ganze zeit auf jeder position wo ich mich mit der maus befinde das fenster zu sehen ist ^^

komisch .... bei mir gehts problemlos :shock:

ich habs aber bisher nur mit anderen controls probiert, nicht mit der form selbst, aber das sollte doch eig kein prob sein

was hast du denn für ne delphi version? vllt liegts daran, ich verwende das bds 2006 architect (lad dir doch die trial und such dir nen crack)

edit: außerdem musst du nicht extra form1.handle schreiben, es reicht wenn du einfach handle schreibst. es sei denn du hast es in einer anderen form ;)

hab delphi 7 ^^

hm ich werds morgen mal versuchen :) danke schonmal...