Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Externes Programm in Vordergrund (https://www.delphipraxis.net/138316-externes-programm-vordergrund.html)

aaaaaaaaaa_10 7. Aug 2009 11:09


Externes Programm in Vordergrund
 
Ich teste, ob ein externes Programm geöffnet ist. Aber wie bringe ich das dann in den Vordergrund?

patti 7. Aug 2009 11:33

Re: Externes Programm in Vordergrund
 
Wenn du das Handle des Fensters hast, dann mit BringWindowToTop, z.B. so:

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var h : HWND;
begin
     //--
     h := FindWindow(nil,'Unbenannt - Editor');
     //
     if h <> 0 then BringWindowToTop(h);
end;
Patti

aaaaaaaaaa_10 7. Aug 2009 12:02

Re: Externes Programm in Vordergrund
 
Delphi-Quellcode:
hTargetWnd := FindWindowEx(0,0,nil, 'test');
BringWindowToTop(hTargetWnd);
Passiert aber nix

EDIT: Doch, wenn es nicht in der StatusLeiste ist, sonst passiert nix.

EDIT2:
Delphi-Quellcode:
ShowWindow(hTargetWnd,SW_SHOW);
              BringWindowToTop(hTargetWnd);
Hab jetzt einfach beides gemacht

patti 7. Aug 2009 12:24

Re: Externes Programm in Vordergrund
 
Du kannst statt SW_SHOW als Paramter auch SW_Restore verwenden.

Außerdem würde ich statt BringWindowToTop in diesem Fall eher SetForeGroundWindow verwenden,
da die erste Lösung bei mir den Fokus nicht immer richtig auf das Fenster setzt.

Allerdings kann es zu Problemen kommen, wenn die Fentser in die TNA minimiert wurden (manche Fenster lassen sich dann nach dem "In-Den-Vordergrund-Holen" nicht mehr zurück minimieren).

Patti

aaaaaaaaaa_10 7. Aug 2009 12:39

Re: Externes Programm in Vordergrund
 
Zitat:

Allerdings kann es zu Problemen kommen, wenn die Fentser in die TNA minimiert wurden (manche Fenster lassen sich dann nach dem "In-Den-Vordergrund-Holen" nicht mehr zurück minimieren).
Und was kann ich dagegen tun?


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:54 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