TStrings.SaveToStream von XE6 nach Rio

[Rudy Velthuis]

[QUOTE=dataspider;1428722]Hallo

Delphi-Quellcode:

procedure TParamHelper.LoadFromStrings(const AStrings: TStringList);
Var
  AStream: TMemoryStream;
begin
  AStream := TMemoryStream.Create;
  try
    AStrings.SaveToStream(AStream);
    AStream.Position := 0;
    LoadFromStream(AStream, ftBlob);
  finally
    AStream.Free;
  end;
end;

Was war denn der Inhalt von der TStringList? Man kann das doch ziemlich leicht debuggen, also würde ich mir mal die Debug-DCUs hinzulinken und dann mal nachsehen, was da geschieht. Debuggen in Delphi ist VIEL leichter als in anderen IDEs.

Ich würde mir in einer Watch AStrings.Text anzeigen lassen.

[dataspider]

Habe ich natürlich schon gemacht.
In der Stringliste ist der Text OK.
Auch von der Stringliste in den STream ist alles OK.
Erst vom Stream in TParam erfolgt die Umwandlung.

Auch AStrings.SaveToStream mit TEncoding ändert nichts.

Ich vermute, dass Änderungen in TStream die Ursache sind.
Ich habe da einige Änderungen entdeckt (z.B. ReadBufferData), die darauf hindeuten.
Das kann ich aber erst morgen an meinem alten Laptop mit XE6 checken.

Frank