Помогите плиз,

← →
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]

RxLib:

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

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