Source position: dateutil.inc line 376
function CompareTime(
const A: TDateTime;
const B: TDateTime
):TValueRelationship;