Главная страница
    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.041 c
6-1153507929
bobbi
2006-07-21 22:52
2007.04.22
Почему не работает след. код (отправка почты)


15-1174050490
Rule
2007-03-16 16:08
2007.04.22
УРАААААААААА, я купил машину :-)))


2-1175240923
Gloomer
2007-03-30 11:48
2007.04.22
Указать в ADOQuery путь к файлу


15-1174882796
Post_
2007-03-26 08:19
2007.04.22
Детали лицензий на Wi-Fi


8-1155229468
Der Nechk@ssoff
2006-08-10 21:04
2007.04.22
Перемотка но окончании трека





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