Erkennen ob Modal-Dialog/Fenster geöffnet?

[PeterPanino]

Hallo! Kann man irgendwie feststellen, ob in der Applikation irgendein MODALER Dialog geöffnet ist? Z.B. Message-Dialog, ein modal geöffnetes Applikations-Formular, usw. Wenn ja, dann sollte man das modale Element in den Vordergrund bringen können.

[Der schöne Günther]

Falls du VCL meinst:

http://docwiki.embarcadero.com/Libra...ion.ModalLevel

[himitsu]

So findet man natürlich aber nur die Fenster, welche auf TForm aufbauen und per ShowModal aufgerufen wurden.
In Screens sind alle TForms enthalten und da könnte man auch auf fsModal prüfen. (mit dem selben Ergebnis)

MessageBox und andere WinAPI-Dialoge sind dort nicht enthalten, genauso wie der TaskDialog (vor Vista eine TForm und sonst WinAPI),
außer sie sind in einer VCL-Komponente gekapselt und Diese ruft ModalStarted/ModalFinished auf.

[DeddyH]

Evtl. hilft auch das hier: Modale Fenster in den Vordergrund holen

[PeterPanino]

Danke für die Tipps! Werde diese mal durchgehen...

[himitsu]

Zitat von DeddyH:

Evtl. hilft auch das hier: ...

Aber bitte mit TApplicationEvents, anstatt direkt über OnIdle.

[PeterPanino]

Zitat von Der schöne Günther:

Falls du VCL meinst:

http://docwiki.embarcadero.com/Libra...ion.ModalLevel

Mhm, wenn ein FileOpen-Dialog geöffnet ist, dann ergibt Application.ModalLevel 0, obwohl ein FileOpen-Dialog praktisch gesehen ja auch modal ist.

[himitsu]

Zitat von himitsu:

So findet man natürlich aber nur die Fenster, welche auf TForm aufbauen und per ShowModal aufgerufen wurden.
...

MessageBox und andere WinAPI-Dialoge sind dort nicht enthalten, genauso wie der TaskDialog (vor Vista eine TForm und sonst WinAPI),
außer sie sind in einer VCL-Komponente gekapselt und Diese ruft ModalStarted/ModalFinished auf.

...

[blauweiss]

Hallo PeterPanino,

ich verwende dafür diese Abfrage:

Delphi-Quellcode:

if not IsWindowEnabled(Application.MainForm.Handle) then
...

Viele Grüße,
blauweiss

[PeterPanino]

Zitat von blauweiss:

Hallo PeterPanino,

ich verwende dafür diese Abfrage:

Delphi-Quellcode:

if not IsWindowEnabled(Application.MainForm.Handle) then
...

Viele Grüße,
blauweiss

Genial! Scheint mit allem zu funktionieren, was modal ist! Danke für den Tipp!

Viele Grüße von rotweiß

PS: Hier ist übrigens die MSDN-Seite für diese Funktion:

https://msdn.microsoft.com/en-us/lib...(v=vs.85).aspx