Place an image on the form, respond to the mousedown event.
Void __fastcall tform1 :: image1mousedown (TOBJECT * SENDER,
TMOUSEBUTTON button, TshiftState Shift, Int X, Int Y)
{
Releasecapture ();
Perform (WM_SYSCOMMAND, 0xF012, 0);
}