AnsiString speichern und laden

[Rolf Frei]

Leider verstehe ich nicht so ganz was du da genau machen willst. Wieso so kompliziert? Wieso nicht mit einer TStringList und SafeToFile? Warum willst du das überhaupt als ANSI speichern?

Delphi-Quellcode:

with TStringList.Create do
try
  { Speichern }
  Text := String(DeinAnsiText);
  SaveToFile(DeinFileName, TEncoding.ANSI);

  { Laden }
  LoadFromFile(DeinFieleName, TEncoding.ANSI);
  DeinAnsiText := AnsiString(Text);
finally
  Free
end;