Delphi - registros y matrices en delphi

 
Vista:

registros y matrices en delphi

Publicado por el novato (28 intervenciones) el 24/05/2005 00:58:45
hola amigos tengo otraaa duda miren, yo declaro mi registro de la siguiente forma

datos=record
nombre,apellidos,localidad:string;
end;


ahora declaro mi array

datos_alumnos:array[1..10] of datos;


ahora si yo quisiera guardar todo el contenido del array en un fichero como lo hago

la parte que me interesa es esta

Writeln(fichero,---"contenido de array"----)//fichero es la variable de tipo fichero

donde "contenido de array" es la sintaxis necesaria para almacenar lo que contiene el arreglo

saludos a todos

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:registros y matrices en delphi

Publicado por [email protected] (213 intervenciones) el 24/05/2005 03:01:51
Bueno, si "fichero" es un "file of datos": write(fichero,Arreglo[i]);
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:Hellppppppppp!!!!registros y matrices en delphi

Publicado por el novato (28 intervenciones) el 24/05/2005 23:27:44
El problema es que mi arreglo de tipo Datos (que fue el registro que declare anteriormente)

ya lo probe asi wrileln(fichero,arreglo[i]) pero me dice que hay un error esto si me funciona cuando el arreglo es String pero recuerden que el mio es de tipo datos que es el nombre que le di al registro declarado con anterioridad

saludos a todos
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:Hellppppppppp!!!!registros y matrices en delphi

Publicado por [email protected] (213 intervenciones) el 25/05/2005 23:21:27
...Por eso... Lo que digo es que uses Wirte y no Writeln. Creo que ahí podría estar el problema.
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:registros y matrices en delphi

Publicado por beosman (163 intervenciones) el 26/05/2005 10:01:54
El problema es que se debe usar write en lugar de writeln pero además, en los registros, para poder guardarlos en un archivo, hay que ponerles límite de tamaño a los campos que contiene, es decir:

type datos = record
nombre: string[255];
apellidos: string[255];
localidad: string[255];
end;

Para luego declarar la variable F: file of datos; y escribir en ella con write(f,datos_alumnos[i]);

Saludos.

Diego :: beosman
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:Aun si..registros y matrices en delphi

Publicado por el novato (28 intervenciones) el 28/05/2005 01:21:47
miren mi codigo

type
datos=record;
nombre:string[255;]
apellidos:string[255];
localidad:string[255];
end;

implemetation
datos_alumnos:array[1..10] of datos;

procedure
var
fichero:textfile;
i:integer;
begin
i:=i+1;
with datos_alumnos[i] do
begin
nombre:=edit1.text;
apellido:=edit2.text;
localidad:=edit3.tex;
end

assingfile(fichero,'novato.txt');
append(fichero);
write(fichero,datos_alumnos[i])
flush
closefile(fichero)

end

asi es como debe funcionar,me pero no es asi por favor miren a ver de que form a es posible hacer lo que yo quiero

saludos a tods mis amigos de la web del programador
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:Aun si..registros y matrices en delphi

Publicado por Diego Romero (636 intervenciones) el 28/05/2005 02:37:00
No puedes guardar una estructura de datos tal como un array en un textfile, es lo que te han estado diciendo los otros dos foristas.
procedure
var
fichero: file of datos; // este es el tipo correcto para el archivo
i:integer;
begin
i:=i+1;
with datos_alumnos[i] do
begin
nombre:=edit1.text;
apellido:=edit2.text;
localidad:=edit3.tex;
end

assingfile(fichero,'novato.dat');
reset(fichero); // se abre el archivo (debe existir)
write(fichero,datos_alumnos[i])
flush
closefile(fichero)

end
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:todavia no opti..registros y matrices en delphi

Publicado por el novato (28 intervenciones) el 30/05/2005 00:13:00
amigos el problema es que asi me funciona pero los datos se guardan regados
hay alguna manera de ordenarlos y cuando lo cargo en un memo sigue todo desordenado
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:todavia no opti..registros y matrices en delphi

Publicado por Diego Romero (636 intervenciones) el 30/05/2005 01:25:51
¿Qué significa que los datos están "regados"?, ¿quieres decir "desordenados"?, si es eso, pues lee el archivo cargándolo en una lista (objeto TList) y aplícale un método de ordenación y ya está.
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