Pascal/Turbo Pascal - Ayuda con Punteros!!!!

 
Vista:

Ayuda con Punteros!!!!

Publicado por Juan (2 intervenciones) el 28/05/2008 18:12:51
Hola a to@s!!!!!!!!

Tengo un gran problema y me gustaria que alguien me ayudara a resolverlo... weno aya va mi problema: ¿Como puedo guardar en un fichero .BIN una lista enlazada de punteros que esta formada por registros?

************************************************************
por ejemplo si quiero guardar este puntero:

TRegisEspe = ^Tespera;

Tespera = RECORD
nombre:string[15];
ciudad:strin[15];
sig:TRegisEspe;
END;
************************************************************

por favor repondanme, lo necesito. Gracias adelantadas.
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 con Punteros!!!!

Publicado por Dani (94 intervenciones) el 28/05/2008 18:34:21
La lista enlazada no es de punteros, sino de registros. Los punteros son los que unen un registro con otro.

Entonces, en el archivo, tienes que guardar los registros (FILE OF RECORD), teniendo dos procedimientos:

Uno para introducir los registros de la lista en el archivo (guargar)
Y otro para coger los registros del archivo uno a uno e irlos introduciendo en la lista (cargar)

Los punteros son direcciones de memoria, no se guardan en el archivo!!!

Un saludo
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 con Punteros!!!!

Publicado por Diego Romero (996 intervenciones) el 28/05/2008 18:35:55
Yo modificaría las declaraciones así:

TDatos=record
nombre:string[15];
ciudad:string[15];
end;

TRegisEspe = ^Tespera;

Tespera = RECORD
Datos: TDatos;
sig:TRegisEspe;
END;

TArchDatos=File of TDatos;

var
ArchDatos: TArchDatos;
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 con Punteros!!!!

Publicado por juan (2 intervenciones) el 28/05/2008 22:24:32
gracias a los dos me aveis aclarao bastante. muchas gracias
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