如果你知道有incYear增加年，就应该想到2楼那样啊，呵呵 incYear(year,你增或减的年)！查帮助看它的函数，呵呵function IncYear(const AValue: TDateTime; const ANumberOfYears: Integer = 1): TDateTime;DescriptionIncYear returns the value of the AValue parameter, incremented by ANumberOfYears years. ANumberOfYears can be negative, to return a date N years previous.
就可以减少年份
incYear(year,你增或减的年)！查帮助看它的函数，呵呵function IncYear(const AValue: TDateTime; const ANumberOfYears: Integer = 1): TDateTime;DescriptionIncYear returns the value of the AValue parameter, incremented by ANumberOfYears years. ANumberOfYears can be negative, to return a date N years previous.