tstringlist.loadfromstream liest mehr ein, als es soll

[DrUArn]

@himitsu

heisst, tstringlist.LoadFromStream(astream) liest definitiv nur bis #0?

Probiere ich aus.

danke Uwe

//daten schreiben
procedure tstorepersistent_UA.writeotherdata(astream: tstream);
var i:integer;
a:char;
begin
astringlist.SaveToStream(astream);
a:=#0;
astream.Write(a,sizeof(a));
end;

Diese Änderung bringt's nicht - wo und warum der Leseprozess beendet wird, kann ich nicht erkennen - aber immer werden ein paar mehr Strings eingelesen als gespeichert!

Gruß Uwe