Jak przesuwać formę jeżeli BorderStyle bsNone
Musisz pierw zadeklarować dwie zmienne globanle:
var
MD : Boolean;
P : TPoint;
Teraz wygeneruj procedury: OnMouseDown, OnMouseMove, OnMouseUp. Procedury te powinny wyglądać tak:
procedure TForm1.FormMouseDown(S