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