Busqueda usando un DBLookupComboBox

[esimon]

Saludo para todos los del foro.

estoy tratando de hacer una busqueda usando un DBLookupComboBox, para mostral el resultado de esta busqueda en un DBGrisd, acontinuacion pongo las forma como lo hago.

este es el codigo del Query

SELECT * FROM Informacion_Convenio
WHERE Descripcion_Pais = :pPais
ORDER BY Descripcion_Pais

y este es el codigo del Boton

   Qry_Consulta_TipoAcuerdo.Close;
   Qry_Consulta_TipoAcuerdo.Parameters.ParamByName('pPais').VAlue := DBLokupComboBox1.Text;
   Qry_Consulta_TipoAcuerdo.Open;

[[maeyanes]]

Y tu duda es? Algún problema? Algún error?

Si no especificas exactamente cual es el problema, duda y/o error, no te podemos ayudar... a menos claro, que alguién en estos foros sea psiquico...



Saludos...

[esimon]

jajajajaja, gracias marcos por tu repuesta disculpame tiene razon,
el problema es que cuando preciono el boton del cual habla, en el DBGrisd no me prsenta nada.

[[maeyanes]]

Empezado por esimon

jajajajaja, gracias marcos por tu repuesta disculpame tiene razon,
el problema es que cuando preciono el boton del cual habla, en el DBGrisd no me prsenta nada.

Solo para verificar...

El TQuery está conectado con un TDataSource y este conectado al TDBGrid?



Saludos...

[[Caral]]

Hola
Acabo de consultar mi bolita magica y con un poco de incienzo (Del bueno), me parece extraño que en la consulta Sql pongas esto:

Código SQL [-]
SELECT * FROM Informacion_Convenio
WHERE Descripcion_Pais = Pais
ORDER BY Descripcion_Pais




Veo (En La Bolita) dos puntos extraños ? Que son ?
Creo deberia ser:

Código SQL [-]
SELECT * FROM Informacion_Convenio
WHERE Descripcion_Pais = pPais
ORDER BY Descripcion_Pais




o

Código SQL [-]
SELECT * FROM Informacion_Convenio
WHERE Descripcion_Pais = 'pPais'
ORDER BY Descripcion_Pais




Salvo que los dos puntos esten en el campo.
No se creo yo.
Saludos

[[maeyanes]]

La consulta está bien...

Cuando en una consulta SQL pones algo como :Variable, le estás diciendo que ahí vas a pasar un parámetro:

Código Delphi [-]
Query1.SQL.Add('select * from Tabla where Campo1 = :Valor');
Query1.Prepare:
Query1.ParamByName('Valor').AsString := 'México'; //  Aquí estoy poniendo un valor al parámetro "Valor"
Query1.Open;

Saludos...

[[Caral]]

Ves Siempre he dicho que esta bolita hay que cambiarla, se le escapan muchas cosas, la verdad si es asi, no veo en donde este el fallo, tendria que devolver el valor, lo que pasa es que se quiere el valor en un DBGrid, si no me equivoco, Donde esta este ? (Qry_Consulta_TipoAcuerdo) es el nombre de este ?, me parece que no. o falta informacion ?.
No se aqui aprendiendo, maestro
Saludos

[[Caral]]

Exacto Maeyanes.
El Query (Qry_Consulta_TipoAcuerdo) contiene la consulta sql, envia los parametros (Ya aprendi), los recibe y los traslada al dbgrid, que tiene que estar conectado al datasource (Conetado al query) que a su vez tiene que estar conectado al dbgrid, de lo contrario nunca vera nada el dbgrid.
Hay que verificar la conexion si la sentencia es la correcta.
Saludos

[esimon]

Gracias Caral por la sugerencia hice una consulta en Access y funciona de las dos formas, el problema esta en el codigo que pongo en el boton, el cual no veo que tiene de estraño para que no funciones.

[[Caral]]

Una de las cosas que te tienes que preguntar es si el campo pPais es String o compatible con el text del DBLokupComboBox1, osea campo tipo texto, porque de lo contrario deverias cambiar la sentencia del boton, en esa parte.
Saludos