发表于:2002-03-27 18:28:00
楼主
3.10 定制设备属性设置对话框
MCGS中,大多数设备构件的属性设置在MCGS提供的基本属性页中就能完成,但有些比较复杂的设备,需要定制一些特定的属性窗口,才能完成设备属性的设置,如欧姆龙PLC需要首先定义设备通道,建立设备构件的通道和PLC内部继电器区的连接关系。
MCGS设备驱动接口SetDevPage,允许用户定制特定的设备属性对话框。当用户在基本属性页中,单击“设备内部属性”对应的按钮时,MCGS通过调用接口SetDevPage来打开设备的内部属性页。
定制设备属性设置对话框的步骤如下:
按照本章的前面各节所述,利用MCGS提供的高级开发,生成设备构件的源程序框架,假定工程名为MyDev;
在当前工程组中增加一个类型为Active DLL的工程,修改工程名为MyDevPg,修改类模块名为DevPageObj;
在MyDevPg工程中,增加一个窗体,命名为DevPageFrm;
在类模块DevPageObj中增加如下代码:
Public Function SetDevPage(SavObj As Object) As Long
Dim dlg As DevPageFrm
Set dlg = New DevPageFrm
dlg.Show 1
End Function
编译MyDevPg工程后,在工程属性中把工程该为二进制兼容模式;
建立工程MyDev对工程MyDevPg的引用,以便在接口SetDevPage操作MyDevPg中的对象;
在接口DevPage中增加如下程序代码:
dim dlg As DevPageObj
Set dlg = New DevPageObj
dlg. SetDevPage(SavObj)
重新编译工程MyDev和MyDevPg得到两个DLL文件:MyDev.dll和MyDevPg.dll;
这样,就完成了定制设备属性页的全部程序框架的工作,下一步根据设备的具体内容来编制设备属性设置窗口和保存设备的属性。MCGS高级开发指南中,提供有欧姆龙PLC驱动程序的全部原代码,可参考其中的具体编程细节。