Ver Mensaje Individual
  #1  
Antiguo 17-04-2008
Avatar de NeySmall
NeySmall NeySmall is offline
Registrado
 
Registrado: abr 2008
Ubicación: Zacatecas, México
Posts: 7
Reputación: 0
NeySmall Va por buen camino
Question Ayuda con una consulta de MySQL desde Delphi con ZeosLib...!!

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...!
Responder Con Cita