Source position: variants.pp line 207
public procedure TCustomVariantType.Cast(
var Dest: TVarData;
const Source: TVarData
); virtual;