16.45.5. function EncodeTime
function EncodeTime(Hour, Min, Sec, MSec: Word): TDateTime;
Собирает время из значения часов, минут, секунд и миллисекунд.
Пример:
var
TestDate : TDateTime;
begin
TestDate := EncodeTime(14, 25, 05, 00);
AddToLog(TimeToStr(TestDate));
end.