45fan.com - 路饭网

搜索: 您的位置主页 > 电脑频道 > 电脑教程 > 阅读资讯:COM参数传递数组的方法

COM参数传递数组的方法

2016-09-09 08:47:39 来源:www.45fan.com 【

COM参数传递数组的方法

好象很少情况会在com的参数中用到数组。但有时候数组确实也会有它的方便之处。特别是
变体数组可以存放不同的数据类型,特别的方便。(还有就是传递不定数目的参数时,可利
用变体数组,非常有用)
比如现在有一堆数据需要进行处理,处理的分支条件是数据的类型。

VB中的调用代码:

dim var1,var2
ReDim var1(3)
var1(0) = CInt(10) '整型需要*10
var1(1) = CLng(10) '长整型需要*100
var1(2) = CStr(10) '字串需要加个前缀:string:
var2 = com.handle(var1)

在Windows中对OLE的处理包含了对数组的处理,但用起来很麻烦。好在VC对其进行了包
装,COleSafeArray 可以很好并且很简单的处理。
VC中处理如下:(使用MFC)
VARIANT CComArrayHandle::handle(VARIANT FAR* var)
{
COleSafeArray saInput(var);
COleSafeArray saRet;
long index[1],l,u;
saInput.GetLBound(1,&l);
saInput.GetUBound(1,&u);
DWORD numElements[] = {abs(u-l)};
saRet.Create(VT_VARIANT, 1, numElements);
for(index[0]=l; index[0]<u; index[0]++)
{
index[0] = ii;
VARIANT val;
saInput.GetElement(index,&val);
switch (val.vt)
{
case VT_I2:
val.iVal = 10 * val.iVal;
break;
case VT_I4:
val.lVal = 100 * val.lVal;
break;
case VT_BSTR:
{
CString sTemp = val.bstrVal;
sTemp = _T("string:") + sTemp;
val.bstrVal = sTemp.AllocSysString();
break;
}
default:
break;
}
saRet.PutElement(index, &val);
}
return saRet.Detach();
}
如果要将一维数组变为多维数组,只需要简单更改参数即可。

 

本文地址:http://www.45fan.com/dnjc/73978.html
Tags: 参数 传递 COM
编辑:路饭网
关于我们 | 联系我们 | 友情链接 | 网站地图 | Sitemap | App | 返回顶部