Delphi-Quellcode:
var
hand: HWND;
WndRect,ClntRect:TRect;
begin
hand := FindWindow('
notepad',
nil);
if handle <> 0
then
begin
GetWindowRect(hand,WndRect);
Windows.GetClientRect(hand,ClntRect);
Showmessage(Format('
Window Top: %d Left: %d Right: %d Bottom %d'#13#10
+'
Client Top: %d Left: %d Right: %d Bottom %d'#13#10
,[WndRect.Top,WndRect.Left,WndRect.Right,WndRect.Bottom
, ClntRect.Top,ClntRect.Left,ClntRect.Right,ClntRect.Bottom]));
end;
end;
Danke für den Code.
Ich hab aber leider noch eine Frage:
Mit dem oberen Code kann ich die sichtbare Größe des externen Fensters auslesen.
Wenn aber das Fenster Scrollbars hat, dann ist ja die sichtbare Größe kleiner als die maximale Größe des Fensters.
Wie kann ich denn die komplette (maximale) Größe des externen Fensters auslesen?
mfg
Helmi
>> Theorie ist Wissen, dass nicht funktioniert - Praxis ist, wenn alles funktioniert und keiner weiss warum! <<