PDA

Ver la Versión Completa : Guardar un StringGrid


DarkDrakon
24-10-2006, 22:47:58
Hola amigos Foristas ... Bueno aqui nuevamente con una duda :p, bueno lo que pasa es que tengo una aplicacion casi terminada, pero lo que me falta es guardar todos los datos de un StringGrid en un Archivo aparte (ejm. en tun .txt). Bueno puedo guardarlo de una manera desordenada (todas las celdas en una sola columna) pero bueno quisiera saber si se puede guarad el StringGrid, pero tal como se ve :rolleyes: , se que se debe poder ... solo que no he podido encontrar la forma.

Ah tambien necesito abrir (por ejm. de un .txt) y mostrarlo en un StringGrid, no se si me puedan ayudar... Gracias de Antemano :)

Enan0
24-10-2006, 23:04:48
Mirate este linck!! espero que te sirva saludos


http://www.greatis.com/delphicb/tips/lib/components-stgrid2file.html

seoane
24-10-2006, 23:37:56
Aquí tienes otra forma de hacerlo:


// Para guardar
var
i: integer;
begin
with TStringList.Create do
try
for i:= 0 to StringGrid1.RowCount - 1 do
Add(StringGrid1.Rows[i].CommaText);
SaveToFile('d:\1.txt');
finally
Free;
end;
end;


//Para recuperar
var
i: integer;
begin
with TStringList.Create do
try
LoadFromFile('d:\1.txt');
StringGrid1.RowCount:= Count;
for i:= 0 to Count - 1 do
StringGrid1.Rows[i].CommaText:= Strings[i];
finally
Free;
end;
end;

Enan0
25-10-2006, 00:35:46
seoane, Realmente la forma que has puesto es realmente muchisimo mas facil de interpretar e implmentar.

Pregunta de Ignorante, (y porque no tengo delphi a mano para probar)
"CommaText" Te devuelve toda la Fila separada, como dise su nombre, por Comas?

seoane
25-10-2006, 00:48:37
Pregunta de Ignorante, (y porque no tengo delphi a mano para probar)
"CommaText" Te devuelve toda la Fila separada, como dise su nombre, por Comas?

Si, es una propiedad de TStrings que devuelve todas las strings en una sola, separadas por comas. También es interesante, si no la conocías, la propiedad DelimitedText que hace lo mismo, pero permite escoger el carácter separador con la propiedad Delimiter.

DarkDrakon
25-10-2006, 01:56:21
Gracias a todos por responder ... aclararon mis dudas :p . Bueno a implementar ... ya despues tal vez ponga aqui la aplicacion que desarrolle gracias a sus consejos :p