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