DECLARE INTEGER GetFocus IN WIN32API lnHandle = GetFocus() param1 = 274 param2 = 0xF012 DECLARE INTEGER ReleaseCapture IN WIN32API DECLARE INTEGER SendMessage IN WIN32API INTEGER, INTEGER, INTEGER, INTEGER bb=ReleaseCapture() bb=SendMessage(lnHandle, param1, param2,0)Now you should be able to move the form dragging it by the body.