Source position: dateutil.inc line 366
function RecodeTime(
const AValue: TDateTime;
const AHour: Word;
const AMinute: Word;
const ASecond: Word;
const AMilliSecond: Word
):TDateTime;