Programación General > Pascal

 Problema Fichero/registros

(1/2) > >>

gladiator96:
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 --- Program binario; type Registroalumno = record     nombre:string;    apellido:string;    ciudad:string;    curso:integer;        end; var alumnobin : file of Registroalumno;Alumno:Registroalumno; (*Comienza el programa*) Begin Assign(alumnobin,'/home/jaime/Desktop/alumno.txt');rewrite(alumnobin);  writeln('Introduzca el nombre del alumno :');readln(alumno.nombre); writeln('Introduzca el apellido del alumno :');readln(alumno.apellido); writeln('Introduzca la ciudad del alumno :');readln(alumno.ciudad);  writeln('Introduzca el curso del alumno:');readln(alumno.curso); write(alumnobin,alumno); writeln; writeln('*** Creacion de alumnobin completada ***'); close(alumnobin); End.  

-DriverOp-:
¿Estás seguro que el path que está en Assign es correcto?.

gladiator96:
si, el archivo alumno.txt se crea en el escritorio pero cuando lo abro está vacio o.O

-DriverOp-:
Pon el mensaje de error completo.

gladiator96:

--- Código: Text ---Runtime error 106 at $08048236  $08048236  $0804809F  
este es el nensaje :s

Navegación

[0] Índice de Mensajes

[#] Página Siguiente