Hola tuni.
Por favor como dice en nuestra
guía de estilo, realiza una sola pregunta por hilo.
Faltan muchos detalles para darte una respuesta concreta, pero básicamente para pasar los datos de un
TStringGrid a un
TDataSet, tenes que recorrer el primero por filas y columnas e ir guardando los valores de las celdas en el último.
Ejemplo:
Código Delphi
[-]
...
var
c, r : Integer;
begin
r := 0;
while r < StringGrid1.RowCount - 1 do
begin
DataSet.Insert;
for c := StringGrid1.FixedCols to StringGrid1.ColCount - 1 do
DataSet.Fields[c].AsString := StringGrid1.Cells[c, r];
DataSet.Post;
Inc(r);
end;
Saludos