[TiammatMX]

Empezado por ecfisa

Hola tiammat.

No conozco el componente que mencionas pero, por si te pudiera servir de algo, te pongo un ejemplo de como podes copiar los registros seleccionados de un TDBGrid a otro usando Drag & Drop...

Tu solución, adaptada a éste componente:

Código Delphi [-]
procedure TfrmRubrosSIS.grdReporteDragDrop(Sender, Source: TObject; X, Y: Integer);
var
   iIndicador: Integer;
begin
   with TADOQuery.Create(Self) do
   try
      Connection := cnxConexion;
      with grdServicios, grdServicios.DataSource.DataSet do
      begin
         DisableControls;
         for iIndicador := 0 to SelectedList.Count -1 do
         begin
           GotoBookmark(SelectedList.Items[iIndicador]);
            with SQL do
            begin
               Clear;
               Add('INSERT INTO C_SIS_SS_AUXILIAR');
               Add(           '(C_SIS_CODIGO_MATRIZ');
               Add(           ',C_SIS_CLAVE_SIS');
               Add(           ',C_SIS_GENERO');
               Add(           ',E4_SERVICIO_ID');
               Add(           ',E4_SRV_DETALLE_ID)');
               Add(    'VALUES (');
               Add(             QuotedStr(cmbxReporte.Value));
               Add(         ','+QuotedStr(cmbxEtiquetaSIS.Value));
               Add(         ','+GetGenreLabel(cmbxEtiquetaSIS.Value));
               Add(         ','+QuotedStr(QryServiciosE4_SERVICIO_ID.AsString));
               Add(         ','+IntToStr(QryServiciosE4_SRV_DETALLE_ID.AsInteger));
               Add(           ')');
            end;
            ExecSQL;
         end;
         UnselectAll;
         EnableControls;
      end;
   finally
      Free;
   end;
   QryData001.Requery;
   QryServicios.Requery;
end;