Vielleicht hilft Dir dieser Schnipsel - ist bei uns zum Schauen, ob es Modal irgendwo auf ist:
Delphi-Quellcode:
for I := 0 to Screen.FormCount - 1 do
if (ansiUpperCase(Screen.Forms[I].Caption) = ansiUpperCase(UeCaption)) then
begin
..Nicht mehr öffnen, nach vorne holen
end;