Hallo Zusammen...
Gegeben sein ein TStream.
Kann ich die Destroy Methode so überschreiben, dass "mein" Object erst/mit destroyed wird?
Beispiel:
Delphi-Quellcode:
Var
S : TStream;
F : TStreamWrapper;
begin
S := TStream.Create;
F := TStreamWrapper(S);
...
S.Free; // Ruft F.Free auf und dann wird S.Free aufgerufen
end;
Mavarik
