ayuda con lectura de archivos!!!
Publicado por lucman (7 intervenciones) el 02/02/2005 20:04:07
ayuden pleeeeeeeeassssse! resulta q estoy haciendo un programa y cree un procedimiento q se llama LEER
es el siguiente
PROCEDURE LEER(Var Archivo:tipoarchivo; Var egistro:TipoRegistro; Var Fin:boolean);
Begin
IF Not EOF (Archivo) then
read(Archivo,Registro)
ELSE
Fin:=True;
End;
la cosa q el programa me compilaba lo mas bien y luego de desarrollar unos procedimientos y funciones entres los cuales hay: funcion de busqueda binaria en un vector, procedimiento de busqueda binaria en un archivo y la carga de una matriz, me dejo de andar y me tira el siguiente error de compilacion. Creo q es el error 44 que dice q no puede leer del disco. O sea el programa se ejecuta pero cuando pongo una opcion q tiene q trabajar con la variable Archivo se me cuelga y dice ese error mencionado anteriormente. Desde ya muchas gracias xq me estoy volviendo loco. Andaba todo bien. No se que paso y revise de todo. No se me ocurre nada! Gracias
es el siguiente
PROCEDURE LEER(Var Archivo:tipoarchivo; Var egistro:TipoRegistro; Var Fin:boolean);
Begin
IF Not EOF (Archivo) then
read(Archivo,Registro)
ELSE
Fin:=True;
End;
la cosa q el programa me compilaba lo mas bien y luego de desarrollar unos procedimientos y funciones entres los cuales hay: funcion de busqueda binaria en un vector, procedimiento de busqueda binaria en un archivo y la carga de una matriz, me dejo de andar y me tira el siguiente error de compilacion. Creo q es el error 44 que dice q no puede leer del disco. O sea el programa se ejecuta pero cuando pongo una opcion q tiene q trabajar con la variable Archivo se me cuelga y dice ese error mencionado anteriormente. Desde ya muchas gracias xq me estoy volviendo loco. Andaba todo bien. No se que paso y revise de todo. No se me ocurre nada! Gracias
Valora esta pregunta


0