VPF::Работа со временем - Форум программистов

Akella

Дата 8.2.2006, 10:09 (ссылка)

(нет голосов)

Загрузка ...

Творец

Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 36
Всего: 329

Есть функция Now, которая воврращает тек. дату и время.
Как правильно подсчитать, что следующий запуск (чего-то там) будет now+значение таймера (TTimer)
т.е. now + 3600000 мс = ???
(3600000 = 1час)

Это сообщение отредактировал(а) Akella - 8.2.2006, 10:13

Snowy

Дата 8.2.2006, 10:11 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 192
Всего: 484

Код

next := now + (Timer1.Interval / 1000 / 60 / 60 / 24);

Albinos_x

Дата 8.2.2006, 10:22 (ссылка)

(нет голосов)

Загрузка ...

Evil Skynet

Профиль
Группа: Комодератор
Сообщений: 3288
Регистрация: 28.5.2004
Где: X-6120400 Y-1 4624650

Репутация: 26
Всего: 108

Код


 next := now +EncodeTime(0,0,0,1)*Timer1.Interval;

Цитата(Akella @ 8.2.2006, 10:09

)

(3600000 = 1час)

Код


 next := now +EncodeTime(1,0,0,0);

Код


 next := now +(1/24);

Добавлено @ 10:26

Код


 next := now + (Timer1.Interval/86400000);

--------------------

"Кто владеет информацией, тот владеет миром"
Уинстон Черчилль

SergeBS

Дата 8.2.2006, 10:47 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1111
Регистрация: 10.6.2005
Где: Владимир

Репутация: 2
Всего: 22

const MSecsPerDay никто не отменял.

Snowy

Дата 8.2.2006, 10:54 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 192
Всего: 484

Цитата(SergeBS @ 8.2.2006, 10:47

)

const MSecsPerDay никто не отменял.

Тоже вариант, но ничего не меняет.
Откомпиленный ехе будут байт-в-байт.
Мне так больше нравится явное выражение - так наглядней.
А компилятор все равно всю строку соберет в одну константу.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »