Pasar de Hexadecimal a Decimal

[[xEsk]]

Editado: Veo que es el foro de C++ Builder xD

int HexToInt(String value)
{
  return StrToInt("$" + value);
}

Lo he hecho de memoria, y puede que no funcione... si no funciona, dudo que sea complicado arreglar el fallo! xD

Mensaje original:

Código Delphi [-]
 function HexToInt(const Value: String): Integer;
 begin
   Result:=StrToInt('$' + Value);
 end;

Ejemplo de como usarlo:

Código Delphi [-]
Valor:=HexToInt('AF');

La función se podria mejorar, comprovando que lo que nos pasan es un hexadecimal correcto, etc.. etc...

Saludos.