|
Вопрос # 167/ вопрос открыт / |
|
Пишет автор вопроса № 165. Первая часть вопроса, видимо, не всем стала ясна. Как сделать так, чтобы выводилась строка, в которой было написано 12:30:45 РМ или АМ, короче текущее время а часть дня, это и есть астраномическое время. Пробовал искусственным способом, ну то есть проверять скок время и добавлять РМ или АМ условием больше или меньше 12, всё получается, но в вопросе сказано одним оператором. Заранее спасибо.
 |
Вопрос задал: Полушин Сергей Анатольевич (статус: Посетитель)
Вопрос отправлен: 21 ноября 2006, 18:37
Состояние вопроса: открыт, ответов: 2.
|
Ответ #1. Отвечает эксперт: mvp
FormatDateTime('hh:mm:ss am/pm', now);
Посмотрите в helpe FormatDateTime и Date-Time Format Strings, если интересно, как это работает :)
 |
Ответ отправил: mvp (статус: 4-ый класс)
Время отправки: 21 ноября 2006, 20:35
Оценка за ответ: 5
|
Ответ #2. Отвечает эксперт: min@y™
А ещё есть чудесный модуль DateUtils.pas, там много вкусных функций для работы с датами и временами. Ну, и в частности вот эта:
Приложение: Переключить в обычный режим- IsPM function
-
- ndicates whether the time portion of a specified TDateTime value occurs after noon.
-
- Unit
-
- DateUtils
-
- Category
-
- datetime routines
-
- Delphi syntax:
-
- function IsPM(const AValue: TDateTime): Boolean;
-
- C++ syntax:
-
- extern PACKAGE bool __fastcall IsPM(const System::TDateTime AValue);
-
- Description
-
- IsPM returns true if the time portion of AValue occurs on or after 12:00 noon and before 12:00
midnight.
 |
Ответ отправил: min@y™ (статус: Доктор наук)
Время отправки: 22 ноября 2006, 08:28
Оценка за ответ: 3
|
Мини-форум вопроса
Всего сообщений: 1; последнее сообщение — 21 ноября 2006, 20:36; участников в обсуждении: 1.
|
mvp (статус: 4-ый класс), 21 ноября 2006, 20:36 [#1]:
Забыл в ответе уточнить, что надо подключить sysutils, но, думаю итак догадаетесь
|
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|