Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как из переменной типа TDateTime извлечь отдельно Time и Date? [D6, Win2k]


Mishenka ©   (2005-01-12 17:15:00) 

Как из переменной типа TDateTime извлечь отдельно Time и Date?


Fay   (2005-01-12 17:58:00) [1]

2 Digitman ©   (12.01.05 17:53) [9]
>> чего не понял ?
Как извлечь "число милисекунд" из дробной части.

>> ну нет так нет)
Это конечно 8)


Digitman   (2005-01-12 17:53:00) [2]


> Вот теперь не понял


чего не понял ?
вопрос прозвучал "как извлечь", а не в каком формате представлены эти компоненты даты-времени в переменной типа TDataTime .. это уж я так, насчет формата.. для близира)


> Нет.


ну нет так нет)
пусть будет The fractional part of the TDateTime value is fraction of a 24 hour day that has elapsed


Fay   (2005-01-12 17:47:00) [3]

2 Digitman ©   (12.01.05 17:39) [7]
> в вопросе, кстати, не было ни слова об отсчете даты, равно
> как и об отсчете времени
Вот теперь не понял

>> дробная же - число милисекунд
Нет.


Digitman   (2005-01-12 17:39:00) [4]


> Johnmen ©   (12.01.05 17:30) [4]


ну это не суть как важно, насчет мс или чего-то еще)


> Fay ©   (12.01.05 17:32) [5]


чего не ожидал ? я не понял ...

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


Johnmen   (2005-01-12 17:34:00) [5]

>Fay ©   (12.01.05 17:32) [5]
>Не ожидал от Вас

"И на старуху бывает проруха"
Поэтому жди всегда и всего :)


Fay   (2005-01-12 17:32:00) [6]

2 Digitman ©   (12.01.05 17:20) [3]
TDateTime - количество (Double) дней, прошедших с 12.30.1899.

> : целая часть дабл-значения есть целое число дней (собственно
> дата), дробная же - число милисекунд, прошедших начиная
> с начала суток, фигурирующих в дате

Не ожидал от Вас


Johnmen   (2005-01-12 17:30:00) [7]

>Digitman ©

Не надо ничего чесать...:) Просто прочесть в F1.
И, кстати, ты не прав насчет миллисекунд...:)


Digitman   (2005-01-12 17:20:00) [8]

смотрим модуль, в котором объявлен идентификатор TDateTime

видим - он есть ничто иное как Double

затем чешем репу : целая часть дабл-значения есть целое число дней (собственно дата), дробная же - число милисекунд, прошедших начиная с начала суток, фигурирующих в дате


begin...end   (2005-01-12 17:18:00) [9]

> Mishenka   (12.01.05 17:15)

Trunc и Frac или DateOf и TimeOf.


Johnmen   (2005-01-12 17:17:00) [10]

TDateTime+F1


Наверх

Титульная страница Поиск, карта сайта Написать письмо