funcion Ascii ?

[Coco_jac]

Hola amigos del foro, no recuerdo bien necesito obtener el codigo Ascii de un caracter.

gracias anticiapadas

[marcoszorrilla]

Código Delphi [-]
 procedure TForm1.Button1Click(Sender: TObject);
 begin
 ShowMessage(IntToStr(ord('A')));
 end;

Un Saludo.

[dec]

Hola,

Prueba con la función "Ord". Ejemplo, código ASCII del caracter "A":

Código Delphi [-]
  Caption := IntToStr(Ord('A'));

[dec]

Hola,

Marcos 1 - dec 0

[marcoszorrilla]

Según leo el resultado, yo jugaba en casa, así que habrá que esperar hasta el partido de vuelta.

Un Saludo.