Feststellen ob ein bestimmtes MDI Child geöffnet ist?

[sECuRE]

Hi,

mittels FindComponent('Form1'); zum Beispiel. Oder man geht allgemein die offenen MDIChilds durch, in einer Schleife könnte das dann so aussehen:

Delphi-Quellcode:

var c,cClassname:integer;
begin
for c:=0 to MDIChildCount-1 do
  for cClassname:=1 to 6 do
    if (MDIChildren[c].Classname = 'TForm'+IntToStr(cClassname)) then
      ShowMessage('Dies ist children #'+IntToStr(cClassname));

Auch wenn mir nicht ganz klar ist, was das ganze werden soll..

Edit: Noch Beispielcode zum FindComponent:

Delphi-Quellcode:

if (FindComponent('Form1') <> nil) then
  ShowMessage('Form1 ist geöffnet');

cu