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