Pascal/Turbo Pascal - ayuda para leer de un archivo de tipos

 
Vista:

ayuda para leer de un archivo de tipos

Publicado por Diana (1 intervención) el 13/05/2001 17:48:24
Soy una principiante,el problema es que nose cómo leer de un archivo de tipos de tal forma que cada dato que lea del fichero me lo guarde en una lista enlaza en clas variables que he declarado,adjunto un trozo de código:

PROCEDURE crear_solicitudes(var f_alum:falumnos;varpunt_ca,punt_fi:tpuntero);
var
datos:alumnos;
punt_aux:tpuntero;

begin
new(punt_ca);
reset(f_alum);
seek(f_alum,0);
read(f_alum,datos.apell1);
read(f_alum,datos.apell2);
writeln(datos.apell1);
writeln(datos.apell2);
end;
BEGIN{ppal]
assign(fich_alum,'c:\diana\falum.dat');
crear_solicitudes(fich_alum,punt_cabeza,punt_final);
end.

cuando escribe por pantalla la variable apell1 me escribe todo el registro entero;nombre apellidos,dni..todo en una variable como puedo leerlo para que me lo vaya guardando por registros dentro de una lista???
por favor es urgente,muchas gracias
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:ayuda para leer de un archivo de tipos

Publicado por Diego Romero (1 intervención) el 13/05/2001 21:50:30
¿Cómo fue declarado el registro del archivo?.
Ambos, el registro del archivo y la parte de datos de la lista enlazada deben coincidir para que cada campo almacenado en el archivo se coloque en el lugar adecuado en el registro de la lista.
Algo asi.
tpuntero=^tlista;
tregistro=record
dato1=string;
dato2=string;
end;
tlista=record
datos=tregistro;
sig=tpuntero;
ant=tpuntero;
end;
var
lista:tlista;
archivo: file of tregistro;
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

RE:ayuda para leer de un archivo de tipos

Publicado por ALAIN RABEL JIMENEZ ROMAN (1 intervención) el 18/05/2001 20:27:16
PARA ABRIR CUALQUIER TIPO DE ARCHIVO DE CUALQUIER EXTENSION, SOLO NO DEBES
NI DE PONER EL NOMBRE NI LA EXTENSION, SINO CAPTURAR DICHOS DATOS EN UNA
CADENA DE CARACTERES, EL NOMBRE.EXTENSION, EL ARCHIVO LO BUSCARA EN EL
DIRECTORIO ACTUAL Y EN CASO DE ENCONTRARLO LO ABRIRA.

AHORITA NO CUENTO CON EL CODIGO, PERO SI QUIERES QUE TE LO PASE, NADA MAS
ENVIAME UN MAIL.
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