Ver Mensaje Individual
  #3  
Antiguo 14-10-2004
Avatar de gluglu
[gluglu] gluglu is offline
Miembro Premium
 
Registrado: sep 2004
Ubicación: Málaga - España
Posts: 1.455
Reputación: 21
gluglu Va por buen camino
Gracias, quetzal

No utilizo ninguna tabla o componente TTable. Lo que utilizo, tal y como se muestra en mi hilo es un TIBQuery, cuyo comando SQL está indicado en tiempo de diseño.

Por ello creo que debe de bastar con IBQuery2.Prepare e IBQuery2.Open

El DBGrid2 está asociado en tiempo de diseño al DataSource2, que a su vez está asociado al DataSet IBQuery2.

La cuestión, insisto, es que todo me funciona correctamente no sólo en tiempo de diseño, sino que de hecho lo que hago con el código indicado es cambiar de una base de datos a otra. Al abrir el Form la primera vez me muestra todo correctamente pero al intentar cambiar la base de datos con ese código, ya el DBGrid2 se queda en blanco.

De cualquiera de las maneras, ante la duda, he probado con el siguiente código añadido y tampoco nada.
Código Delphi [-]
IBDatabase2.Connected    := False;
IBDatabase2.DatabaseName := IBQuery1.FieldByName('DIRECTORY').Value + '\MASTERH.IB';
IBDatabase2.Connected    := True;
IBTransaction2.Active    := True;
IBQuery2.Prepare;
IBQuery2.Open;
DataSource2.DataSet      := IBQuery2;
DBGrid2.DataSource       := DataSource2;
DBGrid2.SetFocus;
Responder Con Cita