Hilfe - Fenster mit Maus verschieben?

[Matze]

Ins OnMouseDown:

Delphi-Quellcode:

begin
  if (Button = mbLeft) then
  begin
    Application.ProcessMessages;
    ReleaseCapture;
    Perform(WM_SYSCommand, $F012, 0);
  end;