Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.01.27;
Скачать: [xml.tar.bz2];

Вниз

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

 
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 вся ветка

Форум: "Основная";
Текущий архив: 2003.01.27;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.01 c
3-86640
Stas
2002-12-24 09:21
2003.01.27
ADO и ACCESS2000


1-86933
ska
2003-01-10 18:08
2003.01.27
Индикация данных в цикле


1-86753
Zavar
2003-01-17 15:54
2003.01.27
Запрет на нажатие клавиш.


7-87169
3223(jab)
2002-11-16 15:21
2003.01.27
Copy Disc


6-87015
Свой
2002-11-25 21:32
2003.01.27
TidSMTPServer





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский