Increments date data by one month.
procedure IncAMonth(var Year: Word; var Month: Word; var Day: Word; NumberOfMonths: Integer = 1);
IncAMonth(Word Year, Word Month, Word Day, int NumberOfMonths = 1);
SysUtils
IncAMonth modifies Year, Month, and Day parameters so the date they describe is 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.
|
Copyright(C) 2008 CodeGear(TM). All Rights Reserved.
|
|
What do you think about this topic? Send feedback!
|
File