@Dax
nach Deiner Aussage
Delphi-Quellcode:
n1 := strListe.InstanceSize;
strListe.Add('Heute');
strListe.Add('ist');
strListe.Add('ein');
strListe.Add('schöner');
strListe.Add('Tag');
n2 := strListe.InstanceSize;
müsste n1 <> n2 sein, n1 = n2 = 48
@jbg
Zitat:
Für was brauchst du denn diese Information?
ich habe das Problem in einer selbstgeschriebenen Klasse, dass diese Speicher alloziert und nicht mehr freigeben kann
Zitat:
Der belegte Speicher ist querfeldein verstreut und kein zusammenhängender Block, was z.B. ein einfaches Schreiben in einen Stream unmöglich macht (dafür gibt es ja SaveToStream).
das muss für mich der Speichermanager von Borland/Delphi und das Betriebssystem übernehmen
darum kann ich mich nicht auch noch kümmern
Zitat:
Das dürfte hinkommen:
TStringList.InstanceSize + StrList.Capacity * SizeOf(TStringItem) + (Length(StrList[0]) + 12) + (Length(StrList[1]) + 12) + ... + (Length(StrList[Count-1]) + 12)
sicherlich könnte man das noch vereinfachen ...
es ist nicht nur eine TStringList - das war nur ein einfaches Beispiel
sondern die Klasse enthält zig andere Componenten und Listen
deswegen denke ich, dass es noch eine allgemeinere Antwort darauf geben könnte