Title: Move components on a form
Question: How can I move components on a form?
Answer:
{ moves misc. components on a form, e.g. TButton, TLabel, etc.
put the call in the components OnMouseDown-Eventhandler;
Example: MoveObject(Sender, X, Y);
uses
Windows, Messages;
procedure MoveObject(Sender: TObject; X, Y: Integer);
const
SC_DragMove = $F012;
begin
ReleaseCapture;
(Sender as TControl).Perform(WM_SysCommand, SC_DragMove, 0);
end;