如何判断日期？谢谢各位啦

Question

var
  日期数据: Tdatetime;
...
if (日期数据 >= DateTimePicker1.datetime) and
   (日期数据 < DateTimePicker2.datetime) then
...

Answer 1

var  日期数据:datetime;   
    日期数据:=2002/2/6;
    时间1：=DateTimePicker1.DateTime;
    时间2：=DateTimePicker1.DateTime;    if 日期数据>=时间1 and <时间2 then 
    begin
      -------------
    end
    else
      -------------
    end;

Answer 2

var  时间1,时间2,日期数据:datetime;   
    日期数据:=table['日期字段'];
    时间1：=DateTimePicker1.DateTime;
    时间2：=DateTimePicker1.DateTime;    if (日期数据>=时间1) and (日期数据>=时间2) then 
...
 
 

Answer 3

var 时间1,时间2:datetime;
begin
时间1:=strtodatetime(DateTimePicker.text);
时间2:=strtodatetime(datetimepicker.text);  if 日期数据>=时间1 and <时间2 then 
    begin
      -------------
    end
    else
      -------------
    end;
end;