Tema: Manipular caracteres ascii extendido
Ver Mensaje Individual
  #2  
Antiguo 23-08-2010
cloayza cloayza is offline
Miembro
  
Registrado: may 2003
Ubicación: San Pedro de la Paz, Chile
Posts: 921
Reputación: 23
cloayza Tiene un aura espectacularcloayza Tiene un aura espectacular
Deberias hacer lo siguiente:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
     memo1.Font.Charset:='OEM_CHARSET';
     memo1.Font.Name :='Courier New';
     memo1.lines.add(Format('%s %s %s %s',[chr(218),chr(217),chr(192),chr(196)]));
end;

Saludos...
Responder Con Cita