как выцепить часы из TDateTime

← →
Kein © (2004-03-24 15:40) [0]

в Delphi 7 в модуле DateUtils есть функция HourOf, но по моему в Delphi 5 ее нет по крайней мере в справке и модуля я в ней такого я не нашел.
Из этого вопрос, как выцепить часы из TDateTime без использования этой функции и не через строку?

← →
Романов Р.В. © (2004-03-24 15:45) [1]

Trunc(Frac(Now)*24)

← →
Kein © (2004-03-24 15:50) [2]

2Романов Р.В.
фенкс. из чистого любопытства, в Д5 функции специальной нет, тока так?

← →
Юрий Зотов © (2004-03-24 15:52) [3]

Почему нет? Есть DecodeTime.

Оформи это как функцию и будет.

процедуры DecodeDate, DecodeTime
Обратные - EncodeDate, EncodeTime.

как выцепить часы из TDateTime Найти похожие ветки