IF nButton = 1 AND oApp.EasyMove *!* Obtin handle-ul ferestrei pe care am facut click, dar numai in cazul *!* in care utilizatorul si-a activat aceasta facilitate. DECLARE INTEGER GetFocus IN WIN32API lnHandle = GetFocus() param1 = 274 param2 = -4078 DECLARE INTEGER ReleaseCapture IN WIN32API DECLARE INTEGER SendMessage IN WIN32API INTEGER, INTEGER, INTEGER, INTEGER bb=ReleaseCapture() bb=SendMessage(lnHandle, param1, param2,0) ENDIFThis code enables an "easy-move" feature for forms. If oApp.EasyMove is .T., then the form can be moved by clicking anywhere on the form's body.