See the simplest control to drag FORM with non-Form

http://blog.codelphi.com/nil/articles/1483.aspx

See the simplest control to drag FORM with non-Form

As long as

Add in onMouseDown event

Releasecapture;

(Sender as tcontrol). Wener as tform) .Perform (WM_SYSCOMMAND, $ F012, 0);