![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
как узнать сколько дней прошло, например, с 12.11.1956 года? [D7, WinXP]
ilnarab © (2004-09-05 20:58:00)Здравствуйте!
Подскажите пожалуйста: как узнать сколько дней прошло, например, с 12.11.1956 года?
Rule (2004-09-06 08:49:00) [1]Да блин чего за велосипеды вы тут придумываете, смотрите пост
Семен Сорокин © (05.09.04 21:12) [3]
там все четко и ясно написано
fd979 (2004-09-05 22:40:00) [2]Var
Date_ : Double;
begin
//1 вариант
Date_ := Date - StrToDate('твоя дата в строковом формате');
ShowMessage(DateTOStr(Date_)); - просто покажет кол-во дней между датами...
// Date_ можно использовать как угодно
//2 варинт
> Семен Сорокин © (05.09.04 21:12) [3]
end;
Семен Сорокин (2004-09-05 22:27:00) [3]{$IFDEF offtop}
2Sheng
тезка по ДР :)
{$ENDIF}
Семен Сорокин (2004-09-05 22:25:00) [4]>DateToStr('12.11.1956')
EncodeDate(1956, 11, 12)
:)
Sheng (2004-09-05 22:24:00) [5]сорри, StrToDate
Sheng (2004-09-05 22:23:00) [6]А можно и так:
var oldDate: TDateTime;
nDays := Trunc(Now-oldDate);
или
nDays := Trunc(Now-DateToStr('12.11.1956'));
Семен Сорокин (2004-09-05 21:12:00) [7]uses
DateUtils;
DaysBetween()
Jus (2004-09-05 21:06:00) [8]А хр..н его знает. Хотел сам сделать, чтоб показывало сколько дней осталось до того момента когда мне наконец вернут права, думал, думал... надоело!)
SammIk (2004-09-05 21:00:00) [9]Календарь в руки и вперед