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

Туплю с датами   Найти похожие ветки 

← →
Dimich1978 ©   (2003-05-30 11:09) [0]

Мне надо к дате прибавить число и получить месяц, год и дату которая получилась. Прибалять надо дни.
dd/mm/yyyy
Например 10.06.2003+40дней=20.07.2003
Непойму как это сделать.
Плиз хелп.

---

← →
Anatoly Podgoretsky ©   (2003-05-30 11:11) [1]

D := D+40

---

← →
KoluChi ©   (2003-05-30 11:11) [2]

Date1 := Date2 + 40; :)

---

← →
sniknik ©   (2003-05-30 11:18) [3]

IncDay() как еще один вариант.

---

← →
Anatoly Podgoretsky ©   (2003-05-30 11:19) [4]

sniknik © (30.05.03 11:18)
Такой функции нет!!!

---

← →
Palladin ©   (2003-05-30 11:26) [5]

В D5 наверно нет, в D6 точно есть, так что да, нет :)

---

← →
Dimich1978 ©   (2003-05-30 12:10) [6]

Все спасибо, делал все то же самое, только целое число переводил в тип даты.

---

← →
sniknik ©   (2003-05-30 12:43) [7]

Anatoly Podgoretsky © (30.05.03 11:19)
фу чуть не испугался :о) но нет нашол...

да, D6 модуль DateUtils реализация
function IncDay(const AValue: TDateTime;
const ANumberOfDays: Integer): TDateTime;
begin
Result := AValue + ANumberOfDays;
end;

(а 5-ку я уже можно сказать уже забыл, и внимания естественно на пункт в вопросе не обратил, а если бы и обратил... :о)

---

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

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



Память: 0.46 MB
Время: 0.011 c