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;