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

Функция RecodeDateTime в Delphi

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

Описание:

Возвращает значение TDateTime, соответствующее заданному значению AValue типа TDateTime с датой, измененной в соответствии с заданными значениями года AYear, месяца AMonth, дня ADay, и временем, измененным в соответствии с заданными значениями часа AHour, минут AMinute, секунд ASecond, миллисекунд AMilliSecond типа Word. Каждый из параметров может быть задан равным RecodeLeaveFieldAsIs, что будет означать, что данное значение не изменяется.

Синтаксис:

function RecodeDateTime(const AValue: TDateTime; const AYear, AMonth, ADay, AHour, AMinute, ASecond, AMilliSecond: Word): TDateTime;

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

uses DateUtils;
...
var
  Res: TDateTime;
begin
  Res:= RecodeDateTime(Now, 2001, 10, 12, 10, 10, 12, 9); // меняем дату и время в текущем значении даты времени
  ShowMessage(DateTimeToStr(Res));
end;

Результат:

RecodeDateTime в Delphi