Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Status von fenster herausfinden ? (https://www.delphipraxis.net/75248-status-von-fenster-herausfinden.html)

dbdeath74 16. Aug 2006 15:14


Status von fenster herausfinden ?
 
Hallo,

ich hab ein kleines Problem, und die Suche bringt mich irgendwie nicht weiter :(
Naja wahrscheinlich suche ich nach dem falschen *g

Ich habe ein kleines Programm welches unter anderem eine externe Applikation startet und dann wartet bis das Anmeldefenster der Applikation da ist, dann beendet es sich. (Die externe Anwendung brauch 20-30s je nach Netz beim Startup ...)

Mit
Delphi-Quellcode:
wnd := FindWindow(nil, PCHAR('Anmelden'));
  If wnd <> 0 then
    Application.Terminate
  else
    TxtAusgabe.Caption := 'evITA startet, bitte warten...';
in einem timer finde ich problemlos heraus ob das fenster "Anmelden" existiert, das Problem ist leider das externe Programm erzeugt dieses Fenster sofort, aber zeigt das Fenster erst nach 20-30s an ...

Wie kann ich herausfinden ob ein Fenster visible ist, oder im Vordergrund, oder den Focus hat oder sowas?

Über einen kleinen Tip wäre ich sehr dankbar :)

Gruß Oliver

shmia 16. Aug 2006 15:23

Re: Status von fenster herausfinden ?
 
Zitat:

Zitat von dbdeath74
Wie kann ich herausfinden ob ein Fenster visible ist, oder im Vordergrund, oder den Focus hat oder sowas?

Delphi-Quellcode:
IsWindowsVisible(windowhandle); // Unit windows

RavenIV 16. Aug 2006 15:31

Re: Status von fenster herausfinden ?
 
Zitat:

Zitat von shmia
Delphi-Quellcode:
IsWindowsVisible(windowhandle); // Unit windows

Da hat sich wohl der Fehlerteufel eingeschlichen (das s soll da nicht hin)
Delphi-Quellcode:
IsWindowVisible(windowhandle); // Unit windows

dbdeath74 16. Aug 2006 15:40

Re: Status von fenster herausfinden ?
 
hehe jo hab mich auch gewundert warum meine windows unit das nicht kennt :)
das mit dem s hab ich dann aber noch selbst rausgefunden :p

vielen dank für den tip, geht jetzt einwandfrei

Gruß Oliver


Alle Zeitangaben in WEZ +1. Es ist jetzt 13:27 Uhr.

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