Source position: varutilh.inc line 61
function VariantToCardinal(
const VargSrc: TVarData
):Cardinal;