|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
<Дата> + <кол-во дней> = <дата>
У меня есть дата и количество дней. Как получить результирующую дату сложением?
(19.09.2008 + 2 = 21.09.2008) Конечно, с учетом високосных годов. |
#2
|
|||
|
|||
Код:
var D : TDateTime; begin D := Date; // "сегодня" D := Date + 7; // "через неделю" (семь дней) D := IncMonth(Date,1); // "через месяц" D := IncMonth(Date,-1); // "Месяц назад" end; Ну и самый кондовый вариант - через DecodeDate/EncodeDate - тут сам рулишь (почитай хелп по этим функциям). |
#3
|
||||
|
||||
Спасибо, все работает
|