MDIChild- wie gehts am besten?

[sakura]

Ungetestet, aber das kannst Du ja mal testen

Delphi-Quellcode:

var
  F2: TForm2;
  I: Integer;
begin
  // FORM2 suchen
  F2 := nil;
  for I := 0 to Screen.FormCount - 1 do
    if (Screen.Forms[I].FormStyle = fsMDIChild) and (Screen.Forms[I] is TForm2) then
    begin
      F2 := TForm2(Screen.Forms[I]);
      Break;
    end;
  if F2 = nil then
    F2 := TForm2.Create(Self)

  // in F2 ist jetzt der Bezug zum alten bzw. neuen TForm2 Objekt
  ...
end;

......