int GetWindowRgnBox(
    HWND hWnd, // handle to window
    LPRECT lprc   // rectangle
);
 

 
DECLARE INTEGER GetWindowRgnBox IN user32;
    INTEGER hWindow,;
    STRING @lprc
 

 
LOCAL cBuffer
cBuffer = REPLICATE(CHR(0),16)
= GetWindowRgnBox(application.HWnd, @cBuffer)
 
* region returned
? "left:", buf2dword(SUBSTR(m.cBuffer,1,4))
? "top:", buf2dword(SUBSTR(m.cBuffer,5,4))
? "right:", buf2dword(SUBSTR(m.cBuffer,9,4))
? "bottom:", buf2dword(SUBSTR(m.cBuffer,13,4))