Como Imprimir Hexadecimal en Memo???

[La__X]

Holas
Estoy tratando de imprimir un numero haxadecimal en un Tmemo, pero no se cual es la conversion que tengo q hacer.
Por ejemplo, para imprimirlo en consola se hace printf ("%02x",.....
Pero para imprimirlo en un Tmemo, hay alguna conversion??

[marcoszorrilla]

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
Memo1.Lines.Add(Format(' Esto es 256 en Hexadecimal: %02x',[256])+'H');
end;

Un Saludo.

[[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;

[La__X]

Empezado por marcoszorrilla

Código Delphi [-]procedure TForm1.Button1Click(Sender: TObject); begin Memo1.Lines.Add(Format(' Esto es 256 en Hexadecimal: %02x',[256])+'H'); end;


Un Saludo.

Gracias
Solo para cumplir con el nombre del Foro (C/C++)
aca esta lo mismo pero en c++

Memo1->Lines->Add(Format("%02x", ARRAYOFCONSTR((5))))

Salu2