Name der Madalen Form(s)

[MES]

Danke für die schnelle Antwort.
Irgendwie hat es nicht gaz hingehauen weil mir alle Formulare (und nicht nur die Modalen) anzeigte.
Also hab ich einen etwas anderen Weg vorgenommen:

if Application.ModalLevel > 1 then ModalFormCaption(Screen.ActiveForm.Name); //1=das gerade modal geöffnete Formular; >1 Ja, es git mehrere modal geöffnete Forms
...

function ModalFormCaption(FormularName:string): String;
var i: Integer;
for i:=0 to Screen.FormCount-1 do
begin
if (fsModal in screen.forms[i].FormState) and (screen.forms[i].Name<> FormularName) then
begin
Result := screen.forms[i].Caption;
exit;
end;
end;

Gibt es etwas was dagegen spricht?