Source position: variants.pp line 185
protected procedure TCustomVariantType.VarDataClear(
var Dest: TVarData
);