This article shows how to move controls at runtime.
It is quite simple, in the OnMouseDown event of the control add this code.
ReleaseCapture;
(Sender as TWinControl).Perform(.WM_SYSCOMMAND, $F012, 0);
Note: The control must descend from TWinControl for this to work