Функция Add_Day |
Добавление к дате указанного количества дней.
function Add_Day (d : date, i : longInt) : date;
d : date - исходная дата.
i : longInt - количество прибавляемых дней.
Дата, полученная путем увеличения даты d на i дней.
DateToStr(Add_Day(Date(20,10,1993),10), 'DD/MM/YYYY') = '30/10/1993';