Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Lazarus, FreePascal, Kylix, etc. (https://www.clubdelphi.com/foros/forumdisplay.php?f=14)

- - Tildes. (https://www.clubdelphi.com/foros/showthread.php?t=85587)

bit	03-04-2014 20:12:51

Tildes.

Saludos.

Adjunto código del programa:

Código:

program numero;

var

n:integer;



begin

writeln('Programa creado por Bit.');

write('Ingrese número entero positivo:');

readln(n);

while (n<=-1) do

begin

  writeln('Por favor, usted debe ingresar un número entero positivo:');

  readln(n);

  end;

writeln('Correcto,El número ingresado es un entero positivo');

readln;

end.

Al ejecutar el programa, no muestra los tildes correctamente.
Si por ejemplo uso el ° (Lo muestra incorrectamente en pantalla)
Utilizo free pascal, lazarus. Con el sistema operativo Windows.
¿Qué modificación le harías al código?

Casimiro Notevi

03-04-2014 20:33:24

Bienvenido a clubdelphi, ¿ya leiste nuestra guía de estilo?, gracias por tu colaboración :)

Recuerda poner títulos descriptivos a tus preguntas, gracias.

MAXIUM

03-04-2014 22:52:47

Debes usar la función AnsiToOem en las frases o palabras que lleven tildes cuando tu salida sea tipo consola

http://blog.kassebaum.eu/?p=13

bit	10-04-2014 00:18:39

Gracias por la respuesta.
Sin embargo he encontrado otra forma.
Utilizo para escribir los tildes -->ASCII.

MAXIUM

10-04-2014 04:26:10

Claro, pero en ese caso deberias aprenderte dichos códigos.

Mi idea era que pudieras leer sin problemas las palabras con tilde en el código fuente y a la vez la salida por línea de comando.

Casimiro Notevi

10-04-2014 10:19:55

Cita:

Empezado por bit (Mensaje 474981)

Utilizo para escribir los tildes -->ASCII.

Y a los que usen tu programa, ¿les darás una tabla escrita con los códigos? ;)

La franja horaria es GMT +2. Ahora son las 15:00:49.