Разное
Облака / Clouds
The bast cloud service
Get 20 GB free!!!
Support WebDav.
Show more >>
time-tested cloud storage
Support WebDav.
Последние книги
Самое популярное
Все бесплатно
Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.
Навигация
Вопросы
Undo в memo
Категория: Компоненты
Категория: Компоненты
Компонент MainMenu
Категория: Компоненты
Категория: Компоненты
Получить список запущенных приложений
Категория: Приложение
Категория: Приложение
Wav файл внутри exe-файла
Категория: Файловая система
Категория: Файловая система
Округление в большую сторону
Категория: Математика
Категория: Математика
Процедуры и функции для рабты с файлами
Категория: Файловая система
Категория: Файловая система
Дата изменения файла
Категория: Файловая система
Категория: Файловая система
Вставить иконки в Grid
Категория: Компоненты
Категория: Компоненты
К-во рабочих дней в месяце
Категория: Математика
Категория: Математика
Как нарисовать календарь
Категория: Текст и строки
Категория: Текст и строки
Delphi - Справочник: Date
Date
|
function Date : TDateTime; |
Функция (Unit SysUtils)
|
Возвращает текущую дату
|
Описание:
|
Функция Date передаёт текущую дату на данном компьютере для локального временного пояса. Поскольку возвращаемая величина является типом TDateTime, компонент времени установлен в нуль (начало дня). |
Пример кода: Показ текущей даты
|
begin ShowMessage('Вчера = '+DateToStr(Yesterday)); ShowMessage('Сегодня = '+DateToStr(Date)); ShowMessage('Завтра = '+DateToStr(Tomorrow)); ShowMessage('Сегодняшнее время = '+TimeToStr(Date)); end;
Результат:
|
Вчера = 28/10/2002 Сегодня = 29/10/2002 Завтра = 30/10/2002 Сегодняшнее время = 00:00:00 |