SAFEARRAY与SAFEARRAYBOUND用法

原网址：http://blog.csdn.net/zhangyulin54321/article/details/8056925

SAFEARRAY

　　SAFEARRAY的主要目的是用于automation中的数组型参数的传递。因为在网络环境中，数组是不能直接传递的，而必须将其包装成SafeArray。实质上SafeArray就是将通常的数组增加一个描述符，说明其维数、长度、边界、元素类型等信息。SafeArray也并不单独使用，而是将其再包装到VARIANT类型的变量中，然后才作为参数传送出去。在VARIANT的vt成员的值如果包含VT_ARRAY|...,那么它所封装的就是一个SafeArray，它的parray成员即是指向SafeArray的指针。 SafeArray中元素的类型可以是VARIANT能封装的任何类型，包括VARIANT类型本身。

　　使用SafeArray的具体步骤：

方法一，包装一个SafeArray

　　(1). 定义变量，如： 　　

VARIANT varChunk; 　

　 SAFEARRAY *psa; 　　

SAFEARRAYBOUND rgsabound[1]; 

　　(2). 创建SafeArray描述符： 

　　uIsRead=f.Read(bVal,ChunkSize);//read array from a file. 　

　 if(uIsRead==0)break; 　

　 rgsabound[0].cElements =uIsRead; 　

　 rgsabound[0].lLbound = 0; 　

　 psa = SafeArrayCreate(VT_UI1,1,rgsabound); 　

　(3). 放置数据元素到SafeArray： 　

　 for(long index=0;index<uIsRead;index++) 　

{ 　　

if(FAILED(SafeArrayPutElement(psa,&index,&bVal)))

　 ::MessageBox(NULL,"出毛病了。","提示",MB_OK | MB_ICONWARNING); 　　

} 　　

一个一个地放，挺麻烦的。 　

　(4). 封装到VARIANT内： 

　　 varChunk.vt = VT_ARRAY|VT_UI1; 　

　 varChunk.parray = psa; 　

　这样就可以将varChunk作为参数传送出去了。 　

　读取SafeArray中的数据的步骤： 　　

(1). 用SafeArrayGetElement一个一个地读 　

BYTE buf[lIsRead];

for(long index=0;index<lIsRead;index++)

{ 　　

::SafeArrayGetElement(varChunk.parray,&index,buf+index); 　　

} 　　就读到缓冲区buf里了。

方法二

　　用SafeArrayAccessData直接读写SafeArray缓冲区：

　　(1). 读缓冲区： 　

　 BYTE *buf; 　

　 SafeArrayAccessData(varChunk.parray, (void **)&buf);

f.Write(buf,lIsRead); 　　

SafeArrayUnaccessData(varChunk.parray); 

　　(2). 写缓冲区： 　

BYTE *buf; 　　

::SafeArrayAccessData(psa, (void **)&buf); 　

　 for(long index=0;index<uIsRead;index++) 　

{

 　　buf=bVal; 　　

} 　　

::SafeArrayUnaccessData(psa); 　　

varChunk.vt = VT_ARRAY|VT_UI1; 　

varChunk.parray = psa; 　

　 这种方法读写SafeArray都可以，它直接操纵SafeArray的数据缓冲区，比用SafeArrayGetElement和 SafeArrayPutElement速度快。特别适合于读取数据。但用完之后不要忘了调用::SafeArrayUnaccessData (psa)，否则会出错的。

如果SafeArray中存的是BSTR的二维数组,则代码如下：　

　 if(varChunk.vt = VT_ARRAY | VT_BSTR)　　

{

BSTR* buf;

long LBound; // 数组下界

long UBound; // 数组上界　　

SafeArrayAccessData(varChunk.parray, (void **)&buf); 　

　 SafeArrayGetLBound(varChunk.parray, 1, &LBound);　　

SafeArrayGetUBound(varChunk.parray, 1, &UBound);　　

for(long i = LBound; i < UBound; i ++)　　

{　　

CString str(buf);

MessageBox(str);　　

}　　

SafeArrayUnaccessData(varChunk.parray);　　

}

　　方法一：

　　包装一个SafeArray：

　　(1). 定义变量，如：

　　VARIANT varChunk;

　　SAFEARRAY *psa;

　　SAFEARRAYBOUND rgsabound[1];

rgsabound是一个有趣的成员，它的结构不太直观。它是数据范围的数组。该数组的大小依safe array维数的不同而有所区别。rgsabound成员是一个SAFEARRAYBOUND结构的数组--每个元素代表SAFEARRAY的一个维。

　　typedef struct tagSAFEARRAYBOUND
　　　{
　　　　unsigned long cElements;
　　　　unsigned long lLbound;
　　　} SAFEARRAYBOUND;

　　维数被定义在cDims成员中。例如，一个'C'类数组的维数可以是[3][4][5]-一个三维的数组。如果我们使用一个SAFEARRAY来表示这个结构，我们定义一个有三个元素的rgsabound数组--一个代表一维。

　　cDims = 3;
　　　 ...
　　SAFEARRAYBOUND rgsabound[ 3 ];

　　rgsabound[0]元素定义第一维。在这个例子中ILBOUND元素为0，是数组的下界。cElements成员的值等于三。数组的第二维（[4]）可以被rgsabound结构的第二个元素定义。下界也可以是0，元素的个数是4，第三维也是这样。要注意，由于这是一个"C"数组，因此由0开始，对于其它语言，例如Visual Basic，或者使用一个不同的开始。该数组的详细情况如下所示：

元素 cElements ILbound

rgsabound[0] 3 0

rgsabound[1] 4 0

rgsabound[2] 5 0

　　关于SAFEARRAYBOUND结构其实还有很多没说的。我们将要使用的SAFEARRAY只是一个简单的单维字节数组。我们通过API函数创建数组的时候，SAFEARRAYBOUND将会被自动设置。只有在你需要使用复杂的多维数组的时候，你才需要操作这个结构。

 

　　(2). 创建SafeArray描述符：

　　uIsRead=f.Read(bVal,ChunkSize);//read array from a file.

　　if(uIsRead==0)break;

　　rgsabound[0].cElements =uIsRead;

　　rgsabound[0].lLbound = 0;

　　psa = SafeArrayCreate(VT_UI1,1,rgsabound);

　　(3). 放置数据元素到SafeArray：

　　for(long index=0;index<uIsRead;index++)

　　{

if(FAILED(SafeArrayPutElement(psa,&index,&bVal)))

::MessageBox(NULL,"出毛病了。","提示",MB_OK | MB_ICONWARNING);

　　}

　　一个一个地放，挺麻烦的。

　　(4). 封装到VARIANT内：

　　varChunk.vt = VT_ARRAY|VT_UI1;

　　varChunk.parray = psa;

　　这样就可以将varChunk作为参数传送出去了。

　　读取SafeArray中的数据的步骤：

　　(1). 用SafeArrayGetElement一个一个地读

　　BYTE buf[lIsRead];

　　for(long index=0;index<lIsRead;index++)

　　{

::SafeArrayGetElement(varChunk.parray,&index,buf+index);

　　}

　　就读到缓冲区buf里了。

　　方法二：

　　使用SafeArrayAccessData直接读写SafeArray的缓冲区：

　　(1). 读缓冲区：

　　BYTE *buf;

　　SafeArrayAccessData(varChunk.parray, (void **)&buf);

　　f.Write(buf,lIsRead);

　　SafeArrayUnaccessData(varChunk.parray);

　　(2). 写缓冲区：

　　BYTE *buf;

　　::SafeArrayAccessData(psa, (void **)&buf);

　　for(long index=0;index<uIsRead;index++)

　　{

buf=bVal;

　　}

　　::SafeArrayUnaccessData(psa);

　　varChunk.vt = VT_ARRAY|VT_UI1;

　　varChunk.parray = psa;

　　这种方法读写SafeArray都可以，它直接操纵SafeArray的数据缓冲区，比用SafeArrayGetElement和 SafeArrayPutElement速度快。特别适合于读取数据。但用完之后不要忘了调用::SafeArrayUnaccessData (psa)，否则会出错的。

　　如果SafeArray中存的是BSTR的二维数组,则代码如下：

　　if(varChunk.vt = VT_ARRAY | VT_BSTR)

　　{

　　 BSTR* buf;

　　 long LBound; // 数组下界

　　 long UBound; // 数组上界

　　 SafeArrayAccessData(varChunk.parray, (void **)&buf);

　　 SafeArrayGetLBound(varChunk.parray, 1, &LBound);

　　 SafeArrayGetUBound(varChunk.parray, 1, &UBound);

　　 for(long i = LBound; i < UBound; i ++)

　　 {

　　 CString str(buf);

　　 MessageBox(str);

　　 }

　　 SafeArrayUnaccessData(varChunk.parray);

　　}