ascii extendido error
hola, sigo intentando sacar el calor decimal de un caracter ascii extendido >127, pero no lo consigo. por ejemplo:
Código Delphi [-]procedure TForm1.Button1Click(Sender: TObject);
var
c: char;
begin
c:= '■';
label1.Caption:= intToStr(ord(c));
end;
Me devuelve 9632 cuando en realidad es 254 ¿alguna sugerencia?
__________________
La juventud pasa, la inmadurez se supera, la ignorancia se cura con la educación, y la embriaguez con la sobriedad, pero la estupidez dura para siempre. Aristofanes.
|