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

Функция WeeksInYear в Delphi

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

Описание:

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

Синтаксис:

function WeeksInYear(const AValue: TDateTime): Word;

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

uses DateUtils;
...
var
  Res: Word;
begin
  Res:= WeeksInYear(Now); // возвращает кол-во недель в текущем году
  ShowMessage('В этом году ' + IntToStr(Res) + ' недель');
end;

Результат:

WeeksInYear в Delphi

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

Загрузка...