Thema: Delphi Parent oder Nicht Parent

Einzelnen Beitrag anzeigen

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#5

Re: Parent oder Nicht Parent

  Alt 16. Jan 2007, 12:53
Hallo Mike,

solange immer nur ein ChildForm existiert, würde ich mir dieses in einer Form-Variable der MainForm merken.

Delphi-Quellcode:
type
  TMainForm = class(TForm)
  private
    FChildForm: TForm;
    procedure SetChildForm(childForm: TForm);
  published
    ChildForm: TForm read FChildForm write SetChildForm;
  end;

procedure TMainForm.SetChildForm(childForm: TForm);
begin
  FChildForm.Free;
  FChildForm := childForm;
end;
Bei jeder neuerlichen Zuweisung wird das vorhergehende ChildForm zerstört, mit NIL kannst du das letzte ChildForm dann auch noch zerstören.

Vielleicht interessiert dich auch dieser thread: klick

Grüße vom marabu
  Mit Zitat antworten Zitat