Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Otros entornos y lenguajes > C++ Builder
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 12-03-2012
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Cita:
Empezado por lmpadron Ver Mensaje
Código:
ADOQuery1->Close();
ADOQuery1->SQL->Clear();
ADOQuery1->SQL->Add("INSERT INTO `equipo` (`id_equipo`,`nombre`,`sexo`,`edad`) VALUES "
				 "  ('" + DBGrid1->Columns->Items[0]->Field->Text + "'), "
                                 "  ('" + DBGrid1->Columns->Items[1]->Field->Text + "'), "
                                 "  ('" + DBGrid1->Columns->Items[2]->Field->Text + "');");
ADOQuery3->ExecSql();

ADOQuery1->Close();
ADOQuery1->SQL->Clear();
ADOQuery1->SQL->Add("SELECT * FROM `equipo`")
ADOQuery1->Open();

DBGrid2->DataSource->DataSet  = ADOQuery1;
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.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita
  #2  
Antiguo 12-03-2012
Avatar de lmpadron
lmpadron lmpadron is offline
Miembro
 
Registrado: feb 2009
Ubicación: Habana, Cuba
Posts: 204
Poder: 16
lmpadron Va por buen camino
Cita:
Empezado por ecfisa Ver Mensaje
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 !!!

Código:
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();
    }
}
__________________
Nunca esta de más volver a ver la "Guia de Estilo" o "La Otra Guia de Estilo". Recuerda siempre usar los "Tags" para una mejor legibilidad de tu código.


Cuando miras fijamente al abismo, este te devuelve la mirada


oo______ooo_____ooo_ooooooo_____ooo____oooooo____ooooooo______oooo____ooo____oo_
oo______oooo___oooo_oo____oo__oo___oo__oo____oo__oo____oo___oo____oo__oooo___oo_
oo______oo_oo_oo_oo_oo____oo_oo_____oo_oo_____oo_oo____oo__oo______oo_oo_oo__oo_
oo______oo__ooo__oo_oooooo___ooooooooo_oo_____oo_ooooooo___oo______oo_oo__oo_oo_
oo______oo_______oo_oo_______oo_____oo_oo____oo__oo____oo___oo____oo__oo___oooo_
ooooooo_oo_______oo_oo_______oo_____oo_oooooo____oo_____oo____oooo____oo____ooo_
________________________________________________________________________________
Responder Con Cita
  #3  
Antiguo 13-03-2012
LuisMiguel LuisMiguel is offline
Miembro
NULL
 
Registrado: mar 2012
Posts: 33
Poder: 0
LuisMiguel Va por buen camino
Excelente amigo, justo lo que necesitaba, muchas gracias a los 2.Un pequeño detalle es que aun no encuentro lo de la selección múltiple en el TDBGrid. En el ejemplo que puso Impadrom

Código:
if (DBGrid1->SelectedRows->Count != 0)
Siempre devuelve 0 y nunca entra al ciclo, y la propiedad multiselected que dice Casimiro Notevi no la encuentra en c++ builder 6, hice lo que recomendó ecfisa de


Código:
DBGrid1->Options = TDBGridOptions(DBGrid1->Options) << dgMultiSelect;
Pero me sigue dando el mismo problema de devolver 0 en

Código:
DBGrid1->SelectedRows->Count
Responder Con Cita
  #4  
Antiguo 13-03-2012
Avatar de lmpadron
lmpadron lmpadron is offline
Miembro
 
Registrado: feb 2009
Ubicación: Habana, Cuba
Posts: 204
Poder: 16
lmpadron Va por buen camino
Cita:
Empezado por LuisMiguel Ver Mensaje
(...)Un pequeño detalle es que aun no encuentro lo de la selección múltiple en el TDBGrid.
a ver si aquí lo ves mejor !!!!

Hola Luis Miguel la selección múltiple es una propiedad del TDBGrid y puedes definiría en el Object Inspector o en el runtime a través de código como te han indicado anteriormente. Para efectuar la selección debes dar click en una fila y después con el Ctrl apretado dar click en otra !!!

El código solo funcionará cuando exista multiselect o sea cuando halla mas de una fila seleccionada.

Saludos

Última edición por lmpadron fecha: 13-03-2012 a las 14:01:39.
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Pasar datos de un DBGrid a otro DBGrid lucas05 Varios 13 29-01-2015 21:52:50
Pasar registros desde un dbgrid a otro dbgrid con botones.. Vales08 Varios 17 21-11-2011 19:27:50
Pasar Datos De Dbgrid A Otro Helg17 Tablas planas 7 27-03-2009 10:16:37
Pasar lineas de in dbgrid a otro dbgrid look OOP 3 21-09-2007 23:16:29
Como extraer datos de un DBgrid a otro DBgrid mickey Conexión con bases de datos 13 29-01-2004 05:05:30


La franja horaria es GMT +2. Ahora son las 08:23:46.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi