Einzelnen Beitrag anzeigen

zeras

Registriert seit: 11. Mär 2007
Ort: Saalkreis
1.618 Beiträge
 
Delphi 12 Athens
 
#5

AW: Datei als HEX laden (Suche schon mehrfach benutzt)

  Alt 16. Nov 2014, 16: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 17:08 Uhr) Grund: Habe aus Byte TBytes gemacht. Dann sollte das doch gehen.
  Mit Zitat antworten Zitat