Функция EndOfAYear в Delphi

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

Описание:

Возвращает время окончания года, содержащего указанную дату AValue типа Word.

Синтаксис:

function EndOfAYear(const AYear: Word): TDateTime;

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

uses DateUtils;
...
var
  Res: TDateTime;
begin
  Res:= EndOfAYear(1999);  // возвращаем дату-время окончания 1999-года
  ShowMessage(DateTimeToStr(Res) + ' ' + TimeToStr(Res));
end;

Результат:

Функция EndOfAYear
EndOfAYear в Delphi

Kwork.ru - услуги фрилансеров от 500 руб.
1 Звезда2 Звезды3 Звезды4 Звезды5 Звезд (9 оценок, среднее: 5,00 из 5)
Загрузка...
Добавить комментарий