Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi ClientHeight, ClientWidth, Top und Left eines externen Fensters ermitteln (https://www.delphipraxis.net/174403-clientheight-clientwidth-top-und-left-eines-externen-fensters-ermitteln.html)

Helmi 27. Apr 2013 12:25

AW: ClientHeight, ClientWidth, Top und Left eines externen Fensters ermitteln
 
Zitat:

Zitat von Bummi (Beitrag 1212260)
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?

Helmi 5. Mai 2013 09:54

AW: ClientHeight, ClientWidth, Top und Left eines externen Fensters ermitteln
 
*ganz nach oben häng*

CTest 17. Mai 2013 10:32

AW: ClientHeight, ClientWidth, Top und Left eines externen Fensters ermitteln
 
GetScrollRange

Helmi 18. Mai 2013 11:26

AW: ClientHeight, ClientWidth, Top und Left eines externen Fensters ermitteln
 
Danke!

Aber mein Problem besteht weiter - das Fenster wird sichtlich nicht gescrollt
auch ein neuzeichnen bringt nichts


Alle Zeitangaben in WEZ +1. Es ist jetzt 07:43 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz