• Jueves 28 de Marzo de 2024, 15:01

Autor Tema:  Problema Fichero/registros  (Leído 2058 veces)

gladiator96

  • Nuevo Miembro
  • *
  • Mensajes: 9
    • Ver Perfil
Problema Fichero/registros
« en: Domingo 2 de Diciembre de 2007, 01:40 »
0
Hola os cuento, estoy haciendo un programa que tiene un registro  "registroalumno" y el usuario tiene que ir introduciendo lo que se le pide y al final tiene que guardarse en un fichero(binario), pero no consigo que funcione, me compila perfectamente pero cuando termina el programa me sale un error "Runtime error" y nose porque :S si me podeis ayudar :S

Aqui dejo el código.

Gracias de antemano ^^!


Código: Text
  1.  
  2. Program binario;
  3.  
  4. type
  5.  
  6. Registroalumno = record
  7.  
  8.     nombre:string;
  9.     apellido:string;
  10.     ciudad:string;
  11.     curso:integer;
  12.    
  13.     end;
  14.  
  15. var
  16.  
  17. alumnobin : file of Registroalumno;
  18. Alumno:Registroalumno;
  19.  
  20. (*Comienza el programa*)
  21.  
  22. Begin
  23.  
  24. Assign(alumnobin,'/home/jaime/Desktop/alumno.txt');
  25. rewrite(alumnobin);
  26.  
  27.  
  28. writeln('Introduzca el nombre del alumno :');
  29. readln(alumno.nombre);
  30.  
  31. writeln('Introduzca el apellido del alumno :');
  32. readln(alumno.apellido);
  33.  
  34. writeln('Introduzca la ciudad del alumno :');
  35. readln(alumno.ciudad);
  36.  
  37.  
  38. writeln('Introduzca el curso del alumno:');
  39. readln(alumno.curso);
  40.  
  41. write(alumnobin,alumno);
  42.  
  43. writeln;
  44.  
  45. writeln('*** Creacion de alumnobin completada ***');
  46.  
  47. close(alumnobin);
  48.  
  49. End.
  50.  
  51.  

-DriverOp-

  • Miembro activo
  • **
  • Mensajes: 81
    • Ver Perfil
Re: Problema Fichero/registros
« Respuesta #1 en: Domingo 2 de Diciembre de 2007, 03:02 »
0
¿Estás seguro que el path que está en Assign es correcto?.

gladiator96

  • Nuevo Miembro
  • *
  • Mensajes: 9
    • Ver Perfil
Re: Problema Fichero/registros
« Respuesta #2 en: Domingo 2 de Diciembre de 2007, 11:54 »
0
si, el archivo alumno.txt se crea en el escritorio pero cuando lo abro está vacio o.O

-DriverOp-

  • Miembro activo
  • **
  • Mensajes: 81
    • Ver Perfil
Re: Problema Fichero/registros
« Respuesta #3 en: Domingo 2 de Diciembre de 2007, 22:34 »
0
Pon el mensaje de error completo.

gladiator96

  • Nuevo Miembro
  • *
  • Mensajes: 9
    • Ver Perfil
Re: Problema Fichero/registros
« Respuesta #4 en: Miércoles 5 de Diciembre de 2007, 19:33 »
0
Código: Text
  1. Runtime error 106 at $08048236
  2.   $08048236
  3.   $0804809F
  4.  
  5.  

este es el nensaje :s

-DriverOp-

  • Miembro activo
  • **
  • Mensajes: 81
    • Ver Perfil
Re: Problema Fichero/registros
« Respuesta #5 en: Miércoles 5 de Diciembre de 2007, 20:24 »
0
Quizá esto te de una pista de lo que está pasando:
http://www.driverop.com.ar/vertperr.php?num=run106