TFileStream mit AnsiString

[Helmi]

Hallo,

ich lade mir eine Text-Datei in eine StringList ein, modifizier die StringList etwas und speichere danach den Inhalt der StringList mittels TFileStream (ja - ich weiss - es gibt auch StringList.SaveToFile - aber ich speichere mehrere Text-Dateien in der gleichen Datei)

Delphi-Quellcode:

var
  S: String;
  FileStream: TFileStream;

begin
{...}
  StringList.LoadFromFile(Pfad + Datei);
  S := StringList.Text;
  FileStream.WriteBuffer(S[1], length(S));
{...}

Wenn ich das so mache, dann erhalte ich nach jedem Zeichen in der Datei #0.
Ist S als AnsiString deklariert, dann funktionierts (natürlich).
Aber dann erhalte ich als Warnung:

Zitat:

[DCC Warnung] MainUnit.pas(222): W1058 Implizite String-Umwandlung mit potenziellem Datenverlust von 'string' zu 'AnsiString'

So etwas wie AnsiFileStream gibts es ja leider nicht - aber wie geht man nun bei so was vor? - Also einen String zu speichern ohne #0 nach jedem Zeichen und ohne das man die Warnung erhält?