GETPOS

Use this routine to find the current position of the active window.

$50=$formtitle

perform "_getpos"

if ($status < 0) done

; x (left) = $51

; y (top) = $52

; width = $53

; height = $54

Please note that the width and height values can easily be inaccurate due to title bars and scroll bars interfering with the calculations.

Notes:

This function is only available under Win32 platforms (ie: Windows 95/98/ME and NT/2000).

The result in $52 varies between Uniface Six and Seven, by a value of one, ie: a value of top=3 in Uniface Six will return an (incorrect) value of top=2 in Uniface Seven.