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

Вниз

Разность между двумя датами?   Найти похожие ветки 

 
r9000   (2007-03-01 14:16) [0]

Добрый день!

Вы не знаете как правильно выполнить вычитание от одной даты другой. Мне при этом нужно знать сколь лет прошло между двумя датами.


 
Германн ©   (2007-03-01 14:18) [1]

function YearsBetween(const ANow, AThen: TDateTime): Integer;

Description

Call YearsBetween to obtain the difference, in years, between two TDateTime values. Because years are not all the same length (e.g. leap years), YearsBetween returns an approximation based on an assumption of 365.25 days per year. Fractional years are not counted. Thus, for example, YearsBetween reports the difference between Jan 1 and Dec 31 as 0 on non-leap years and 1 on leap years.


 
r9000   (2007-03-01 14:44) [2]

Спасибо.


 
PZ   (2007-03-01 14:46) [3]

Рядом ведь почти тот же вопрос и ответы даны, ну хоть бы прочитал:
"к текущему времени добавить число (linox 01.03.07 14:05)"



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

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

Наверх




Память: 0.44 MB
Время: 0.056 c
15-1175006565
oldman
2007-03-27 18:42
2007.04.22
Почему мы так поступили?


2-1175744673
Steep
2007-04-05 07:44
2007.04.22
TNotifyEvent


2-1175579678
Gentos
2007-04-03 09:54
2007.04.22
DateTimePicker1.Date


10-1131727900
Георгий
2005-11-11 19:51
2007.04.22
Delphi+Excel


2-1175183362
mahab
2007-03-29 19:49
2007.04.22
TImage





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский