seras bueno en delphi para para que se te reconozca no te averguences de ayudar a los demas que estoy seguro que cuando lo necesites seran tu ayuda mas proxima, en fin tu ejemplo me ayudo espero que este texto te ayude a ti.
Juan
Cita:
Empezado por seoane
Casi me da verguenza sugerir algo tan simple , pero puede que te sirva:
Código Delphi [-]
procedure Guardar(Archivo: String; Grid: TStringGrid);
var
i: integer;
begin
with TStringList.Create do
try
for i:= 0 to Grid.RowCount - 1 do
Add(Grid.Rows[i].CommaText);
SaveToFile(Archivo);
finally
Free;
end;
end;
// Por ejemplo
Guardar('C:\Archivo.txt',StringGrid1);
|