Pascal/Turbo Pascal - Consulta fácil

 
Vista:

Consulta fácil

Publicado por javi (6 intervenciones) el 29/03/2006 15:43:56
Buenas

Imagino que será una chorrada, pero no encuentro la forma de hacer un control de errores sobre un dato

El dato es un longint y quiero que si al pedir ese dato se introducen letras o algo q no sea un longint, de un mensaje de error. Como hago ese control de errores???
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Consulta fácil

Publicado por Allan Andrade (49 intervenciones) el 29/03/2006 17:42:49
Bueno yo no te voy a dar la respuesta entera si no solo la idea ya que aquí solo te ayudamos para que por ti mismo aprendas. ; )

Dicho eso pues la idea básica es que nada mas coloques un ioresult o comprobación de errores de entrada y salida con un IF algo así…

Si por ejemplo lo que necesitas es una variable de tipo entero (integer) y lo que el usuario introduce es un Carácter (char) o una cadena de caracteres (string), bueno as esto.

Var
Num : integer;

Write(‘Introduce un número : ’);
{$I-} <<----- Esto desactiva la comprobacion de errores.
Readln(num);
{$I+} <<----- Y esto las activa.
if ioresult<>0 then writeln(‘¡se introdujo un dato invalido!’);
^^^----- ioresult almacena el codigo de error (si ioresult = cero entonces todo bien)

y pues listo.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar