Функция IncMonth возвращает значение TDateTime, которое на NumberOfMonths больше, чем переданное значение StartDate.
Элемент времени значения StartDate передаётся неизменным в результат.
Значение года увеличивается соответственно.
Значение приращения является произвольным (по умолчанию 1).
После приращения месяца, если значение дня слишком велико для полученного месяца/года, то оно уменьшается до самого высокого значения полученного месяца/года.
Примечания
Функции DecMonth нет.
Вместо этого, используйте IncMinute с отрицательным приращением.
Похожие команды
IncDay Приращивает переменную типа TDateTime на + или - число дней
IncMinute Приращивает переменную типа TDateTime на + или - число минут.
IncYear Увеличивает TDateTime переменную на количество лет
IncSecond Приращивает переменную типа TDateTime на + или - число секунд
IncMillisecond Приращивает переменную типа TDateTime на + или - число миллисекунд
Пример кода : Добавляем значения к дате
var
myDate : TDateTime;
begin myDate := StrToDate('31/01/2000'); // Конец января в високосном годе
ShowMessage('myDate = '+DateToStr(myDate)); // Приращение на 1 (значение по умолчанию) // 31-е января 2000 ==> 31-е февраля 2000 (неправильно) ==> 29-е февраля 2000
myDate := IncMonth(myDate);
ShowMessage('myDate + 1 month = '+DateToStr(myDate)); // Приращиваем на 12 месяцев // 29-е февраля 2000 ==> 29-е февраля 2000 (неправильно) ==> 28-е февраля 2001 myDate := IncMonth(myDate, 12); // Приращение на 12 месяцев
ShowMessage('myDate + 12 months = '+DateToStr(myDate));
end;
