Ver Mensaje Individual
  #7  
Antiguo 07-05-2007
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Reputación: 25
Caral Va por buen camino
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
Responder Con Cita