delphi有没有这样的时间函数?

假定当前日期为 
  2002-07-10
运行时间函数 qqq(240)  240为月数
得到要求的时间
  2012-07-10

解决方案 »

  1.   

    function IncMonth(const Date: TDateTime; NumberOfMonths: Integer = 1): TDateTime;
      

  2.   

    函数IncMonth可以完成你的要求,具体用法看帮助吧
      

  3.   

    帮助里写的很清楚了；incmonth
      

  4.   

    厉害阿
      
       佩服  学习ing
      

  5.   

    incmonth只增加一个月,而非240个
      

  6.   

    请关注http://expert.csdn.net/Expert/topic/1380/1380380.xml?temp=.1580774中我的回复，对我的时间函数提提意见，我很菜的