----哆啦劉小洋 原創(chuàng)，轉(zhuǎn)載需說明出處 2023-01-04

SgxVariantArrayT:支持多維數(shù)組的變體類型

• • 1 簡介
  • 2 方法原理
  • • 2.1 繼承于_variant_t
    • 2.2 模板類型到VARIANT VT的轉(zhuǎn)換
  • 3 主要方法（接口）
  • 4 與CArray、vector數(shù)組的轉(zhuǎn)換
  • 5 Automation中的應(yīng)用實例

1 簡介

VRIANT變體類型是Com技術(shù)中的一種標準數(shù)據(jù)類型，Vb中的變體也是這種類型，在針對Com編程過程中，比如AutoCAD、Surfer、Excel、Word中使用自動化Automation（OLE）功能時，經(jīng)常遇到VARIANT數(shù)組的情況，在VC中使用VARIANT數(shù)組很繁瑣，特別是多維數(shù)組。本文介紹了一種封裝VARIANT數(shù)組的方法并附帶了完整的免費代碼，具備以下主要功能：1）最多4維數(shù)組的支持；2）使用VARIANT數(shù)組類似于CArray、vector，也類似與Vb中的動態(tài)數(shù)組；3）支持CArray、vector與VARIANT的轉(zhuǎn)換（1~4維）。本文的代碼基于VC2012及以上（將代碼中的">>"中間留個空格，也可以用于vc6）。

2 方法原理

其實沒有什么原理，就是把VC中繁瑣的SafeArray申明、賦值、設(shè)置都封裝到一個VAIRANT繼承類中。采用模版類，是為了讀取和寫入數(shù)組數(shù)據(jù)書寫更方便。主要關(guān)鍵點就兩個：

2.1 繼承于_variant_t

如下：

template <class T> class CSgxVariantArrayT : public _variant_t {//沒有成員變量，保持和VARIANT最大的兼容。 };

2.2 模板類型到VARIANT VT的轉(zhuǎn)換

VARIANT是一種標準數(shù)據(jù)格式，因此只能對應(yīng)有限的常用數(shù)據(jù)類型。常用的VT類型和c語言類型對照關(guān)系如下：
VT_R8 -> double
VT_R4 -> float
VT_I4 / VT_INT -> int / long
VT_BSTR -> BSTR
VT_I1 -> char
VT_I2 -> short

因此在構(gòu)造時根據(jù)模板參數(shù)來獲取對應(yīng)的vt值，代碼如下：

template <class T> class CSgxVariantArrayT : public _variant_t {//...void CalcVT(){if (typeid(T) == typeid(double))vt = VT_R8;else if (typeid(T) == typeid(int))vt = VT_I4;else if (typeid(T) == typeid(UINT))vt = VT_UI4;else if (typeid(T) == typeid(float))vt = VT_R4;else if (typeid(T) == typeid(char))vt = VT_I1;else if (typeid(T) == typeid(UCHAR))vt = VT_UI1;else if (typeid(T) == typeid(BOOL))vt = VT_I4;else if (typeid(T) == typeid(short))vt = VT_I2;else if (typeid(T) == typeid(unsigned short))vt = VT_UI2;else if (typeid(T) == typeid(bool))vt = VT_BOOL;else if (typeid(T) == typeid(BSTR))vt = VT_BSTR;else if (typeid(T) == typeid(__int64))vt = VT_I8;else{ASSERT(FALSE);throw ("data type not supported");}vt |= VT_ARRAY;} };

3 主要方法（接口）

template <class T> class CSgxVariantArrayT : public _variant_t { public://構(gòu)造CSgxVariantArrayT(void);CSgxVariantArrayT(ULONG nCount, T* pData = NULL);CSgxVariantArrayT(const VARIANT& v);//獲取某一維的元素個數(shù)long GetSize(long nDim);//設(shè)置數(shù)組大小BOOL Redim(long n1);BOOL Redim(long n1, long n2);BOOL Redim(long n1, long n2, long n3);BOOL Redim(long n1, long n2, long n3, long n4);//獲取數(shù)組元素（讀寫）T& operator()(long n1);T& operator()(long n1, long n2);T& operator()(long n1, long n2, long n3);T& operator()(long n1, long n2, long n3, long n4); //寫數(shù)組元素（另一種寫方案，用于數(shù)組轉(zhuǎn)換）HRESULT SetAt(long nIndex, variant_t v);HRESULT SetAt(long n1, long n2, variant_t v);HRESULT SetAt(long n1, long n2, long n3, variant_t v);HRESULT SetAt(long n1, long n2, long n3, long n4, variant_t v); };

最多支持到4維數(shù)組。實現(xiàn)都是利用Windows系統(tǒng)函數(shù)SafeArrayRedim、SafeArrayCreate、SafeArrayDestroy等，一句一句把他們封裝起來。另外，采用了重載()的方式，很遺憾，多維數(shù)組無法采用重載[]的方式提供類似 arr[][][] 讀取數(shù)據(jù)的方法。
想了解具體實現(xiàn)，請參見文末附帶的源代碼。
使用方法的示例代碼如下：

#include "SgxVariantArrayT.h"void test() {CSgxVariantArrayT<double> darr(5); //申明一個變體數(shù)組，初始化5個元素darr(0) = 1.0;darr(4) = 5.0;//讀取索引[4]位置的數(shù)據(jù)darr.Redim(2, 3);//變成二維數(shù)組darr(0, 0) = 1.0;darr(0, 1) = 2.0;//讀取索引[0][1]位置的數(shù)據(jù)double d = darr(0, 1); }

特別的，VARIANT支持的字符串為BSTR類型，因此使用時要注意：

#include "SgxVariantArrayT.h" #include <afxtempl.h> //for CString #include <string> //for std::stringvoid test_str() {CSgxVariantArrayT<BSTR> sarr(5); //必須為BSTRsarr(0) = bstr_t("xx").copy();//注意這里要用.copy()得到一個新的bstr_t實例，否則臨時對象會共用一個實例，導(dǎo)致數(shù)組賦值后只能得到一個相同的值CString s("yy"), s1;sarr(4) = bstr_t(s).copy();//用CString 賦值s1 = sarr(0);//賦值給CStringstd::string ss("ss"), ss1;sarr(2) = bstr_t(ss.c_str()).copy();//用std::string 賦值ss1 = bstr_t(sarr(2));//賦值給std::string }

4 與CArray、vector數(shù)組的轉(zhuǎn)換

支持MFC CArray、std::vector數(shù)組以及一維指針數(shù)組。

# define CArray1T CArray<T, T> # define CArray2T CArray<CArray<T, T>> # define vector1T std::vector<T> # define vector2T std::vector<std::vector<T>> //...template <class T> class CSgxVariantArrayT : public _variant_t {//一維指針數(shù)組互換BOOL From(T* arr, int n1);BOOL ToArray(T* arr, int n1);//MFC CArray數(shù)組互換BOOL From(CArray1T& arr);BOOL From(CArray2T& arr);...BOOL ToArray(CArray1T& arr);BOOL ToArray(CArray2T& arr);...//std::vector數(shù)組互換BOOL From(vector1T& arr); BOOL From(vector2T& arr);...BOOL ToArray(vector1T& arr);BOOL ToArray(vector2T& arr);};

對CString std::string數(shù)組的轉(zhuǎn)化必須要做特殊處理。略過。感興趣可查看源代碼FromStringArray，ToStringArray函數(shù)。

示例代碼：

#include "SgxVariantArrayT.h" void test_SgxVariantArrayT() {long i, j, k, m, nn;//test with CArray{//一維CSgxVariantArrayT<double> vd;CArray<double, double> ad;ad.SetSize(6);for (i = 0; i < 6; ++i)ad[i] = i;vd.From(ad);vd.ToArray(ad);//二維nn = 0;CArray2(double) ad2;CSgxVariantArrayT<double>::SetArraySize(ad2, 2, 3);for (j = 0; j < 3; ++j)for (i = 0; i < 2; ++i)ad2[i][j] = nn++;vd.From(ad2);vd.ToArray(ad2);} //test with CStringArray{CStringArray as;CSgxVariantArrayT<BSTR> sv;as.SetSize(6);for (i = 0; i < 6; ++i)as[i].Format(_T("%d"), i * 10);sv.FromStringArray(as);sv(0) = bstr_t(as[1]).copy();//important with copy(), or sv(0) = sv(1)sv(1) = bstr_t(as[0]).copy();sv.ToStringArray(as);}//test with vector{//一維CSgxVariantArrayT<double> vd;vector1(double) ad;ad.resize(6);for (i = 0; i < 6; ++i)ad[i] = i;vd.From(ad);vd.ToArray(ad);//二維nn = 0;vector2(double) ad2;CSgxVariantArrayT<double>::SetArraySize(ad2, 2, 3);for (j = 0; j < 3; ++j)for (i = 0; i < 2; ++i)ad2[i][j] = nn++;vd.From(ad2);vd.ToArray(ad2);}//test with std::string Array{std::vector<std::string> as;char* cs[] = { "a", "b" , "c" , "d" , "e" , "f" };CSgxVariantArrayT<BSTR> sv;as.resize(6);for (i = 0; i < 6; ++i)as[i] = cs[i];sv.FromStringArray(as);sv(0) = bstr_t("xxx").copy();//important with copy(), or sv(0) = sv(1)sv(1) = bstr_t("yyy").copy();sv.ToStringArray(as);} }

5 Automation中的應(yīng)用實例

比如VC調(diào)用AutoCAD自動化：

#import "acax20chs.tlb" no_namespace named_guids #include "SgxVariantArrayT.h"void OnTest_Interface_vc2022() {CoInitialize(NULL);IAcadApplicationPtr pApp;IAcadDocumentsPtr pDocs;IAcadDocumentPtr pDoc;IAcadModelSpacePtr pMs;HRESULT h = NOERROR;CLSID clsid;//獲取Class IDh = ::CLSIDFromProgID(OLESTR("AutoCad.Application"), &clsid);if (FAILED(h))return;//獲取正在運行的對象h = pApp.GetActiveObject(clsid);if (!SUCCEEDED(h)){//沒有正在運行的對象，就創(chuàng)建一個h = pApp.CreateInstance(clsid, NULL, CLSCTX_ALL);if (FAILED(h))return;}pApp->WindowState = AcWindowState::acMax;pApp->Visible = VARIANT_TRUE;//新建一個AutoCAD文檔pApp->get_Documents(&pDocs);pDoc = pDocs->Add();//模型空間pDoc->get_ModelSpace(&pMs);//添加一條多義線CSgxVariantArrayT<double> arr(6);arr(0) = 0.0; arr(1) = 0.0; arr(2) = 0.0;arr(3) = 10.0; arr(4) = 10.0; arr(5) = 0.0;pMs->AddPolyline(arr);pApp->ZoomAll(); }

下載源代碼。（免費、免積分）。源代碼測試請調(diào)用靜態(tài)函數(shù) CSgxVariantArrayT::test()。

#include "SgxVariantArrayT.h" void test() {CSgxVariantArrayT<int>::test(); }

如果你覺得有幫助，別忘了幫我點個關(guān)注或點個贊！

總結(jié)

以上是生活随笔為你收集整理的SegeX SgxVariantArrayT：VC封装支持多维数组的变体类型（VRIANT 、SafeArray）（附免费免积分源代码）的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯，歡迎將生活随笔推薦給好友。