Разное
Облака / Clouds
    Go to Copy.com
    Copy.com
    The bast cloud service
    Get 20 GB free!!!
    Support WebDav.
    Show more >>
    Go to Dropbox.com
    Dropbox.com
    time-tested cloud storage
    Support WebDav.



Последние книги
Самое популярное
Все бесплатно
    Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.
Навигация



Вопросы
  Сохранить документ Word как RTF на DELPHI
   Категория: Файловая система
  Создание и удаление полей
   Категория: Базы данных
  Удаление файла в корзину
   Категория: Файловая система
  Прочитать содержимое папки
   Категория: Файловая система
  Что значит Paramstr
   Категория: Приложение
  Список ошибок BDE
   Категория: Базы данных
  Получение списка всех сетевых дисков из Delphi
   Категория: Интернет и Сети
  Как поместить графический элемент в ListBox
   Категория: Компоненты
  Компонент PopupMenu
   Категория: Компоненты
  Как создать вычисляемые поля
   Категория: Базы данных

Delphi - Справочник: Time

ABCDEFGHIJKLMNOPQRSTUVWXYZ

  << Вернуться  

 Time
function Time : TDateTime;
Функция (Unit SysUtils)
Возвращает текущее время
Описание:
Функция Time возвращает текущее время в местном часовом поясе.

Из-за того, что возвращаемое значение типа TDateTime, дата устанавливается в 0 (30/12/1899).
Пример кода: Показ текущего времени 

var
  today : TDateTime;
begin
  today := Time;
  ShowMessage('текущая дата = '+DateToStr(today));
  ShowMessage('текущее время = '+TimeToStr(today));
end;

Результат:
текущая дата = 30/12/1899
текущее время = 13:37:25
Примечание:
Предупреждение: значение даты на один день меньше прошлого дня 19-ого столетия. Почему, точно, неясно.

  << Вернуться