！！！在线等待一个关于日期的函数。已知一个日期，如何获取下一天日期？？

！！！在线等待一个关于日期的函数。已知一个日期，如何获取下一天日期？？

解决方案 »

  1.   

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

  2.   

    function IncDay(const AValue: TDateTime; const ANumberOfDays: Integer = 1): TDateTime;
    直接加1肯定不行
      

  3.   

    同意楼上的,直接加一就行了
    var
      vardate:TDateTime;
    begin
      varDate:=date+1;
    end;
      

  4.   

    Datetime类型直接＋1就行了，＋0.5就是＋12小时，以此类推