DO decl 
*| typedef struct _WINDOWPLACEMENT { 
*|     UINT  length;               0 : 4  
*|     UINT  flags;                4 : 4  
*|     UINT  showCmd;              8 : 4  
*|     POINT ptMinPosition;       12 : 8  
*|     POINT ptMaxPosition;       20 : 8  
*|     RECT  rcNormalPosition;    28 : 16  
*| } WINDOWPLACEMENT; total bytes =  44  bytes 
#DEFINE WINDOWPLACEMENT_SIZE   44  

LOCAL hWindow, lcBuffer, lnShowCmd 
hWindow = GetDesktopWindow() 

lcBuffer = Chr(WINDOWPLACEMENT_SIZE) +; 
    Repli(Chr( 0 ), WINDOWPLACEMENT_SIZE- 1 ) 

= GetWindowPlacement (hWindow, @lcBuffer) 
? "Minimized window flags:", buf2dword(SUBSTR(lcBuffer,  5 , 4 )) 

* for the Windows Desktop it is usually SW_SHOWNORMAL =  1  
? "Window show state:", buf2dword(SUBSTR(lcBuffer,  9 , 4 )) 

? "Minimized position upper-left:", buf2dword(SUBSTR(lcBuffer,  13 , 4 )),; 
    buf2dword(SUBSTR(lcBuffer,  17 , 4 )) 

? "Maximized position upper-left:", buf2dword(SUBSTR(lcBuffer,  21 , 4 )),; 
    buf2dword(SUBSTR(lcBuffer,  25 , 4 )) 

* one more way to obtain display resolution for your system 
? "Restored position rectangle:", buf2dword(SUBSTR(lcBuffer,  29 , 4 )),; 
    buf2dword(SUBSTR(lcBuffer,  33 , 4 )), buf2dword(SUBSTR(lcBuffer,  37 , 4 )),; 
    buf2dword(SUBSTR(lcBuffer,  41 , 4 )) 

FUNCTION  buf2dword (lcBuffer) 
#DEFINE MAX_DWORD 0xffffffff 
#DEFINE MAX_LONG 0x7FFFFFFF 
    LOCAL lnResult 
    lnResult = Asc(SUBSTR(lcBuffer,  1 , 1 )) + ; 
        Asc(SUBSTR(lcBuffer,  2 , 1 )) *  256  +; 
        Asc(SUBSTR(lcBuffer,  3 , 1 )) *  65536  +; 
        Asc(SUBSTR(lcBuffer,  4 , 1 )) *  16777216  
RETURN Iif(lnResult>MAX_LONG, lnResult-MAX_DWORD, lnResult) 

PROCEDURE decl 
    DECLARE INTEGER GetDesktopWindow IN user32 

    DECLARE INTEGER GetWindowPlacement IN user32; 
        INTEGER hWnd, STRING @lpwndpl