sample_282.md

Home

Setting the mouse capture to the specified window

Before you begin:

See also:

• How to Move a Form not using its Titlebar or Caption

---

Code:

DO declare

* testing the capture
? GetCapture()

* setting the mouse capture to the window with the keyboard focus
? SetCapture(GetFocus())

* testing the capture
? GetCapture()  && returns a window handle

= ReleaseCapture()

PROCEDURE declare
	DECLARE INTEGER SetCapture IN user32 INTEGER hWindow
	DECLARE INTEGER GetCapture IN user32
	DECLARE INTEGER ReleaseCapture IN user32

	DECLARE INTEGER GetActiveWindow IN user32
	DECLARE INTEGER GetFocus IN user32  

---

Listed functions:

GetActiveWindow
GetCapture
GetFocus
ReleaseCapture
SetCapture