|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
21.03.2009, 21:04 | #1 |
Капсула от спама
Форумчанин
Регистрация: 04.03.2008
Сообщений: 779
|
Подсчитать количество дней имея дату
Доброго времени суток уважаемые программисты.
Как подсчитать количество дней с начала системы отсчета (по моему это 1 ноября 1899 года) по определенную дату? Дело в том, что простым циклом не переберешь, уж болно высокая потребительность будет из-за того, что вмешиваются такие вещи как высокосный год и 29-31 день в месяце, да и не этично это По-моему должны быть какие-то функции, но я такой не нашёл. Заранее спасибо.
Если данный ответ не столь конкретен, как Вы желаете его увидеть, возможно необходимо поразмыслить, стоит ли вопрос того, чтобы о нём спрашивать на форуме?
CncFiles.ru - бесплатный файловый хостинг |
21.03.2009, 21:07 | #2 |
*
Старожил
Регистрация: 22.11.2006
Сообщений: 9,201
|
Разность между датами уже рассматривалась много раз.
Переведите обе даты в числа - разница между ними и есть количество дней... Используемая функция - StrToDate. |
21.03.2009, 21:09 | #3 | |
Капсула от спама
Форумчанин
Регистрация: 04.03.2008
Сообщений: 779
|
Цитата:
----------- Ладно, т.к. стараюсь не флудить - я имею дату. Вами предложенная фунция преобразует строку в дату. Мне же нужно дату в число
Если данный ответ не столь конкретен, как Вы желаете его увидеть, возможно необходимо поразмыслить, стоит ли вопрос того, чтобы о нём спрашивать на форуме?
CncFiles.ru - бесплатный файловый хостинг Последний раз редактировалось Dj_smart; 21.03.2009 в 21:12. |
|
21.03.2009, 21:11 | #4 |
*
Старожил
Регистрация: 22.11.2006
Сообщений: 9,201
|
???
Повторюсь: Используемая функция - StrToDate. Например: Код:
И для нее тоже в хэлпе есть примеры на Дельфи... Последний раз редактировалось mihali4; 21.03.2009 в 21:18. |
21.03.2009, 21:15 | #5 |
Старожил
Регистрация: 13.12.2006
Сообщений: 3,859
|
есть модуль dateutils ,где вы найдете множество полезных функций по работе с датами.
ICQ не для вопросов, а для предложений. Для вопросов используйте форум
IRC канал клуба программистов|Мои статьи |
21.03.2009, 21:34 | #6 |
Капсула от спама
Форумчанин
Регистрация: 04.03.2008
Сообщений: 779
|
Да, да, да, спасибо есть такая функция на примете - DaysBetween.
Если данный ответ не столь конкретен, как Вы желаете его увидеть, возможно необходимо поразмыслить, стоит ли вопрос того, чтобы о нём спрашивать на форуме?
CncFiles.ru - бесплатный файловый хостинг |
22.03.2009, 11:00 | #7 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
Dj_smart, если даты в формате TDatetime
(type TDateTime = type Double то для получения разности двух дат достаточно отнять целые части этих переменных: Код:
вообще достаточно Trunc(ВашаДата) |
23.03.2009, 12:46 | #8 | ||
Форумчанин
Регистрация: 20.06.2007
Сообщений: 270
|
Цитата:
Цитата:
То есть целая часть значения TDateTime собственно и представляет интересующее вас значение.
-Кукушка, кукушка! Накукуй мне сто лет!
-А накукуй тебе столько? (с) Библия. Вольный перевод с древнееврейского. |
||
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Помогите подсчитать количество дней | komar73 | Microsoft Office Excel | 2 | 09.02.2009 09:54 |
Отредактируйте,пожалуйста,задачу на записи, вычисляющую дату через m дней. | JiLiYa | Паскаль, Turbo Pascal, PascalABC.NET | 2 | 26.12.2008 09:29 |
Количество дней в месяце по диапазону дат | VadimSh | Microsoft Office Excel | 6 | 26.11.2008 23:48 |
Добавление кол-во дней в дату | D@rk M@k | Общие вопросы Delphi | 1 | 19.04.2008 10:19 |