bei string in TFileStream kommt 1 Zeichen zu wenig an...

[alzaimar]

Dann verwende eine Hilfsklasse oder einfach nur Prozeduren, die Dir das Leben einfacher machen.

Delphi-Quellcode:

Procedure ReadString (aStream : TStream; Var aString : String);
Var
  len : Integer;

Begin
  aStream.Read (len, SizeOf (len));
  SetLength (aString, len);
  aStream.Read (aString[1], len*SizeOf (aString[1])); // Wegen unicode
End;