Nochmal: Ermiteln ob Objekt freigegeben wurde

[tomsel]

Zitat:

tomsel hat folgendes geschrieben:
oder ganz einfach so:

Delphi-Quellcode:

procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  // hier werden noch viele weitere Dinge freigegeben
  Action := caFree;
  Form2 := nil;
end;

Funktioniert nicht.
Bekomme dann bei manchen Aktionen allgemeine Schutzverletzungen.

Dann verwendest Du die Variable Form2 irgendwo, ohne sie auf nil zu überprüfen. Der Fall ist nicht so kompliziert, wie Du ihn offensichtlich machst. Setze Form2 in FormCLose auf NIL und baue vor jeder Verwendung von Form2 eine Prüfung ein.