[lmpadron]

Empezado por ecfisa

Hola Impadron.

Si no interpreto mál, ese código copia el registro actualmente seleccionado, pero no soporta el caso de una selección múltiple en el TDBGrid.

Un saludo.

Saludos Amigo ecfisa tiene toda la razón que descuidado soy y no solo eso, al correrlo descubrí también una serie de pequeños detalles que hubiesen vuelto loco a cualquiera jejejeje bueno aquí les dejo el código, esta vez soportando el Multiselect !!!

void __fastcall TForm1::Button1Click(TObject *Sender)
{
    String a;
    a = " ";
    ADOQuery2->Close();
    ADOQuery2->SQL->Clear();
    if (DBGrid1->SelectedRows->Count != 0)
    {
        for (int i = 0; i < DBGrid1->SelectedRows->Count; i++)
        {
               DBGrid1->DataSource->DataSet->GotoBookmark(DBGrid1->SelectedRows->Items[i].c_str());

			   a = a + " ('" + Edit1->Text + "'," // o cualquier otro lugar donde definas el número de equipo
                               "'" + DBGrid1->Columns->Items[0]->Field->Text + "')";
                           if (i != DBGrid1->SelectedRows->Count - 1){a = a + ",";}

        }
        ADOQuery2->SQL->Add("INSERT INTO equipo (equipo,integrante) VALUES " + a);
        ADOQuery2->ExecSQL();

        ADOQuery2->Close();
        ADOQuery2->SQL->Clear();
        ADOQuery2->SQL->Add("SELECT equipo.equipo, lista.nombre, lista.edad, lista.sexo FROM `prueba`.`lista` "
                                 " INNER JOIN equipo ON integrante = id_lista ORDER BY equipo.equipo");
        ADOQuery2->Open();
    }
}