Von Sven Schmidts am 25 Oktober, 1997 um 20:07:26:
Antwort auf: Profan 5.0 - Fentergröße von Gerhard E. am 21 Oktober, 1997 um 23:49:37:
def GetWindowRect(2) !"USER32","GetWindowRect"
Declare TRect#,Text#
Folgendermassen muß es gehen (anstatt %HWND nur das Handle des Zielfensters eingeben) :
"
CLS
Dim TRect#,16
GetWindowRect(%HWnd,TRect#)
print "Größe des Fenster-Client:"
print "AnfangX:";long(TRect#,0)
print "AnfangY:";long(TRect#,4)
print "Breite: ";long(TRect#,8)
print "Höhe: ";long(TRect#,12)
Dispose TRect#
"
Sven