dbgrid y table1
 

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
      // posiciona el dataset de origen en "n" registro seleccionado
      TabGlobal.Dprograma.GotoBookmark(pointer(DBGrid3.SelectedRows.Items[Idx]));
     // mueve los datos del dataset de origen para destino aqui
      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

No dices como se llama la tabla temporal que está asociada al grid, y por ahí debes atacar el problema. Supongo se llama tblMemoria:

Código Delphi [-]
tblMemoria.First;
while not tblmemoria.eof do
begin
   copiar registros
end;

Saludos

mi tabla temporaria es CDS,
debo utilizar este mismo codigo que coloque?
gracias
saludos

Si.

Saludos