function VariantArrayToSequence(TypeCode: ITypeCode; const VariantArray: Variant): TAny;

TAny VariantArrayToSequence(ITypeCode TypeCode, const Variant VariantArray);