Функция IncDay – приращивает переменную типа TDateTime на + или - число дней

Функция IncDay в Delphi приращивает переменную типа TDateTime на + или - число дней.

Функция IncDay: Простой пример приращения и декремента

var
  myDate : TDateTime;
begin
  // Устанавливаем нашу дату как раз перед концом 2000 года
  myDate := EncodeDate(2000, 12, 30);
  ShowMessage('моя дата = '+DateToStr(myDate));

  // Добавить 10 дней к этой дате
  myDate := IncDay(myDate, 10);
  ShowMessage('моя дата + 10 дней = '+DateToStr(myDate));

  // Отнимаем 12 дней от этой даты
  myDate := IncDay(myDate, -12);
  ShowMessage('моя дата - 12 дней = '+DateToStr(myDate));
end;