Binärcode/Hex

[hmbg]

Hi,
ich würde gerne wissen, wie man mit Delphi an den Hex Code oder den Binärcode einer Datei rankommt.
Ich hoffe, das passt hier rein, ich wüsste nich, wo ich sonst reinposten sollte.

thx hmbg

[Luckie]

Meinst du so was:
http://www.michael-puff.de/Developer...HexLoader.html

[hmbg]

hey, klasse, Danke, das ist genau das, was ich suche

mfg hmbg

[ichbins]

du liest das Teil einfach Byte für Byte ein und zerlegst das Byte dann in je 2 Hex-Ziffern:

Delphi-Quellcode:

const 
  hexes:string='0123456789ABCDEF';
var
  f:file of byte;
  b:byte;
begin
  assignfile(f,dateiname);
  reset(f);
  while not eof(f) do begin
    read(f,b);                // teilungsergebniss von b durch 16 / Teilungsrest
    hexwertvondiesembyte:=hexes[(b div 16)+1]+hexes[(b mod 16)+1];
  end;
  closefile(f);
end;