Source position: variants.pp line 208
public procedure TCustomVariantType.Compare(
const Left: TVarData;
const Right: TVarData;
var Relationship: TVarCompareResult
); virtual;