Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Aktive Windows-Application wechseln/anzeigen (https://www.delphipraxis.net/192334-aktive-windows-application-wechseln-anzeigen.html)

pesi 10. Apr 2017 08:11

Aktive Windows-Application wechseln/anzeigen
 
Hallo,

da ich durchs Googeln irgendwie nicht so recht weitergekommen bin stelle ich die Frage mal hier.

Folgendes Szenario: Auf dem PC laufen die Applikationen A,B und C (z.B. Browser, Word, Excel)
Ich möchte nun per Delphi zwischen diesen Applikationen wechseln (z.B. jede für 10 Sekunden anzeigen) und diese in den Vordergrund holen, also anzeigen.

Frage: Wie komme ich an die Liste der aktiven Applikationen (ALLE Tasks, im Sinne des Taskmanagers, ermitteln hilft mir an der Stelle ja nicht wirklich weiter) und wie kann ich diese in den Vordergrund holen???

Danke Euch
Gruß Peter

himitsu 10. Apr 2017 10:56

AW: Aktive Windows-Application wechseln/anzeigen
 
Eine Liste der aktiven Anwendungen bringt dir nicht viel, da du dann davon jeweils noch die "sichtbaren" Fenster suchen darfst.
Aber es gibt natürlich schon unmassen Tutorials/Beiträge/Posts, zu diesem Thema des Pogramme-auflistens:
Bei Google suchendelphi anwendungen auflisten

Also dann doch gleich die Fenster suchen.

Wenn man weiß, was man sucht:
MSDN-Library durchsuchenFindWindow/MSDN-Library durchsuchenFindWindowEx
Wenn man nach "allem" suchen will:
MSDN-Library durchsuchenEnumWindows

In deinem Fall suchst du natürlich nach allen Top-Level-Fenstern (ohne einen Parent)
und davon auch nur die Sichtbaren (MSDN-Library durchsuchenIsWindowVisible)-.

Und um das jeweilige Fenster zu aktivieren:
MSDN-Library durchsuchenSetFocus
MSDN-Library durchsuchenSetForegroundWindow

pesi 10. Apr 2017 12:18

AW: Aktive Windows-Application wechseln/anzeigen
 
Danke Dir! :) Das klingt dann wohl nach einigem Lesestoff für mich :shock:


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