Ayuda con una consulta de MySQL desde Delphi con ZeosLib...!!

[NeySmall]

Hola!
Que tal, muy buen día para todos y cada uno de ustedes.
Quisiera que me ayudaran con un código en Delphi, ya que tengo un problema.
Estoy usando ZeosLib beta 6, con Delphi 7, y MySQL 5.
El problema es el siguiente:
Quiero hacer una consulta con la propiedad TZQuery de ZeosLib, para después esa consulta mostrarla en un DBGrid, claro que para esto tengo que tener referenciados el TZConnection, el TZQuery, el TZTable, el DBGrid y el DataSource.
Los tengo perfectamente referenciados en la tabla de propiedades.

Este es el código que tengo:

Código PHP:

if (self.TxtPais.Text <> '')then
    begin
      self.PaisCliente:=self.TxtPais.Text;
 
      self.QueryClientes.SQL.Add('select * from CLIENTE where Pais =      
                                                        '+''''+PaisCliente+''''+'');
       self.QueryClientes.ExecSQL;
   
       self.QueryClientes.Active:=True;
       Self.ZTablaCliente.Active:=True;
       self.ZTablaCliente.Refresh; 


Esto es lo que tengo, pero no sé porque en el DBGrid, no me muestra sólo la seleccion que quiero. Me muestra todos los registros.

Tal vez me falte algo.

No sé.

¿Que me recomiendan...?

Gracias de antemano.

Saludos...!

[roman]

¿Por qué tienes un QueryClientes y un ZTablaClientes? Da la impresión de que tienes el DBGrid conectado a ZTablaCliente. De ser así, tienes que olvidarte de él y conectar el DBGrid (via el DataSource) a QueryClientes.

Otra cosa, no uses QueryClientes.ExecSQL, sino QueryClientes.Open.

// Saludos

[cascarrabias]

Roman tiene razon, lo que te debe estar pasando es que estas visualizando la info del ztable,, quitalo y solo deja el zquery!

[NeySmall]

Sip, eso era, tienen muchísima razón.

Esque me confundí con el TZQuery y el TZTable.

Pero sí, hice lo que me dijieron, y funcionó perfectamente...

Muchísimas gracias a los dos...

Saludos...!