delphi怎么进行日期加减有关问题

分类: IT文章 • 2024-11-04 18:13:20

delphi如何进行日期加减问题？
比如当前时期2015-09-13，那么24个月以后的日期是哪天？这中间牵扯到到了大、小月，还有闰年、平年的问题。
考虑了好长时间，始终没有好的办法，各位大神给个方案吧。
------解决思路----------------------

var

  t: TDate;

begin

  DateSeparator := '-';

  t := StrToDate('2015-09-13');

  t := IncMonth(t, 24);

  ShowMessage(DateToStr(t));

end;