antiChar

[mjjj]

hola amigos.. tengo un problema de conversion...

Necesito convertir un char, por ejemplo "A", a su equivalente en hexadecimal...

existe una funcion contraria al char... la que transforme mi char en numeros....

porfa denme una manito

gracias

[[egostar]]

Busca información sobre la funcion IntToHex(), muy fácil con la tecla F1

Salud OS.

[dec]

Hola,

O sea, que tal vez de este modo el asunto pueda funcionar:

Código Delphi [-]
h := IntToHex( Ord( 'A' ) );

¿No?

[[seoane]]

Yo todavía sigo pensando cual es la funcion Char

[[egostar]]

Empezado por dec

Hola,

O sea, que tal vez de este modo el asunto pueda funcionar:

Código Delphi [-]h := IntToHex( Ord( 'A' ) );


¿No?

Amigo David, mas bien así, o no?

Código Delphi [-]
h := IntToHex(Ord( 'A' ), 2 );

Salud OS.

[[egostar]]

Empezado por seoane

Yo todavía sigo pensando cual es la funcion Char

, Pos si.

Salud OS.

[mjjj]

Amigos el siguiente codigo funciona perfectamente...

h := IntToHex(Ord( 'A' ), 2 ); en donde h es de tipo string;

ahora bien... en mi caso, el caracter que quiero transformarlo a hexadecimal lo obtengo de uan tabla, con el codigo

sub1:=query1.fieldbyname('sub').asstring; en donde el valor de sub es un string; este puede ser cualquier letra del abcedario

ahora hago la conversion con...

sub2:=inttohex(ord(quotedstr(sub1)),2); en donde sub2 es un string;

me tira un problema de compatibilidad...

que puede ser... ayuda porfa....

[[seoane]]

Empezado por mjjj

me tira un problema de compatibilidad...

que puede ser... ayuda porfa....

Que podrá ser .... Si revisas la ayuda de delphi, veras que a la función Ord se le pasa como parámetro un Char. Y tu le estas pasando un String. Así que parece bastante lógico que proteste.

Lo que necesitamos es un Char y tenemos un string, menos mal que delphi permite acceder a cada uno de los caracteres de un string por separado. Por ejemplo, si queremos utilizar el primer carácter de la cadena sub1

Código Delphi [-]
sub2:=inttohex(ord(sub1[1]),2);

Pero, y que pasa si la cadena sub1 esta vacía, pues que se monta un buen jaleo Así que va a ser mejor comprobar primero si tiene el tamaño adecuado:

Código Delphi [-]
if Length(sub1) > 0 then
  sub2:=inttohex(ord(sub1[1]),2);

[mjjj]

muchas gracias seoane... me salvaste....

garcias tambien por lo rapido de la respuesta

saludos