@Muetze1
Zitat:
In wie fern äussert sich denn der Fehler, das du kein Speicher mehr freigeben kannst?
Wie kommst du darauf? Nur weil der Taskmanager nicht wieder einen kleineren Wert anzeigt nach einem .Free? Wenn es das letztere ist: sei unbesorgt: Der Delphi Heap Manager verkleinert nicht freiwillig seinen Bereich - wenn der einmal so gross ist, dann bleibt er es bis zum Ende ...
nicht so schnell, nicht so schnell
Ich reserviere mit Absicht Speicher, damit ich dadurch gewisse Erleichterungen habe
Ich bekomme keinen Fehler - noch nicht
Nun möchte ich wissen, wenn ich das Teil/Objekt 10000 am Tag aufrufe (was vorraussichtlich nicht passiert), wieviel Speicher dabei verwendet wird.
Wenn ich weiss wieviel Speicher dabei benötigt wird, kann ich auch die Situation besser einschätzen.
Ich habe eine Möglichkeit gefunden für TComponent's
Delphi-Quellcode:
mem := TMemoryStream.Create;
try
mem.WriteComponent (Form1);
n := mem.Size;
finally
mem.Free;
end;
Jedoch muss hier in der Vererbungshierarchie ein TComponent sein.
d.h. TForm ist von TComponent
TStringList aber nicht
Ich bin darauf gekommen, weil man auch von einer Persitenz eines Objektes reden kann/könnte - und diese kann man bestimmt durch eine Byte-Grösse beschreiben.
Aber vielleicht gibt es doch noch was allgemeineres was für Alle, die nach TObjekt kommen, funktionieren könnte.