|
Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.184 Beiträge
Delphi 12 Athens
|
AW: TStringList - Datei laden mit "NUL" / #0 Bytes
11. Nov 2010, 10:51
LoadFromFile erstellt auch nur einen FileStream und übergibt ihn an LoadFromStream.
- FileStream selber erstellen
- über .Position oder .Seek das Binäre überspringen
- und dann mit LoadFromStream den Rest lesen
Oder LoadFromStream überschreiben und so modiizieren, daß es nicht mehr auf die #0 reagiert.
Die TStringList reagiert ja nur "manuell" auf #0, #10 und #13, wenn geladen wird (die Kompatibilität halt).
Sonst ist ihr die #0 relativ schnuppe, da ein Delphi locker Binärdaten aufnehmen kann.
$2B or not $2B
|