De entero a hexa, y hexa a entero (o string)

[roman]

Empezado por emeceuy

En definitiva... hay alguna funcion que pase de entero a hexadecimal y otra que pase de hexadecimal(string) a entero (o string)...???

Entero a Hexadecimal
IntToHex (intenta poner 0 en el segundo parámetro)

Hexadecimal a Entero
Usa StrToInt anteponiendo un '$' a la cadena, por ejemplo,
StrToInt('$' + 'EF23C') -> 979516

// Saludos

[emeceuy]

Hola...

Gracias a los que respondieron, pero sigo teniendo el problemas con la conversión de HEXA a entero y entero a HEXA...
El tema es que la cadena (numero binario) que quiero pasar a hexadecimal es de más de 40 caracteres, y eso supera a la capacidad del entero... a alguien se le ocurre como puedo solucionarlo???

Muchas gracias a todos !!! saludos

[jachguate]

En realidad un número binario de 40 digitos (40 bits) si cabe en un int64, que tiene, como lo revela su nombre, una capacidad de 64 bits.

O ya puestos a manipular las cosas... podes "partir" la cadena en dos números de 20 bits, para luego, cuando sea necesario, "concatenarla" de nuevo, no?

Hasta luego.

[roman]

Yo ya no entendí de qué a qué quieres convertir. Dices que quieres pasar la cadena binaria a hexadecimal paa que ocupe menos caracteres. ¿No te sirve mejor pasarla directamente a un entero? Podrías hacerlo con una función como esta:

Código Delphi [-]
function BinStrToDec(BinStr: String): Integer;
var
  Pot2, I: Integer;

begin
  Pot2 := 1;
  Result := 0;
  for I := Length(BinStr) downto 1 do
  begin
    if BinStr[i] = '1' then
      Inc(Result, Pot2);

    Pot2 := 2*Pot2;
  end;
end;

Y en todo caso, concantenar ésta con IntToHex.

// Saludos