Source position: variants.pp line 292
procedure VarCastError;procedure VarCastError(
const ASourceType: TVarType;
const ADestType: TVarType
);