Question

delphi中使用sql 语句进行日期比较有问题

首先是继承了一个窗体模板
然后是做了两个datetimepicker打算走SQL做查询
代码如下

procedure TF_cwtj1.Button3Click(Sender: TObject);
begin
inherited;
with F_database.ADOQuery_cwtj1 do
begin
close;
SQL.Clear;
Parameters.ParamByName('a').Value:=formatdatetime('yyyy-mm-dd',F_cwtj1.DateTimePicker1.Date);
parameters.ParamByName('b').Value:=formatdatetime('yyyy-mm-dd',F_cwtj1.DateTimePicker2.Date);
sql.Add('select * from danyy where t1_date bewteen and :b');
open;
end;

end;

如果不用parameters转换直接走sql.add也是数据库报错
不知SQL中的datetime如何用在delphi中的数据库查询里面
望赐教
2L，我复制的时候忘掉:a了，补全了也是不行的
1L，暂时还不行，我再试试吧，多谢两位了

Answer 1

datetime类型只需要 between a and b

关键是你的sql.Add('select * from danyy where t1_date bewteen and :b');
少了一个:a.

遇到这种错误，要用个语句输出最终的sql语句，看看直接在数据库中运行有没有错，一般就能查出问题来了。

Answer 2

procedure TF_cwtj1.Button3Click(Sender: TObject);
begin
inherited;
with F_database.ADOQuery_cwtj1 do
begin
close;
SQL.Clear;
sql.Add('select * from danyy where t1_date bewteen ''' +formatdatetime('yyyy-mm-dd',F_cwtj1.DateTimePicker1.Date)
+ '''' +'and '''+formatdatetime('yyyy-mm-dd',F_cwtj1.DateTimePicker2.Date+'''');
open;
end;

end;