Синтаксис

ReleaseCapture()


Описание

Функция устанавливает обычный режим обработки сообщений. Вызывается для отмены действий функции SetCapture().


Пример

// позволяет перемещать в окне мышкой объект "bar"

HANDLE HSpace,hobj

FLOAT _disable

FLOAT xPos,yPos,msg


if (hobj == #0)

 hobj := GetObject2dByNameGetObject2dByName (~HSpace,#0,"bar")

 RegisterObjectRegisterObject (~HSpace,~hobj,"",WM_ALLMOUSEMESSAGE,1 | 256)

 _disable:=1

endif


if (msg)

 if (msg==WM_LBUTTONDOWN)

  SetCaptureSetCapture (HSpace,"",0)

  button := 1

 endif


 if (msg==WM_MOUSEMOVE && button)

  rez:=SetObjectOrg2dSetObjectOrg2d (HSpace,hobj,xPos,yPos)

 endif


 if (msg==WM_LBUTTONUP)

  button := 0 

  ReleaseCapture()

 endif

endif


см. Механизм сообщенийMessage_theorethic

Created with the Personal Edition of HelpNDoc: Free PDF documentation generator