Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Convertir HexToChar (https://www.clubdelphi.com/foros/showthread.php?t=71071)

ØnLy 27-11-2010 17:56:29

Convertir HexToChar
 
Saludos , me preguntava si existe alguna forma de convertir un numero hexadecimal a char??

ejemplo : '21' en Hex , Es igual a '!' en char!

El seguiente ejemplo es visual , de un editor hexa-decimal!


rgstuamigo 27-11-2010 18:11:08

He aquí un ejemplo que te puede ayudar:
Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var f:Integer;
aux:Char;
begin
   f:=$21; //asigno el 21 en Hexa a mi varible f, esto es equivalente a 33 en sistema Decimal
   aux:=Chr(f);//Obtengo el caracter ASCII de la variable f
  ShowMessage(aux);///Muestro el caracter ASCII
end;
Saludos...:)

ØnLy 27-11-2010 19:43:45

Exelente , me funciona de maravilla......

;)


La franja horaria es GMT +2. Ahora son las 03:39:23.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi