Delphi 中，对 Variant 类型进行了增强，支持了自己的 UnicodeString 、 AnsiString 和 TBcd，那么有人可能奇怪它是怎么完成这一支持的呢？秘密就在 TCustomVariantType 这个类型。 我们看 Variants 单元对其定义： TCustomVariantType =