Registriert seit: 11. Mär 2007
Ort: Saalkreis
1.633 Beiträge
Delphi 12 Athens
|
AW: Datei als HEX laden (Suche schon mehrfach benutzt)
16. Nov 2014, 17:20
Versuchs doch mal so, wie Sir Rufo schon geschrieben hat.
Delphi-Quellcode:
function LoadFileAsHex(const FileName: String) : String;
var
Stream : TFileStream;
BinStr : TBytes;
begin
Stream:= TFileStream.Create(FileName, fmOpenRead);
try
SetLength(BinStr, Stream.Size);
Stream.ReadBuffer(BinStr, Length(BinStr));
finally
Stream.Free;
end;
end;
Matthias Es ist nie falsch das Richtige zu tun!
- Mark Twain
Geändert von zeras (16. Nov 2014 um 18:08 Uhr)
Grund: Habe aus Byte TBytes gemacht. Dann sollte das doch gehen.
|