ungültige Zeigeroperation bei destroy

[alzaimar]

Sowas passiert, wenn die Instanz 2x freigegeben wird, und im Destruktor z.B. Felder der Klasse Bezug genommen wird. Mir ist noch nicht aufgefallen, das das beim Return (also dem 'end') auch auftritt, aber wer weiss.
Beispiel:

Delphi-Quellcode:

a := TFooBar.Create;
...
a.Destroy;
a.Destroy; // <--- Oha

Abhilfe: Vermeiden von Destroy, und Benutzen der Routine FreeAndNil.

Delphi-Quellcode:

a := TFooBar.Create;
...
FreeAndNil(a);
a.Free; // <--- Macht nix, weil <Nil>.Free gar nichts macht.