Source position: dateutil.inc line 360
function EncodeTimeInterval(
Hour: Word;
Minute: Word;
Second: Word;
MilliSecond: Word
):TDateTime;