FiveTech Software tech support forums

Hello, in which way i become the screen-coordinates from the actual focused control?

Try with ClientToScreen Function

Cristobal, ok, but from where i become the actual focused control??

Günther,

You can use :

@ 185, 810 GET oGet[1] VAR nAge SIZE 30, 22 PICTURE "99" PIXEL UPDATE
oGet[1]:bLClicked := {|| aSize := GET_SIZE( oGet[1] ), ;
MsgAlert( "Top : " + ALLTRIM(STR(aSize[1])) + CRLF + ; // only for test
"Left : " + ALLTRIM(STR(aSize[2])) + CRLF + ;
"Width : " + ALLTRIM(STR(aSize[3])) + CRLF + ;
"Height : " + ALLTRIM(STR(aSize[4])), "Size" ) }

// ------------

STATIC FUNCTION GET_SIZE( oObject )
LOCAL aCors[4]

aCors[1] := oObject:nTop
aCors[2] := oObject:nLeft
aCors[3] := oObject:nWidth
aCors[4] := oObject:nHeight

RETURN aCors

regards
Uwe

Hello, Uwe! The problem for me is to determine automatically the actual focused object. Then i can use your function for the coordinats.

hWnd := GetFocus()

Günther,

have a look at this test :

viewtopic.php?f=3&t=36956

regards
Uwe