Speicherfreigen nach TForm2 Aufruf

[madina]

Hallo,

ich rufe einen 2ten Fenster modal vom TForm1-Hauptfenster auf und schließe den 2ten Fenster mit close.

Frage: wie kann ich einen 2ten Fenster schließen, daß der 2te Fenster richtig Speichermäßig auch freigegen wird und aus dem Speicher gelöscht wird, macht dies der Close-Befehl nicht ?

mfg

[Sharky]

Hai madina,

schaue Dir mal das OnClose Ereigniss der Form an (oder war es OnCloseQuery) dort kannst Du über action angeben ob die Instanz freigegeben werden soll.

[sh17]

Im OnClose die Variable Action auf caFree setzen

[Martin K]

Ich würde es so machen:

Delphi-Quellcode:

  Form2 := TForm2.Create(Self);
  try
    Form2.ShowModal;
  finally
    FreeAndNil(Form2);
  end;

[sh17]

Statt Free würde ich Release empfehlen, um alle offenen Ereignisse an das Form abarbeiten zu lassen

Delphi-Quellcode:

  Form2 := TForm2.Create(Self);
  try
    Form2.ShowModal;
  finally
    Form2.Release;
    Form2 := nil;
  end;

Wobei Form2 := nil keine Sinn ergibt, wenn Form2 lokal deklariert ist.

[robinWie]

[OT]
Interessant ist es wenn man nur eine Form hat und OnClose so schreibt:

Delphi-Quellcode:

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
    Action := caNone;
end;

Dann passiert, wenn man auch das rote X klickt, gar nix
[/OT]