Pointer existiert, das Objekt dahinter nicht. Wie zuverlässig prüfen?

[Schokohase]

Mit Interfaces brauchst du nicht mehr testen, denn die Instanz wird erst freigegeben, wenn du die Instanz vergessen hast.

Delphi-Quellcode:

var
  foo, foo1, foo2: IFoo;
begin
  foo := TFoo.Create;
  foo1 := foo;
  foo2 := foo;
  foo := nil;
  foo1 := nil;
  foo2 := nil; // Hier erfolgt jetzt automatisch die Freigabe der Instanz
end;

Und wenn man nicht mehr weiß wonach man sucht, wie will man dann feststellen ob es noch existiert ...