Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   C++ Builder (https://www.clubdelphi.com/foros/forumdisplay.php?f=13)
-   -   Como Imprimir Hexadecimal en Memo??? (https://www.clubdelphi.com/foros/showthread.php?t=32046)

La__X 25-05-2006 06:01:19

Como Imprimir Hexadecimal en Memo???
 
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??:confused:

marcoszorrilla 25-05-2006 07:07:23

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 25-05-2006 13:41:04

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 28-05-2006 01:27:54

Cita:

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 :D
Solo para cumplir con el nombre del Foro (C/C++)
aca esta lo mismo pero en c++

Código:

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


La franja horaria es GMT +2. Ahora son las 20:07:54.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi