formatdatetime问题

Question

if formatdatetime('yyyy.mm.dd',date1)>formatdatetime('yyyy.mm.dd',date2) then
   begin
      //Timer1.Interval :=18000000;
      //daystatistic;
      //manNotice;
      //Timer1.Interval :=60000;
   end;
请问这样可以比较吗？

Answer 1

那我该怎么比较呢？
上述的date1和date2都是Tdatetime类型，那我可以直接比较吗，就是不用在通过formatdatetime函数了。
if date1>date2 then这样直接比较可以吗？

Answer 2

我手上有一段程序：（数据库是sqlserver2000）
   date1,date2:Tdatetime;
   ADOQuery1.close;
   ADOQuery1.SQL.text:='select getdate()';
   ADOQuery1.open;
   date1:=ADOQuery1.Fields[0].asdatetime;
   ADOQuery1.close;
   ADOQuery1.SQL.text:='select rjday from systemparam';
   ADOQuery1.open;
   date2:=ADOQuery1.Fields[0].asdatetime;
   ADOQuery1.Close;
   if formatdatetime('yyyy.mm.dd',date1)>formatdatetime('yyyy.mm.dd',date2) then
   begin
      Timer1.Interval :=18000000;
      daystatistic;
      manNotice;
      Timer1.Interval :=60000;
   end;
这个程序趋前可以运行，可是上面的兄弟说不可以比较，那么这个程序是不是有问题呀？有问题的话，可是它为什么还可以运行呢？

Answer 3

TDateTime就是Double类型，可以直接比较的！