Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 21.05.2010, 17:17
Аватар для Vayrus
Vayrus Vayrus вне форума
Исполняемый Ретровирус
 
Регистрация: 09.08.2008
Адрес: Umbrella Corporation
Сообщения: 743
Репутация: 1293
Восклицание NOW + Миллисекунды

Приветствую, встала задача прибавления к текущей дате произвольного числа (миллисекунд), так вот вопрос в том как это сделать ?

Так как читал что с датами можно работать как с обычными числами, то пробывал сделать так:

Код:
ShowMessage(DateTimeToStr(now + (1000 * 60 * 5)));//те к текущей дате я прибавил 5 минут

Но результат неверен, ессно опыта таких манипуляций с датами нет
Ответить с цитированием
  #2  
Старый 21.05.2010, 18:58
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,096
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Ну да, т.к. время хранится справа от точки. Т.е. прибавление 5 минут будет так:

Код:
NewTime := Now + 5 / (24 * 60 * 60);
Ответить с цитированием
  #3  
Старый 21.05.2010, 19:23
Аватар для Vayrus
Vayrus Vayrus вне форума
Исполняемый Ретровирус
 
Регистрация: 09.08.2008
Адрес: Umbrella Corporation
Сообщения: 743
Репутация: 1293
Лампочка

Цитата:
Сообщение от lmikle
Ну да, т.к. время хранится справа от точки. Т.е. прибавление 5 минут будет так:

Код:
NewTime := Now + 5 / (24 * 60 * 60);

Спасибо большое, учту
Ответить с цитированием
  #4  
Старый 21.05.2010, 20:46
Аватар для Vayrus
Vayrus Vayrus вне форума
Исполняемый Ретровирус
 
Регистрация: 09.08.2008
Адрес: Umbrella Corporation
Сообщения: 743
Репутация: 1293
Лампочка

Еще уточню, а если мне надо прибавить 2 часа, то это будет выглядеть так?

Код:
now + 120 / (24 * 60 * 60);
Ответить с цитированием
  #5  
Старый 21.05.2010, 22:12
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,096
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Нверное. Но проще просто так:

Код:
NewDate := Now + 2 / 24;
Ответить с цитированием
  #6  
Старый 21.05.2010, 22:38
Аватар для PhoeniX
PhoeniX PhoeniX вне форума
Always hardcore!
 
Регистрация: 04.03.2009
Адрес: СПб
Сообщения: 3,239
Версия Delphi: GCC/FPC/FASM
Репутация: 62149
По умолчанию

Или
Код:
NewDate := Now + 1 / 12;
Сокращать дроби никто не запрещал. Хотя, все варианты рабочие.
P.S. Пофлужу по темам, хочу счётчик 777)))
__________________
Оставайтесь хорошими людьми...
VK id2634397, ds [at] phoenix [dot] dj
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра
Комбинированный вид Комбинированный вид

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 08:01.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025