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.

$Revision: 1.9 $ $Date: 2003/07/16 00:34:42 $[go to top]