ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как к time прибавить 1 секунду? (Cat2 просьба не беспокоиться)
4 сообщений из 4, страница 1 из 1
Как к time прибавить 1 секунду? (Cat2 просьба не беспокоиться)
    #32148804
alexu
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alexu
Участник
Делаю так:

datetimepicker1.Date:=date;
datetimepicker1.time:=time;

Подскажите, как увеличить время на 1 секунду? То есть к time прибавить.
...
Рейтинг: 0 / 0
25.04.2003, 13:12
| Ответить | Цитировать | Написать  
Как к time прибавить 1 секунду? (Cat2 просьба не беспокоиться)
    #32148811
Фотография Ильшат
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ильшат
Участник
Код: plaintext
function IncSecond(const AValue: TDateTime; const ANumberOfSeconds: Int64 =  1 ): TDateTime;
...
Рейтинг: 0 / 0
25.04.2003, 13:14
| Ответить | Цитировать | Написать  
Как к time прибавить 1 секунду? (Cat2 просьба не беспокоиться)
    #32148818
alexu
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alexu
Участник
2 Ильшат

Ух ты, вкуснятина какая! Спасибо.
...
Рейтинг: 0 / 0
25.04.2003, 13:18
| Ответить | Цитировать | Написать  
Как к time прибавить 1 секунду? (Cat2 просьба не беспокоиться)
    #32151049
alex_k
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alex_k
Участник
1 это сутки
в сутках 24 часа
в часе 3600 секунд
значит одна секунда это 1/(24*3600)
...
Рейтинг: 0 / 0
29.04.2003, 15:13
| Ответить | Цитировать | Написать  
4 сообщений из 4, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как к time прибавить 1 секунду? (Cat2 просьба не беспокоиться)
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]