OK, folgende Änderungen:
Delphi-Quellcode:
procedure Clear;
destructor Destroy; override;
constructor Create;
Delphi-Quellcode:
destructor TEXIF.Destroy;
begin
FreeAndNil(FDStream);
inherited;
end;
Jetzt meldet sich FastMM mit der schon bekannten langen Liste von Lecks, obwohl es kein
FreeAndNil
gibt. Mit dem einfachen bisherigen
Free
sagt FastMM nichts.
EDIT: Bitte um Verzeihung, funktioniert doch. In
Destroy
hätte viel mehr stehen müssen als nur der FDStream.
Ich danke euch beiden. Verstehe es aber trotzdem nicht ganz:
FreeAndNil
setzt die Referenz auf nil und ruft dann
Free
auf. Wieso muss der Compiler dann mein (?)
FreeAndNil
kennen?
Und nebenbei: Wie machst du den durchgestrichenen Text, Himitsu?