Получение целого числа часов от начала сутокDelphi , Синтаксис , Дата и ВремяПолучение целого числа часов от начала суток
Автор: Savva { **** UBPFD *********** by delphibase.endimus.com **** >> Получение целого числа часов от начала суток Возвращает целое число часов от начала суток. Пример: для "11:25:00" будет возвращено значение "11" Зависимости: System, SysUtils Автор: savva, savva@nm.ru, ICQ:126578975, Орел Copyright: Сапронов Алексей (Savva) Дата: 6 июня 2002 г. ***************************************************** } function GetСurrentHour: integer; begin result := Round(Time * 24); end; Статья Получение целого числа часов от начала суток раздела Синтаксис Дата и Время может быть полезна для разработчиков на Delphi и FreePascal. Комментарии и вопросыМатериалы статей собраны из открытых источников, владелец сайта не претендует на авторство. Там где авторство установить не удалось, материал подаётся без имени автора. В случае если Вы считаете, что Ваши права нарушены, пожалуйста, свяжитесь с владельцем сайта. :: Главная :: Дата и Время ::
|
||||
©KANSoftWare (разработка программного обеспечения, создание программ, создание интерактивных сайтов), 2007 |