Время и дата

Другое   8 Февраль 2011  Автор статьи: admin 

В этом уроке я покажу, как узнавать в Delphi текущее время и дату.

Заведем переменные

1
2
var
Hour, Min, Sec, MSec: Word;

В дальнейшем мы будем использовать эти переменные для хранения текущего времени, а именно: часов, минут, секунд и миллисекунд соответственно.

1
2
var
D, M, Y: String;

А эти переменные будут хранить текущий день, месяц и год.

Теперь запишем текущие дату и время в эти переменные:

1
2
3
4
5
DecodeTime(Time, Hour, Min, Sec, MSec);  //получаем время

D:=FormatDateTime('dd',Date); // получаем дату
M:=FormatDateTime('mm',Date);
Y:=FormatDateTime('yy',Date);

В этом примере мы использовали константы Date и Time, которые всегда в себе хранят время и дату. Константа Date принадлежит типу TDate, а Time принадлежит типу TTime.

Например, после приведенного выше кода, мы можем вывести на экран текущий год:

showmessage(Y);

А вывести текущий час, можно так:

showmessage(IntToStr(Hour));

Конечно же, мы можем объявлять свои переменные типов TDate, TTime, а также TDateTime, который хранит в себе и время и дату (существует константа Now, аналогичная Date и Time, но типа TDateTime). Далее я привожу полезные функции и процедуры, для работы с этими переменными:

DateTimeToString(Result, Format, DateTime) — Эта процедура позволяет формировать строковое представление параметра DateTime с учетом формата, заданного строкой Format, и помещает результат в строку Result.

DateTimeToStr(DateTime) — строковое (String) представление даты и времени. Эта функция формирует для параметра DateTime строковое представление даты и времени с учетом региональной установки Windows, возвращая полученную строку.

DateToStr(Date) — символьное представление даты. Функция формирует для параметра Date типа TDateTime или TDate символьное представление даты с учетом региональной установки Windows и возвращает полученную строку в качестве результата своей работы.

TimeToStr(Time) — символьное представление времени. Функция формирует для параметра Time типа TDateTime или TTime символьное представление времени с учетом региональной установки Windows и возвращает полученную строку в качестве результата своей работы.

DecodeTime(Date, Hour, Min, Sec, MSec) — выделение во времени часа, минуты, секунды и числа миллисекунд. Процедура выделяет из параметра Date типа TDateTime или TTime час, минуту, секунду и число миллисекунд и помещает их соответственно в параметры Hour, Min, Sec и MSec типа Word.

DayOfWeek(Date) — день недели. Функция возвращает день недели заданной даты Date типа TDateTime или TDate в виде числа от 1 до 7, причем нумерация начинается с воскресенья.

DecodeDate(Date, Year, Month, Day) — выделение в дате года, месяца, дня. Процедура выделяет из параметра Date типа TDateTime или TDate год, месяц, день и помещает их соответственно в параметры Year, Month и Day типа Word.

EncodeDate(Year, Month, Day) — формирование даты из компонентов даты. Функция формирует из заданного года, месяца и дня (заданных в параметрах Year, Month, Day) комплексный параметр типа TDateTime и возвращает его как результат работы.

EncodeTime(Hour, Min, Sec, MSec) — формирование времени из компонентов времени. Функция формирует из заданных часа, минуты, секунды и числа миллисекунд (заданных в параметрах Hour, Min, Sec, MSec) комплексный параметр типа TDateTime и возвращает его как результат работы.

FormatDateTime(Format, DateTime) — форматированное символьное представление даты и времени. Функция формирует символьное представление параметра DateTime типа TDateTime с учетом формата, заданного строкой Format, и возвращает полученную строку как результат своей работы.

StrToDate(S) — преобразование символьного представления даты в тип TDateTime. Функция преобразовывает символьное представление даты, находящееся в строке S, в формат TDateTime или TDate и возвращает полученную величину как результат своей работы. Дата должна быть задана в соответствии с региональной установкой Windows.

StrToTime(S) — преобразование символьного представления времени в тип TDateTime. Функция преобразовывает символьное представление времени, находящееся в строке S, в формат TDateTime или TTime и возвращает полученную величину как результат своей работы. Время должно быть задано в соответствии с региональной установкой Windows.

StrToDateTime(S) — преобразование символьного представления даты и времени в тип TDateTime. Функция преобразовывает символьное представление даты и времени, находящееся в строке S, в формат TDateTime и возвращает полученную величину как результат своей работы. Дата и время должны быть заданы в соответствии с региональной установкой Windows.

Научиться программировать

  • на Delphi

  • на Java

  • на C++