Home » Tipps & Tricks » Komponenten » TForm » Fenster auch im Client-Bereich verschieben
Fenster auch im Client-Bereich verschieben
Kennst Du nicht auch den Special-Effekt bei WinAMP, das Fenster überall verschoben werden kann und nicht nur an der Titelleiste? Mit dieser Windows-Message kannst Du das auch.Diese Procedure musst Du im Private-Abschnitt deklarieren:
procedure WMNCHitTest(var M: TWMNCHitTest); message wm_NCHitTest;
Und hier die eigentliche Implementation der Procedure:
procedure TForm1.WMNCHitTest (var M: TWMNCHitTest); begin inherited; if M.Result = htClient then M.Result := htCaption; end;
htClient gibt an, dass Du dich im normalen Bereich Deiner Anwendung befindest, also nicht die Titelleiste bewegst.Mit htCaption wird die Titelleiste angesprochen und diese soll emuliert werden.