Pesquisa parametrizada com ZQuery não obedece sinal de =

Delphi

18/07/2013

Se coloco o código direto no componente ZQuery da paleta ZEUS a pesquisa Funciona.
Exemplo:
SELECT CodUH, DataBilhete, HoraBilhete, Valor, Descricao from radbilhete where DataBilhete >= 16/07/2013 and Databilhete <= 18/07/2013 )

Já no código abaixo os valores que são iguais as datas não são apresentado. Apenas os que estão entre as datas;
Veja o código:

begin
    DtmCadastro.QPesquisaBilhete.Active := False;
    DtmCadastro.QPesquisaBilhete.SQL.Clear;
    DtmCadastro.QPesquisaBilhete.SQL.Add('SELECT CodUH, DataBilhete, HoraBilhete, Valor, Descricao from radbilhete');
    DtmCadastro.QPesquisaBilhete.sql.add('where DataBilhete >= :data2 and Databilhete <= :data3');
    DtmCadastro.QPesquisaBilhete.SQL.add('ORDER BY CodUH');
    DtmCadastro.QPesquisaBilhete.Params.ParamByName('data2').AsString:=FormatDatetime('YYYY.mm.dd',DateTimePicker2.Date);
    DtmCadastro.QPesquisaBilhete.Params.ParamByName('data3').AsString:=FormatDatetime('YYYY.mm.dd',DateTimePicker3.Date);
    DtmCadastro.QPesquisaBilhete.Open;
    DtmCadastro.QPesquisaBilhete.Active:=true;
    Label1.Caption := 'Total de bilhetes: ' + IntToStr(DtmCadastro.QPesquisaBilhete.RecordCount);
  end;


Alguém já passou por isso e pode me ajuda.
Serei muito agradecido.
Abraço a todos.

Geovanny Araújo

Geovanny Araújo

Curtidas 0

Respostas

William

William

18/07/2013

Colega experimente colocar a barra "/" e mudar os parâmetros na função FormatDateTime():

DtmCadastro.QPesquisaBilhete.Params.ParamByName('data2').AsString:=FormatDatetime('dd/mm/YYYY',DateTimePicker2.Date);
DtmCadastro.QPesquisaBilhete.Params.ParamByName('data3').AsString:=FormatDatetime('dd/mm/YYYY',DateTimePicker3.Date);


Levando em consideração que o seu exemplo está formatado com dd/mm/yyyy, faça um teste.
GOSTEI 0
POSTAR