Aktives MDIChild nach Schliessen eines MDIChild

[Bummi]

daraus etwas basteln?

Delphi-Quellcode:

//MDIForm
procedure TForm1.FormClick(Sender: TObject);
begin
    With TForm2.Create(self) do
      begin
        name := 'Nr1' ;
      end;

    With TForm2.Create(self) do
      begin
        Name := 'Nr2'
      end;

end;

// Child
procedure TForm2.FormActivate(Sender: TObject);
begin
  Form1.Caption := Name;
end;