Einzelnen Beitrag anzeigen

Eisenmann

Registriert seit: 24. Dez 2016
Ort: Saarland, 66663 Merzig
7 Beiträge
 
Delphi 10.4 Sydney
 
#12

AW: einlesen eines String aus einem TFileStream

  Alt 12. Nov 2021, 17:33
Hi,
ich hatte mich zu früh gefreut. Es gab dann doch Unsicherheiten beim speichern und lesen.
Ich habe es jetzt mit Shortstring gemacht.


Code:
var daten:ShortString;
    l:integer;
l:=sizeof(daten);
fs.WriteBuffer(l, sizeof(l)); // +1
fs.WriteBuffer(daten,sizeof(daten));

Code:
fs.Read(ZText,d.l); skala.Version2s:=ZText;

So geht es.
Danke aber nochmals für die Hilfe.
Grüße aus dem Saarland
der Eisenmann.
  Mit Zitat antworten Zitat