Thema: Delphi Drag&Drop ohne boarder?

Einzelnen Beitrag anzeigen

s-off
(Gast)

n/a Beiträge
 
#2

Re: Drag&Drop ohne boarder?

  Alt 25. Sep 2007, 13:16
Hallo,

meinst Du, wie Du eine Form verschieben kannst, ohne die Caption zu nutzen?

Falls ja:
Delphi-Quellcode:
Procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
Begin
   ReleaseCapture;
   Form1.Perform(WM_SYSCOMMAND, $F012, 0);
End;
  Mit Zitat antworten Zitat