Ver Mensaje Individual
  #7  
Antiguo 03-02-2016
Avatar de danielmj
danielmj danielmj is offline
Miembro
 
Registrado: jun 2011
Posts: 383
Reputación: 13
danielmj Va por buen camino
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.
Responder Con Cita