万分火急，在Delphi当中有没有象VB中的DATEADD这样的函数！！！！

Question

没有DATEADD的函数  自己算不就行了 不会的在问  我在告诉你

Answer 1

Returns a date shifted by a specified number of months.UnitSysutilsCategorydate/time routinesfunction IncMonth(const Date: TDateTime; NumberOfMonths: Integer): TDateTime
;DescriptionIncMonth returns the value of the Date parameter, incremented by NumberOfMonths months.  NumberOfMonths can be negative, to return a date N months previous.If the input day of month is greater than the last day of the resulting month, the day is set to the last day of the resulting month.  The time of day specified by the Date parameter is copied to the result.

Answer 2

Delphi的日期时间形变量实际上是一个实数。
你可以自己作一个函数先decodedate,把月份加一后在encodedate返回

Answer 3

不好意思，回贴之前没有仔细看mytulip的帖子，
其实他的方法是最好的，而且我以前都没有注意到
这个函数.

Answer 4

Delphi中的日期是数值型的，直接相加就可以了，如果实在要，自己分解年月日(DecodeDate())然后写一个过程即可。增加月份有一个函数：IncMonth()；

Answer 5

NumberOfMonths参数也可以为负数~~