BCB调用Vc写的Ocx，有那个变量可以对应COleSafeArray这个Vc变量呢

[baby52u]

调用symbol的 ssiconnect.ocx 时遇到其中一个函数
typedef /* [wire_marshal] */ struct tagVARIANT VARIANT;
long __fastcall GetDecodeData(VARIANT* DecodeData, short Type, short* SSICode);

而在VC例程中DecodeData使用的是COleSafeArray这个类型。捣鼓了好久也没弄明白，在BCB中有那个可以代替这个变量呢
COleSafeArray sa;
COleSafeArray *psa = &sa;
unsigned char *ptmpbuf;
short code;

sa.Clear();

m_ssi.GetDecodeData(psa,VT_UI1, &code );

[baby52u]

我直接用VARIANT对像，但没有返回值呢 COleSafeArray应该是个安全数组 ： tagVARIANT varChunk; SAFEARRAY *psa; SAFEARRAYBOUND rgsabound[1]; rgsabound[0].cElements = 100; rgsabound[0].lLbound = 0; psa = SafeArrayCreate(VT_UI1,1,rgsabound); varChunk.vt = VT_ARRAY|VT_UI1; varChunk.parray = psa; short tt; SafeArrayLock(psa); long len=SSIConnect1->GetDecodeData(&varChunk,VT_UI1,&tt); SafeArrayUnlock(psa); unsigned char pReceData[512]; memset(pReceData,0,sizeof(pReceData)); long i=0; strcpy(pReceData,(unsigned char *)varChunk.parray->pvData); SafeArrayDestroy(psa); 仍然不行 请赐教

[ccrun.com]

GetDecodeData以后，返回值len是多少？OCX的开发方有没有提供文档什么的？

[baby52u]

len一直返回0 正常应该返回扫描数据的长度。 Visual Basic programmers will set the Type parameter to vbString. VC++ programmers can set the parameter to VT_BSTR or they may wish to set it to VT_UI1 if DecodeData is expected to contain binary data. 另一个文档上： he type specifier is needed because although Visual Basic programs may manipulate the data using a vbString, Visual C++ programmers use a data type specifier of VT_UI1, and DecodeData would be a pointer to ColeSafeArray, allowing the returned data to be manipulated as an array of unsigned character.

[baby52u]

我试过在Vb上确实能返回正确数值，我故意把参数vbString改为其他值，返回值就成0了。

[ccrun.com]

COleSafeArray是从VARIANT继承来的，可以用VARIANT对象代入。