Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как округлить TDateTime до секунд ? / 6 сообщений из 6, страница 1 из 1
18.03.2003, 17:26
    #32122353
Гость
Гость
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как округлить TDateTime до секунд ?
Привет.

Вопрос в subj.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.03.2003, 17:44
    #32122376
SmaLL
SmaLL
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как округлить TDateTime до секунд ?
Разбиваешь его на часы, минуты и секунды, а потом опять собираешь, эт так на вскидку.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.03.2003, 18:05
    #32122397
Гость
Гость
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как округлить TDateTime до секунд ?
Как-то неспортивно :-)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.03.2003, 20:14
    #32122463
Seryoga
Seryoga
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как округлить TDateTime до секунд ?
да зачем... это ж дабл, его дробную часть урезаешь так, как тебе нужно - и будет тебе округление вплоть до дней.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.03.2003, 09:27
    #32122587
Гость
Гость
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как округлить TDateTime до секунд ?
IMHO, не совсем так.

если смотреть на дробную часть TDateTime, то это время в следующем виде:
Код: plaintext
 1  / количество миллисекунд, прошедшее с начала суток

Таким образом, 1 секунда = 0.000011574..., и простым десятичным округлением тут ничего не добьешься.

Правильно должно быть вроде так:
Код: plaintext
1.
Round(ADateTime * SecsPerDay)/SecsPerDay
SecsPerDay =  24  *  60  *  60
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.03.2003, 09:55
    #32122610
Seryoga
Seryoga
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как округлить TDateTime до секунд ?
дык я ж не говорил - округлять %)
типа того я и имел ввиду, то есть мат. преобразование. только проверить не способен, спал позавчера.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как округлить TDateTime до секунд ? / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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