Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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

Term © (2003-01-16 10:39:00)
нужно вычислисть количество лет, месяцев, и дней между двумя датами, если у кого есть процедурка киньте плиз

still (2003-01-16 11:14:00) [1]
RxLib:

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

Term (2003-01-16 11:05:00) [2]
>Smithson © DD := Max(D1, D2) - Min(D1, D2);
енто дело я и сам знаю, мне именно что нужно как разложить корректно

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

Думкин (2003-01-16 10:42:00) [4]
По-моему, у меня Де-жавю.
Сколько месяцев между
1. 5 февраля 1973 и 5 июля 1973 ?
2. 5 февраля 1976 и 5 июля 1976 ?
И каких главное каких?

Delirium^.Tremens (2003-01-16 10:41:00) [5]
RXLib - DateUtils - XXX_Between()

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »