@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.