Wie klappt das mit TFileStream denn nicht. Also
was ist da der Fehler? Dann musst du auch nicht den Umweg über Hex-Werte geben. Was möchtest du den außerdem abspeichern?
Dürfte nicht das funktionieren:
Delphi-Quellcode:
procedure ShowBinary(var Data; Count: Cardinal; FileName : string);
var
s : TStream;
begin
s := TFileStream.Create(FileName, fmCreate);
try
s.Write(@Data, Count);
finally
s.Free;
end;
end;
Ich gehe mal davon aus, das Count die Größe von Data in Byte angibt?
Übrigens so etwas wie
.SaveToFile('o.txt') ist nicht gerade die feine englische Art.
MfG
Fabian