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;