Como guardar archivos

[herodes]

Hola a todos quisiera saber como es que se guardan los datos de una CRDBGrid (luego de ejecutada una consulta) mediante la accion de un click en mi disco C con un nombre determinado.

gracias.

[vtdeleon]

Saludos.

No entiendo!!! confused

Que componentes usas para conectarte a la base de datos? table, querry, ADO, DB Express, IB???????

[jachguate]

mediante la accion de un click en mi disco C

Cuidado, si le das muy fuerte el clic al disco, este puede quedar inservible.. :D

[Lepe]

Hola herodes.

La idea es crear un string que sea todos los datos de 1 registro separados por coma (para ello uso la variable UnRegistro), despues de construir toda la linea, la añado al archivo.


var
UnRegistro, Archivo:TStringList
begin
UnRegistro := Tstringlist.create;
Archivo := Tstringlist.Create;
tabla.First;
while not tabla.eof do
begin
UnRegistro.clear;
Unregistro.Add(campo1.Asstring);
Unregistro.Add(campo2.Asstring);
....
Archivo.add (unregistro.CommaText);
// guardamos un registro entero separado por comas

tabla.next;
end;
Archivo.Savetofile('c:\datos.txt')
end;
archivo.free;
UnRegistro.free;


Para cargar los datos tienes que hacer el proceso contrario.
-Cargar todo el archivo en la variable Archivo
- Asignar UnRegistro.Commatext := Archivo[i];

Si usas un DBgrid, no podrás cargar los datos desde el archivo, quizás sea más rápido hacerlo a un STringGrid

Saludos