Обновлено: 01 декабря, 2018

Функция CurrentYear в Delphi

Используемый модуль: SysUtils

Описание:

Возвращает полное обозначение (четыре цифры) текущего года.

Синтаксис:

CurrentYear: Word;

Пример использования:

uses SysUtils;
...
Var
  Res: Integer;
begin
  Res:= CurrentYear;
  ShowMessage('Сейчас - ' + IntToStr(Res) + ' год');
end;

Результат:

CurrentYear в Delphi

Рейтинг автора

Автор статьи

Юрий

Программист Delphi, MySQL. Образование: высшее. Специальность: программное обеспечение информационных технологий.

Написано статей

439

(14 оценок, среднее: 5,00 из 5)

Загрузка...