strtohex

[halinchen]

Für mich sieht es aus, als würdest du die Datei als String einlesen und die dann in Hex umwandeln.

Macht man das nicht mit einem FileStream, und liest Byte für Byte aus und wandelt den in Hex um?

So denke ich mir das. (Es kann natürlich auch sein, das beides geht, aber an deinem gezeigten Code sehe ich kein Fehler)

Delphi-Quellcode:

var
 fs:TFileStream;
 str : String //was am Ende Rauskommt
 i : Integer;
 b : Byte;
begin
 fs := TFileStream.Create('Datei', fm_OpenRead);
 try
    For i := 0 to fs.Size do begin
      fs.ReadBuffer(b,sizeof (b));
      //oder fs.ReadByte(b); <-- bin mir nichtt sicher 
      str := Str + '|' + IntToHex(b,2); <-- '|' ist der Trenner
    end; 
 finally
 fs.Free;
 end;
end;

ungetestet

[edit] Hmm... Zum 1. Mal kein roter Kasten... [/edit]