Zitat von
ozz:
@IngoD7
Free habe ich schon mal propiert. Ist in der Liste oben (Original Post)
Ja, glaube ich das denn ...?
Du hast es nicht probiert. Lies doch mal, was
genau ich geschrieben habe.
Nochmal:
Du hast in deiner Klasse ein Objekt vom Typ TObjectList (
FStreamObjectList). Dieses Objekt wird im Konstruktor erzeugt:
Delphi-Quellcode:
constructor TStreamlist.create;
begin;
inherited create;
FStreamObjectList:=TObjectList.Create(true);
end;
Dieses Objekt
FStreamObjectList muss auch wieder freigegeben werden!
Das geht so:
Delphi-Quellcode:
destructor TStreamlist.destroy;
begin
FStreamObjectList.Free;
inherited Destroy;
end;
Und
wenn du das dann endlich so tust, dann kannst du dir deinen Code sparen, mit dem du
die Elemente deiner Liste freigibst (das ist
nicht die Liste selbst, es sind lediglich die Elemente!). Denn das Freigeben der Objektliste FStreamObjectList gibt automatisch die Elemente dieser Liste mit frei.
Ufff ...
