哪位大侠能帮我解决一下怎么用delphi实现查找某一时段内的数据

Question

如果要查询2009年4月1日到2009年4月20日的数据，用DELPHI语言应该怎么去实现？
我现在是定义了a,b,sqlstr三个为string类型，代码如下，不知哪们大侠能帮小弟改一下，或者直接把个源代码上来？
a:=datetostr(datetimepicker1.date);
b:=datetostr(datetimepicker2.Date);
sqlstr:='select * from 内部入库 where 入库日期>='+quotedstr(a);
sqlstr:=sqlstr+'and  入库日期<='+quotedstr(b);
adoquery1.Close;adoquery1.SQL.Text:=sqlstr;adoquery1.Open;

Answer 1

a:= FormatDateTime('YYYYMMDD',datetimepicker1.date); 
b:= FormatDateTime('YYYYMMDD',datetimepicker2.Date); sqlstr:='select * from 内部入库 where Convert(char(8),入库日期,112) between '+quotedstr(a)+'  and '+quotedstr(b); 
adoquery1.Close; 
adoquery1.SQL.Text:=sqlstr; 
adoquery1.Open;