ASCII-String und Binärtdaten in eine Datei schreiben

[drunky1337]

Hallo Leutz,

ich möchte gerne eine Datei erstellen, in der sowohl ASCII-Strings (Header meiner Datei) als auch Binärtdaten enthalten sein sollen.

Mein erster Versuch war es die ASCII-Strings in eine StringListe zu schreiben und zum Schluss die Binärdaten über einen MemoryStream hinzuzufügen.
Leider scheitert das auch hier schon.
Ich kann die Strings problemlos in die StringList schreiben und diese als Datei speichern,
wenn ich aber

Delphi-Quellcode:

  Header.SaveToFile('C:\EDMSWAP\Header.hdf'); // 64kB groß
  Stream := getBinaryData(file_one);
  Stream.SaveToFile('C:\EDMSWAP\Data.hdf'); // 400 Byte groß
  Header.LoadFromStream(Stream);
  Header.SaveToFile('C:\EDMSWAP\HeaderAfterLoadFromStream.hdf'); // 2 Byte groß

ausführe hat meine StringList keinen Inhalt mehr und ist nur noch 2 Byte groß.
Ich vermute mal das LoadFromStream den kompletten Inhalt meiner StringList ersetzt.
Diese StringList hat zusätzlich Probleme mit den Binärdaten und intepretiert diese möglicherweise als irgendwelche Steuerzeichen und deshalb nur 2 Byte groß ist.

Langsam denke ich das die StringList für meine Anforderung erst gar nicht geeignet ist, leider bin ich in diesem Thema noch ganz am Anfang und würde mich sehr darüber freuen, wenn mich jemand auf die richtige Spurr schickt.

Mit freundlichen Grüßen

Arthur W.