Hi Markus,
I have VFP version 6.0
I have the following code in the Moved event of my form.
----------
local nTop, nLeft, nBottom, nRight, lcTmpFormCaption, nhWnd
STORE 0 TO nTop, nLeft, nBottom, nRight
* Get the window handle of the form
lcTmpFormCaption=thisform.caption
thisform.caption="Move--"+thisform.caption
nhWnd = _WhTohWnd(_WFindTitl(thisform.caption))
thisform.caption=lcTmpFormCaption
= _GetWRect(nhWnd, @nTop, @nLeft, @nBottom, @nRight)
messagebox("the top is "+str(nTop))
------
The messagebox is only for the test. When I click on the title bar
of my form to move it, and at the first pixel moved without release
the mouse button, the messagebox of the Moved event appears.