Converter Valores Decimal Para Hexadecimal

var
  N: Integer = 33; 
  S: string;
begin
  // gera uma string em formato decimal
  S := IntToStr(N);  // S = ´33´

  // gera uma string em formato hexadecimal
  // IntToHex está em SysUtils
  S := IntToHex(N, 2);  // S = ´21´

  // converte formato decimal para inteiro
  S := ´33´;
  N := StrToInt(S);  // N = 33

  // converte formato hexadecimal para inteiro
  S := ´$21´;  // note o cifrão
  N := StrToInt(S);  // N = 33