Int zu Hex wandeln

[marabu]

Und das hier geht auch noch:

Delphi-Quellcode:

type
  TCharArray = array of char;

function Pack(hex: string): TCharArray;
begin
  SetLength(Result, Length(hex) shr 1);
  HexToBin(@hex[1], @Result[0], Length(Result));
end;

Grüße vom marabu