Fórum Consulta Data #36661

ola

voce me passou como faço para efetuar a consulta
mas tipo
esta dando erro

eu estou usando minhas consultas assim
procedure
data : tdate
begin
data := date;
dm.DSorc.Close;
dm.DSorc.SelectSQL.Clear;
dm.DSorc.SelectSQL.Add(´select * from orcamento where data =:´+(data));
dm.dsorc.Open;

entao da um erro
eu consegue consultar pelo delphi utilizando uma funcao

Function DataSQL(Data_TDate: TDateTime): String;
Begin
Result := QuotedStr(FormatDateTime(´mm/dd/yyyy´, Data_TDate));
End;

dm.DSorc.Close;
dm.DSorc.SelectSQL.Clear;
dm.DSorc.SelectSQL.Add(´select * from orcamento where data :´+ DataSQL( Data ) );
dm.dsorc.Open;

ai ele consulta mais nao consegui consultar

entre periodos

tipo assim
do dia 01/05/2003
a 31/05/2003

obrigado

ai no uso assim

Assim dá ...

dm.DSorc.Active := False;
dm.DSorc.SQL.Clear;
dm.DSorc.SQL.Text := ´select * from orcamento where data = :data´; dm.DSorc.Params[0].AsDateTime := Date;
dm.dsorc.Active := True;


T+