Wie erzeuge ich ein MDI ChildForm2 aus MDI Childform1 per Button or main Menu ?

[Sir Rufo]

Wenn das ChildForm geschlossen wird, dann wird dieses ja auch aus dem Speicher geworfen

Delphi-Quellcode:

procedure TChildForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  action :=caFree;
end;

Das ist ja soweit korrekt, aber die Variable ChildForm1 hat immer noch einen Wert <> nil
Versuch es mal damit:

Delphi-Quellcode:

procedure TChildForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  action :=caFree;
  // ChildForm1 auf nil setzen
  If ChildForm1 = Self  then
    ChildForm1 := Nil;
end;

Besser wäre es sogar diesen Code im Event OnDestroy zu platzieren.