Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Помогите с TDate


ЯТутаНовичек ©   (2005-11-06 22:09:00) 

Как можно вычислить сколько прошло дней между начальной и конечной датой?
дата2-дата1 получается левая дата... а мне нужно целое число!
Как это все организовать?


SergP.   (2005-11-06 22:35:00) [1]

trunc(date1)-trunc(date2)


Джо   (2005-11-06 22:15:00) [2]

Целую часть можно получить функцией Trunc.


Джо   (2005-11-06 22:14:00) [3]


uses DateUtils;
...
DaysBetween


Или ручками. Целая часть значения типа TDateTime - это как раз есть число дней, прошедших с 12/30/1899.


Наверх

Титульная страница Поиск, карта сайта Написать письмо