Ver Mensaje Individual
  #1  
Antiguo 14-10-2010
Lenny Lenny is offline
Miembro
 
Registrado: jun 2007
Posts: 161
Reputación: 17
Lenny Va por buen camino
Question Copiar todo el resultado de un Filtro (DBGrid) en Tabla

Bueno, esa es la pregunta, si pudieran darme una mano, Como puedo copiar el resultado de un filtro (Almacenado en un DBGrid) a la base de datos??? Necesito filtrar productos asociados a una OT y estos copiarlos a otra tabla y eventualemnte borrar el contenido del filtro, para copiar un solo registro simepre lo hago asi:


Código Delphi [-]
procedure TOTrabajo.Button4Click(Sender: TObject);
begin
  if Application.MessageBox('La orden de Trabajo será enviada a Producción.','PRODUCCION',mb_Ok +
  mb_IconQuestion)= idOk then
BDatos.TOTPENDIENTE.Insert;
BDatos.TOTPENDIENTE.FieldbyName('OT').AsString := BDatos.TOTHISTORICO.FieldbyName('OT').AsString;
BDatos.TOTPENDIENTE.FieldbyName('RUT').AsString := BDatos.TOTHISTORICO.FieldbyName('RUT').AsString;
BDatos.TOTPENDIENTE.FieldbyName('CLIENTE').AsString := BDatos.TOTHISTORICO.FieldbyName('CLIENTE').AsString;
BDatos.TOTPENDIENTE.Post;
BDATOS.TOTPRODUCCION.Refresh;

end;
Hay alguna forma de recorrer todo el DBGrid (Previamente Filtrado) y copiar a una tabla solo el contenido de este??? y eventualente borrar el contenido del DBGrid????De antemano muchas gracias... espero no estar abusando... PD Utilizo Delphi 2010, Zeos y MySQL
Responder Con Cita