Programm verschieben...

[PigfaceJoe]

Hi!
Ich machs immer mit einem Timer, der das Intervall 1 hat und Anfangs enabled:= false gesetzt ist. Dann ziehe ich irgendeine Komponente mit der ich das Prog verschieben will aufs Forumular und schreibe ins OnMouseDown ereignis von der Kompo timer1.enabled:=true; und entsprechend ins OnMouseUp ereignis dann Timer1.enabled:=false;

Hier der Code im OnTimer ereignis vom Timer:

Delphi-Quellcode:

form1.Top:=mouse.CursorPos.Y;
form1.left:=mouse.CursorPos.x;

So mache ich das immer, ich lasse mich aber gerne einer besseren Methode belehren!

Gruss
PigfaceJoe

//Edit: Alles klar, die obige Methode ist besser