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

Функция DayOfTheYear в Delphi

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

Описание:

Возвращает индекс дня года из указанного значения AValue типа TDateTime.

Синтаксис:

function DayOfTheYear(const AValue: TDateTime): Word;

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

uses DateUtils;
...
Var
  Res: Integer;
begin
  Res:= DayOfTheYear(Now); // сколько дней прошло с начала года до текущей даты
  ShowMessage('С начала года прошло ' + IntToStr(Res) + ' дней');
end;

Результат:

DayOfTheYear в Delphi