Dann solltest Du die MouseDown Nachricht abfangen
Delphi-Quellcode:
procedure WMNcLButtonDown(var msg: TWMNcLButtonDown); message WM_NCLBUTTONDOWN;
procedure TForm1.WMNcLButtonDown(var msg: TWMNcLButtonDown);
begin
if msg.HitTest = htCaption then msg.HitTest := htClient;
inherited;
end;
Hab ich jetzt aber nicht getestet