Ver Mensaje Individual
  #1  
Antiguo 11-08-2011
Mir Mir is offline
Registrado
NULL
 
Registrado: ago 2011
Posts: 3
Reputación: 0
Mir Va por buen camino
Ampliar consulta en TQUERY

Hola chic@s soy nueva en Delphi y me gustaria haceros una consulta:

Tengo 2 DBGRIDS conectados cada uno con su ADOQRY y su DATASOURCE.
Cargo el DBGRID1 con sus valores y cuando hago click en un registro del DBGRID1 me aparece en el DBGRID2 los datos relacionados con el registro seleccionado en el DBGRID1.

El problema es que el DBGRID1 es MULTIPLESELECTION y si seleccionan otro registro del DBGRID1 tiene que aparecer en el DBGRID2 los nuevos valores + los anteriores.
El problema es que no sé como ampliar la consulta.

En el ADOQry2 TStrings tengo la Consulta: SELECT ..... WHERE (((PARAM.NOM)= :IDParam))

Esto es lo que utilizo para cargar el DBGRID2:
Código Delphi [-]
  ADOQry2.Close;
  ADOQry2.Parameters.ParamByName('IDParam').Value :=strParam;
  ADOQry2.Open;
Pero solo me carga los registros relacionados con el ultimo valor seleccionado

Tambien he probado:

ADOQry2 TStrings vacio.
Código Delphi [-]
 
  ADOQry2.Close; (no hagp clear pq quiero matener los valores previos)
  sSQL:= 'SELECT ...... FROM...WHERE (((PARAM.NOM)= :IDParam))';
  ADOQry2.SQL.Add(sSQL);
  ADOQry2.Parameters.ParamByName('IDParam').Value :=strParam;
  ADOQry2.Open;
Pero la segunda vez que ejecuto me da error.

Me podeis ayudar a solucionar esto? Muchisimas gracias por vuestra ayuda!!!

Última edición por ecfisa fecha: 11-08-2011 a las 18:32:14. Razón: ETIQUETAS [DELPHI] [/DELPHI]
Responder Con Cita