佚名通过本文主要向大家介绍了该段,该段视频是希望你体会,该段发票状态未知,该段内容回复后可见,该段铁路沿等高线布线等相关知识,希望对您有所帮助,也希望大家支持linkedu.com www.linkedu.com
问题： 该段代码是否会内存泄露?
描述:
描述:
COM返回数组数据到vb,数组在com中创建,内存会泄漏吗,内存有在哪里被释放呢?
STDMETHODIMP CTestCom1::retarray(VARIANT *buffer)
{
//返回数组
SAFEARRAY FAR* psa;
SAFEARRAYBOUND rgsabound[1];
rgsabound[0].lLbound=0;
rgsabound[0].cElements=2;
psa=SafeArrayCreate(VT_I4,1,rgsabound);
long idx;
long setdt;
idx=0;
setdt=12;
SafeArrayPutElement(psa,&idx,&setdt);
idx=1;
setdt=342;
SafeArrayPutElement(psa,&idx,&setdt);
V_VT(buffer) = VT_ARRAY | VT_I4;
V_ARRAY(buffer)=psa;
return S_OK;
}
vb中的代码为：
Dim oo As ARRAYTESTLib.TestCom1
Set oo = New ARRAYTESTLib.TestCom1
Dim rarr As Variant
oo.retarray rarr
MsgBox rarr(0) & rarr(1)