funcion Ascii ?

[Coco_jac]

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

gracias anticiapadas

[marcoszorrilla]

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":


Caption := IntToStr(Ord('A'));

[dec]

Hola,

Marcos 1 - dec 0

:D :D :p :cool: ;) :) :D

[marcoszorrilla]

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

Un Saludo.