Скачать: CL | DM;

Работа с датами   Найти похожие ветки 

← →
Sesh   (2003-07-28 20:12) [0]

Подскажите, може есть какая-то функция: Надо к дате прибавить 7 месяцев причем чтоб учитывался переход на следующий год

---

← →
Anatoly Podgoretsky ©   (2003-07-28 20:15) [1]

Если ты скажешь сколько в них дней, то первая часть выполнима.

---

← →
Sesh   (2003-07-28 20:21) [2]

Не скажу естесственно, месяцев может быть не 7 а 3 или 25

---

← →
ZrenBy ©   (2003-07-28 20:25) [3]

decodedate
encodedate
inc(...,7)
if(..>12)then
Inc(..,1)
dec(..,12)

---

← →
Anatoly Podgoretsky ©   (2003-07-28 20:32) [4]

ZrenBy © (28.07.03 20:25)
Обязательно будет ошибка

---

← →
ZrenBy ©   (2003-07-28 20:35) [5]

Я понимаю, будет, обязательно будет.

Но не буду же я тут все расписывать.

---

← →
Anatoly Podgoretsky ©   (2003-07-28 20:43) [6]

Но главное то не в этом, главное в понятии прибавить месяц, оно не так просто как кажется.

---

← →
Sesh   (2003-07-28 20:43) [7]

Будупризнателен если распишешь :)

---

← →
ZrenBy ©   (2003-07-28 20:56) [8]

см.

function IncMonth(const DateTime: TDateTime; NumberOfMonths: Integer): TDateTime;

в SysUtils

---

← →
Sesh   (2003-07-28 21:03) [9]

Я как чувствовал что должна быть функция какая-нибудь, все так просто, спасибо.

---

← →
Anatoly Podgoretsky ©   (2003-07-28 21:09) [10]

ZrenBy © (28.07.03 20:56)
29.01.2006 + 1M = ?
30.01.2006 + 1M = ?
29.01.2006 + 1M + 1D = ?
29.01.2006 + 1D + 1M = ?

Два последних варианта очень интересны, как как согласно правилам математики должны дать одинаковый результат, но этого не произойдет. Сложение коммутативно!
Очень не чистая функция, сделана специально для любителей складывать "месяца"

---

← →
ZrenBy ©   (2003-07-28 21:11) [11]

Да согласен я на все 100%.

Не лаптем щи хлебаю

---

← →
Sesh   (2003-07-28 21:35) [12]

Да, фигня получается, только что проверил...

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: -0.99 c