Функция EncodeTime – формирует значение TDateTime из значений часа, минуты, секунды и миллисекунды

Функция EncodeTime в Delphi формирует значение TDateTime из значений часа, минуты, секунды и миллисекунды.

Функция EncodeTime: Назначение времени переменной TDateTime

var
  myDate : TDateTime;

begin
  // Устанавливаем мою переменную даты используя функцию EncodeTime
  myDate := EncodeTime(12, 34, 56, 789);

  LongTimeFormat := 'hh:mm:ss.z';  // Гарантируем, что Миллисекунды будут показаны

  ShowMessage('Дата установлена в '+DateToStr(myDate));
  ShowMessage('Время установлено в '+TimeToStr(myDate));
end;