Hallo, ich möchte Objekte, die ich einer TStringList zugewiesen habe wieder freigeben. Leider wird der Destructor des entsprechenden Objekts nicht aufgerufen
:
Delphi-Quellcode:
for f := 0 to Liste.Count - 1 do
if Assigned(Liste.Objects[f]) then
Liste.Objects[f].Free;
Hab ich da einen Denkfehler? Ich habe auch schon folgendes probiert:
Delphi-Quellcode:
for f := 0 to Liste.Count - 1 do
if Assigned(Liste.Objects[f]) then
TType(Liste.Objects[f]).Free;
TType = der entsprechende Klassentyp (ist ja bekannt).