Unicode String in FileStream speichern/auslesen

[Bernhard Geyer]

Zitat von hansklok:

@Bernhard Geyer: Anwendungen für Unicode anpassen unter Aufrufe von Read/ReadBuffer-Methoden von TStream und Aufrufe von Write/WriteBuffer-Methoden von TStream.

Richtig falsch ist es ja nicht da primär nur die zu ändernde Codefragmente verglichen werden.

Aus
  Stream.Write(Pointer(S)^, Length(S)); Muss
  Stream.Write(Pointer(S)^, Length(S) * SizeOf(Char)); // Geben Sie die Puffergröße in Byte an Wenn im Ursprungscode vorgesehen ist die Längenangabe vor dem String zu speichern so braucht die in der Unicodeversion nicht geändert zu werden. Sinnvoll ist es aber wie auch bei der Read-Methode anzugeben.