TForm modal aber nicht application-modal anzeigen

[Zacherl]

Hey,

der Titel ist etwas schlecht formuliert, aber mir fiel nichts besseres ein. Ich habe eine Anwendung, welche zwei Child Formulare erzeugt und mit Show() anzeigt. Auf diesen Formularen befindet sich jeweils ein Button, der per Click ein weiteres Fenster öffnen soll. Dieses möchte ich zwar modal anzeigen, aber so, dass nur das dazugehörige Child Fenster betroffen ist. Das zweite Child Fenster soll nach wie vor den Focus erhalten können, auch wenn das modale Fenster von Child 2 noch nicht geschlossen ist.

Probiert habe ich es mit einem normalen ShowModal(), was allerdings nicht funktioniert. In diesem Falle ist das neue Fenster zwar modal, aber ich kann weder Child 2, noch das Main Fenster auswählen.

Rufe ich allerdings beispielsweise MessageBox() mit dem Handle des Childs als ersten Parameter auf, entsteht die von mir gewünschte Funktionalität. Kann ich diese auch irgendwie mit normalen Forms nachbilden?

Viele Grüße
Zacherl

[Namenloser]

Ich weiß nicht, was bei MessageBox intern genau passiert, aber die einfachste Lösung wäre, die Eigenschaft Enabled des Childs auf False zu setzen.

[Zacherl]

Also ich habe mal etwas in die Sourcen der ShowModal() Methode geschaut. Dort werden unter anderem sämtliche anderen Fenster der Anwendung deaktiviert. Habe mir die Funktion jetzt mal dupliziert und den entsprechenden Aufruf mit

Delphi-Quellcode:

EnableWindow(ParentWindow, false);

ersetzt. Den ersten Tests nach zumindest, funktioniert es jetzt wie gewünscht :)