Source position: dateutil.inc line 361
function RecodeHour(
const AValue: TDateTime;
const AHour: Word
):TDateTime;