added TDocVariantData.InitObjectFromVariants() method