一个简单问题，马上结贴！！！

Question

delphi中的两个日期如何比较大小。谢谢各位了。

Answer 1

日期是以浮点数保存的，因此可以直接比较。
If DateTime1>DateTime2 then
beginend;

Answer 2

var
dt1,dt2:TDateTime;
begin
   dt1:=Now();
   dt2:=Now()+30.00*(1.00/(1.0*24.0*60)) //加30分钟
   if dt2>dt1 then
   begin
     //
   end;
end;

Answer 3

直接比较就可以了。因为它也是float类型
if Date1>Date2 then
begin
 ......
end;

Answer 4

if (trunc(date1)-trunc(date2)) > 0 then
begin
end;