一个关于计算天数的问题

例如2004-3-3，2004-4-5，怎样能计算出这两个日期之间相差的天数呢

解决方案 »

  1.   

    var
      Date1, Date2: TDateTime;
      MinuesDate: Integer;
    begin
      MinuesDate := Abs(Trunc(Date2 - Date1));
    end;
      

  2.   

    daysbetween(strtodate('2004-3-3'),strtodate('2004-4-5'))
      

  3.   

    uses DateUtils;function DaysBetween(const ANow, AThen: TDateTime): Integer;
      

  4.   

    uses DateUtils;function DaysBetween(const ANow, AThen: TDateTime): Integer;