TDateTime类型怎样加减？

需求：一个TDateTime类型+n天（比如说27天）怎样得到一个TDateTime类型的变量
还有两个相减得到多少天？谢谢！

解决方案 »

  1.   

    result := yourDate + 27;//就是27天后
    result := YourDate- YourDate2;就是差多少天
      

  2.   

    TDateTime类型以天为1，如果要加一分钟，就加1/24/60
      

  3.   

    IncDay()
    IncMonth()
    IncYear()
      

  4.   

    uses DateUtils;function IncDay(const AValue: TDateTime; const ANumberOfDays: Integer = 1): TDateTime;
      

  5.   

    日期相减也可以用DaysBetween,返回整型uses DateUtilsvar s1,s2 :Tdatetime;
    begin
      s1 :=strtodatetime('2004-10-1');
      s2 :=strtodatetime('2004-10-28');
      showmessage(inttostr(DaysBetween(s1,s2)));
      

  6.   

    TDataTime类型就是Double类型，一天就是1，