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

Функция RecodeDate в Delphi

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

Описание:

Возвращает значение TDateTime, соответствующее заданному значению AValue типа TDateTime с датой, измененной в соответствии с заданными значениями года AYear, месяца AMonth, дня ADay типа Word.

Синтаксис:

function RecodeDate(const AValue: TDateTime; const AYear, AMonth, ADay: Word): TDateTime;

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

uses DateUtils;
...
var
  Res: TDateTime;
begin
  Res:= RecodeDate(Now, 2013, 12, 31); // меняем значения в текущей дате
  ShowMessage(DateTimeToStr(Res));
end;

Результат:

RecodeDate в Delphi