日期比较求救！

Question

filter:='日期字段<'datetimepicker1.datetime且小于datetimepicker2.datetime这种情形，这个语句要怎么写？

Answer 1

你用SQL语句写不行吗
between datetimepicker1.datetime and datetimepicker2.datetime
就行了

Answer 2

用这种的老兄能不能指导一下啊？
而且我是用adotable,adoquery这个我不懂连接啊，
所以请各位老兄！！！

Answer 3

用过滤事件!
procedure TForm1.ADOTable1FilterRecord(DataSet: TDataSet;
  var Accept: Boolean);
begin
  Accept := 
end;

Answer 4

需要设一个变量如 D：Tdatetime,  初始化后可以比较大小，
var D：Tdatetime,
begin
  D:=now;
  if d>strtodatetime(formatdatetime('yyyy''-''mm''-''dd'' ''hh:mm:ss',time)) then
   ......
end;strtodatetime(formatdatetime('yyyy''-''mm''-''dd'' ''hh:mm:ss',time)) 只是一个特例，你可以将它换成如strtodatetime(edit1.text);也可以~~~~~~

Answer 5

老兄，accept这里面怎么写啊？像底下
accept:=adotable1.FieldByName('hendtime').AsDateTime>datetimepicker1.DateTime and adotable1.FieldByName('hendtime').AsDateTime<datetimepicker2.DateTime
应该怎么改？

Answer 6

between datetimepicker1.datetime and datetimepicker2.datetime

Answer 7

adotable1.filter:='日期字段>='''+datetostr(datetimepicker1.datetime)+''''+' and 日期字段<='''+datetostr(datetimepicker2.datetime)+''''; 

Answer 8

accept:=(adotable1.FieldByName('hendtime').AsDateTime>datetimepicker1.DateTime) and (adotable1.FieldByName('hendtime').AsDateTime<datetimepicker2.DateTime);
试试看,我没测试,不过应该是这样用!

Answer 9

filter:='日期字段<'+formatdatetime('yyyy-mm-dd',datetimepicker1.datetime) and 
'日期字段>'+formatdatetime('yyyy-mm-dd',datetimepicker2.datetime);