Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.09.17;
Скачать: CL | DM;

Вниз

Работа с датой   Найти похожие ветки 

 
иван8511   (2006-08-24 19:34) [0]

Подскажите, пожалуйста, как из сегодняшей даты вычесть дату рождения человека, и результат получит в исполнившихся лет.
Например: сегодня 24.08.2006, а дата рождения 15.07.1975,
24.08.2006 - 15.07.1975 = 31 год


 
Чародей ©   (2006-08-24 19:39) [1]

Current,Dect:TDataTime
DataTimeToSystemTime(Current-Dect);


 
Ega23 ©   (2006-08-24 19:42) [2]

YearsBetween?


 
DprYg ©   (2006-08-24 19:45) [3]

uses DateUtils;
Form1.Caption := IntToStr(YearsBetween(EncodeDate(2006, 8, 24), EncodeDate(1975, 7, 15)));


 
иван8511   (2006-08-24 19:48) [4]

Спасибо!!! Работает



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

Текущий архив: 2006.09.17;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.038 c
15-1156260813
vase21
2006-08-22 19:33
2006.09.17
поверх всего


6-1146238121
NORDmen
2006-04-28 19:28
2006.09.17
winsock - recv


3-1152100600
leha
2006-07-05 15:56
2006.09.17
расшиоение "gtd"


2-1156838861
Postalll
2006-08-29 12:07
2006.09.17
Вызов приложения из командной строки


3-1152698716
Ломброзо
2006-07-12 14:05
2006.09.17
Windows authentification в Oracle