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

Помогите плиз,   Найти похожие ветки 

← →
Term   (2003-01-16 10:39) [0]

нужно вычислисть количество лет, месяцев, и дней между двумя датами, если у кого есть процедурка киньте плиз

---

← →
Delirium^.Tremens ©   (2003-01-16 10:41) [1]

RXLib - DateUtils - XXX_Between()

---

← →
Думкин   (2003-01-16 10:42) [2]

По-моему, у меня Де-жавю.
Сколько месяцев между
1. 5 февраля 1973 и 5 июля 1973 ?
2. 5 февраля 1976 и 5 июля 1976 ?
И каких главное каких?

---

← →
Smithson ©   (2003-01-16 10:44) [3]

Было же уже!
дата в Delphi - это число дней (включая дробную часть - часы).
Разность вычисляется в лоб
DD := Max(D1, D2) - Min(D1, D2);
Теперь DD содержит число дней (включая дробную часть - часы, минуты, секунды и т.д.) между двумя датами. Как число дней разложить на месяцы и годы - сам думай, я не очень понимаю.

---

← →
Term   (2003-01-16 11:05) [4]

>Smithson © DD := Max(D1, D2) - Min(D1, D2);
енто дело я и сам знаю, мне именно что нужно как разложить корректно

---

← →
still ©   (2003-01-16 11:14) [5]

RxLib:

Unit
DateUtil
Declaration
procedure DateDiff(Date1, Date2: TDateTime; var Days, Months, Years: Word);
Description
Определяет разницу между датами, заданными Date1 и Date2 в днях, месяцах и годах.

---

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

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



Память: 0.45 MB
Время: -0.989 c