Einzelnen Beitrag anzeigen

Benutzerbild von Martin K
Martin K

Registriert seit: 20. Okt 2005
919 Beiträge
 
Turbo Delphi für Win32
 
#5

Re: TFileStream: String variabler Länge einlesen?

  Alt 15. Aug 2007, 22:40
Also ne andere Variante war, dass ich einen String konstanter Länge genommen habe:
Delphi-Quellcode:
var Stream: TFileStream; s: array[0..255] of Char; c: Cardinal;

{...} 

repeat
  Stream.Read(c, 4); // Größe einlesen
  Stream.Read(s, c); // String einlesen
  ShowMessage(s);
until Stream.Position >= Stream.Size;

{...}
Das hat funktioniert!
Aber hätte ich dann nicht auch s[0] beim Einlesen nehmen müssen?
Mit den Menschen ist es wie mit Computern -
es gibt Nullen und Einsen.
  Mit Zitat antworten Zitat