[[seoane]]

Si quires convertir un array tambien puedes usar algo como esto:

Código Delphi [-]
function BinToHex(b: array of byte; n: Integer): string;
var
  i: Integer;
begin
  Result:= '';
  for i:= 0 to n-1 do
    Result:= Result + IntToHex(b[i],2);
end;

Se usaria asi, por ejemplo:

Código Delphi [-]
var
  Buffer: array[1..100] of byte;
  i: Integer;
begin
  for i:= 1 to 100 do
    Buffer[i]:= i;
  Memo1.Lines.Add(BinToHex(Buffer,100));
end;