



Existe uma função nativa do delphi que converte inteiros
para uma string hexadecimal.
É necessário estar declarado SysUtils na seção uses,
em versões unicode delcare System.SysUtils.
Função do Delphi: IntToHex(Numero, Qtde. de dígitos);
Retorno: String;
Exemplos de uso:
1 2 3 4 5 6 7 8 | procedure TForm1.Button1Click(Sender: TObject); begin ShowMessage( IntToHex(18, 2) ); ShowMessage( IntToHex(693, 5) ); ShowMessage( IntToHex(19856, 8) ); end; |