Hola a todos, estoy utilizando el siguiente codigo:
Código Delphi
[-]
procedure TFormCprograma.Button1Click(Sender: TObject);
var
Idx :Integer;
begin
if DBGrid3.SelectedRows.Count > 0 then
begin
for Idx := 0 to DBGrid3.SelectedRows.Count-1 do
begin
TabGlobal.Dprograma.GotoBookmark(pointer(DBGrid3.SelectedRows.Items[Idx]));
Table1.Append;
Table1ALUMNOMATRI.Value := TabGlobal.Dprograma.alumnomatricula.Conteudo;
Table1ALUMNOID.Value := TabGlobal.Dprograma.alumnoID.Conteudo;
Table1ID.Value := CDS.Fields[0].Value;
Table1COD.Value := CDS.Fields[1].Value;
Table1EXERCICIO.Value := CDS.Fields[2].Value;
Table1TIEMPO.Value := CDS.Fields[3].Value;
Table1.Post;
end;
end;
end;
cargo en un dbgrid una tabla temporaria creada con un TClientDataSet (CDS),
solo que quiero salvar esa tabla temporaria en una tabla fisica(TABLE1).
con ese codigo solo salva el registro selecionado, y quiero salvar todo los registros que aparecen en el dbgrid.
hay alguna forma de recorrer y que selecione todos los registros para despues guardarlos en una tabla fisica?
gracias
guillermo