控件如何传递自定义struct
作者：GongXiang
一、开发工具
我本来想用的是.ocx控件，最后发现，对于自定义struct，它似乎是无能为力(有谁知道.ocx可以的话请联系我)。最后采用的是vc++6.0中的ATL。下面给出了如何调用含自定义结构的组件函数senddata，ReceiveData。组件中的参数传递与下面的代码是一模一样的
，这里不再重复。（该组件是应用于配电自动化中的，用以实现馈线自动化FA功能，本人自己设计开发）。
二、源码
这里介绍如何向控件传递自己的结构。调用组件函数的源代码如下：
int result;
VARIANT LineVal;
VARIANT DotVal;
SAFEARRAY FAR * pLSA = NULL;
SAFEARRAYBOUND dimension[1];
dimension[0].lLbound =0;
dimension[0].cElements = MAX*10;
pLSA = SafeArrayCreate( VT_BSTR，1，dimension );
Line FAR *pLineData=NULL;
::SafeArrayAccessData(pLSA，( void HUGEP* FAR*) &pLineData );
for (i=0;i<MAX;i++)
{
pLineData[i].StaPoint_x=LineData[i].StaPoint_x;
pLineData[i].StaPoint_y=LineData[i].StaPoint_y;
pLineData[i].EndPoint_x=LineData[i].EndPoint_x;
pLineData[i].EndPoint_y=LineData[i].EndPoint_y;
pLineData[i].EndType=LineData[i].EndType;
pLineData[i].id=LineData[i].id;
pLineData[i].LineName=LineData[i].LineName;
pLineData[i].Longth=LineData[i].Longth;
pLineData[i].Power=LineData[i].Power;
pLineData[i].ShCirFlag=LineData[i].ShCirFlag;
}
::SafeArrayUnaccessData(pLSA);
LineVal.vt = VT_ARRAY;
LineVal.parray = pLSA;
SAFEARRAY FAR * pDSA = NULL;
Dot FAR *pDotData=NULL;
pDSA = SafeArrayCreate( VT_BSTR , 1, dimension );
::SafeArrayAccessData(pDSA, ( void HUGEP* FAR*) &pDotData );
for (i=0;i<MAX;i++)
{
pDotData[i].CutFlag=DotData[i].CutFlag;
pDotData[i].DotName=DotData[i].DotName;
pDotData[i].DotType=DotData[i].DotType;
pDotData[i].StaPoint_x=DotData[i].StaPoint_x;
pDotData[i].StaPoint_y=DotData[i].StaPoint_y;
pDotData[i].EndPoint_x=DotData[i].EndPoint_x;
pDotData[i].EndPoint_y=DotData[i].EndPoint_y;
pDotData[i].HighCurrent=DotData[i].HighCurrent;
pDotData[i].id=DotData[i].id;
pDotData[i].Power=DotData[i].Power;
}
::SafeArrayUnaccessData(pDSA);
DotVal.vt = VT_ARRAY;
DotVal.parray = pDSA;
// qfa是控件,
// senddata, ReceiveData是控件中的函数,
// LineVal和DotVal都是自己声明的结构
result=qfa.SendData(LineVal,DotVal,3);
long LineCount,DotCount;
//以下为接收数据
SAFEARRAY FAR * pReLSA = NULL;
SAFEARRAY FAR * pReDSA = NULL;
pReLSA = SafeArrayCreate( VT_BSTR , 1, dimension );
pReDSA = SafeArrayCreate( VT_BSTR , 1, dimension );
Line *pLData=NULL;
Dot *pDData=NULL;
qfa.ReceiveData(&LineVal,&LineCount,&DotVal,&DotCount);
pReLSA = LineVal.parray;
pReDSA = DotVal.parray;
::SafeArrayAccessData(pReDSA, ( void HUGEP* FAR*) &pDotData );
::SafeArrayUnaccessData(pReDSA);
for (int j=0;j<MAX;j++)
{
DotData[j].HighCurrent=-1;
}
for (i=0;i<DotCount;i++)
{
for (j=0;j<MAX;j++)
{
if (pDotData[i].id==DotData[j].id)
{
DotData[j].Power=pDotData[i].Power;
}
}
}
//Line 和Dot声明如下
struct Line
{
long id;//id号
BOOL Power;//有电标志
BSTR LineName;//线路名称
long StaPoint_x;//起点x
long StaPoint_y;//起点y
long EndPoint_x;//终点x
long EndPoint_y;//终点y
short EndType;//1 负荷 2 电源 0 其它
long Longth;
BOOL ShCirFlag;//短路标志
};
struct Dot
{
long id;
BOOL Power;//开合标志
BSTR DotName;//线路名称
long StaPoint_x;//起点x
long StaPoint_y;//起点y
long EndPoint_x;//终点x
long EndPoint_y;//终点y
short DotType;//可操作标志0 断路器不可遥控 1 断路器可遥控 2 刀闸 3 线路节点 4 变压器
short HighCurrent;//过流标志 -1未有过流数据 >=0有过流数据
BOOL CutFlag;//跳闸标志
};
//在ATL的idl文件中需要声明如下:
typedef
[
uuid(D124B04A-C5F9-4a16-9671-1E67B75DB1A1)，
helpstring("NetWork Node Struct")
]
struct Line
{
long id;//id号
BOOL Power;//有电标志
BSTR LineName;//线路名称
long StaPoint_x;//起点x
long StaPoint_y;//起点y
long EndPoint_x;//终点x
long EndPoint_y;//终点y
short EndType;//1 负荷 2 电源 0 其它
long Longth;
BOOL ShCirFlag;//短路标志
}Line;
typedef
[
uuid(D124B04A-C5F9-4a16-9671-1E67B75DB1A2)，
helpstring("NetWork Node Struct")
]
struct Dot
{
long id;
BOOL Power;//开合标志
BSTR DotName;//线路名称
long StaPoint_x;//起点x
long StaPoint_y;//起点y
long EndPoint_x;//终点x
long EndPoint_y;//终点y
short DotType;//可操作标志0 断路器不可遥控 1 断路器可遥控 2 刀闸 3 线路节点 4 变压器
short HighCurrent;//过流标志
BOOL CutFlag;//跳闸标志
}Dot;
然后就可以随意使用这两种结构了。
三、结束语
需要更多代码，请看例子源码.但是组件QFA2004的源码不能提供，请原谅。同时希望有更好办法的高手们提供更好的传递自定义struct的方法。源码使用方法：首先应注册QFA2004组件
。regsvr32 c:\qfa2004.dll(c:\目录根据qfa2004.dll的目录更改)，然后用VC++6.0打开，编译。
邮箱:qfa2004@126.com
