Ayuda con MYSQL y Zeos

[Muchachin]

Hola soy nuevo en el foro, e igual en delphi. Estoy comenzando a desarrollar una aplicacion en delphi 6.0 y estoy tratando de conectarme a una base de datos en mysql 5.0.22, ya logre conectarme a la base de datos usando los componentes de zeos.

Pero me gustaria si alguien me pudiera indicar un tutorial, manual o al menos ayuda en el uso adecuado del componente de zeos, para poder aprovecharlo al maximo.

Ya que aun no he buscado la forma correcta de hacer consultas en mi base de datos.

Gracias de antemano

[[Caral]]

Hola
Aqui:
http://www.terawiki.clubdelphi.com/
Hay un ejemplo de conexion a base de datos, tal vez te sirva.
[Ejemplo] Conexion Bases Datos. Zip
Saludos

[[AzidRain]]

La forma mas simple:

Pon un componente TZQuery, le asignas la conexion (que ya sabes como crearla) a un componenten TZConnection. Luego editas la propiedad SQL que es en donde vas a poner el codigo SQL que quieres que tu consulta ejecute. Para empezar puedes usar esto "SELECT * FROM NOMBRE_TABLA" que es muy general pero para practicar esta bien. Y tu query se comportará como una tabla "plana" la cual puedes manipular como se hace en aquellas.

[Muchachin]

Gracias, me sirvio el ejemplo.

Pero hay algo que aun no puedo hacer, agregar el contenido de un TEdit o un Combobox a mi consulta.

Esto es lo que estoy haciendo:

procedure TForm1.Button1Click(Sender: TObject);
begin
        ZQuery1.SQL.Add('SELECT * FROM datposte WHERE feccenso="'+Edit1.Text+'"');
        ZQuery1.Active;
        ZQuery1.ExecSQL;
end;

Cuando lo ejecuto me sale un aviso que dice que no encuentra un archivo
Source File Not Found: ZDbcMySqlUtils.pas

Y luego me manda un error de sintaxis de mysql, aunque dicha sentencia este correcta.

Si alguien sabe como solucionar esto o sabe donde conseguir ese archivo que me pide, se los agradeceria

[[Caral]]

Hola
feccenso es una fecha? o que?
Saludos

[[eduarcol]]

Prueba con esta instruccion

Código SQL [-]
        ZQuery1.SQL.Add('SELECT * FROM datposte WHERE feccenso=ar');
        ZQuery1.ParambyName('par').value := Edit1.Text;
        ZQuery1.Active;
        ZQuery1.ExecSQL;

Y respecto al file not found, prueba añadir la carpeta build del paquete de instalacion respectivo de zeos a ver si se soluciona.

//suerte

[[Caral]]

Hola
Suponiendo que sea una fecha:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
        ZQuery1.SQL.Add('SELECT * FROM datposte WHERE feccenso= '+DateToStr(Edit1.Text));
        ZQuery1.Active;
       ZQuery1.ExecSQL;
end;

Suponiendo que sea un numero (integer):

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
        ZQuery1.SQL.Add('SELECT * FROM datposte WHERE feccenso= '+IntToStr(Edit1.Text));
          ZQuery1.Active;
         ZQuery1.ExecSQL;
end;

Si fuera float:

Código Delphi [-]
WHERE feccenso= '+FloatToStr(Edit1.Text));

Y asi sucesivamente.
Saludos

[Muchachin]

Si feccenso es una fecha.

Ahorita reviso si me funciona tu codigo eduarcol

Gracias por su pronta respuesta.