iFIX使用ini文件做画面切换.pdf

西安开轩 使用ini 文件做画面切换 iFIX 张列艳、崔峻 2015/2/9 使用ini 文件做画面切换 目录 1、编写ini 文件 2 2、建立全局变量 4 3、标题连接数据源CurrentPicName 4 4 、编辑top.grf 画面 5 5、编辑二级菜单 13 西安开轩自动化有限责任公司 1 /17 西安市高新区锦业路38 号A 座7 层（710075 ） 029 使用ini 文件做画面切换 使用ini 文件做画面切换 张列艳、崔峻 1、编写ini 文件 编写ini 文件之前先确定画面结构，即共几幅画面，各个画面之间 的层级关系。 例如，一级菜单共6 个按钮，其中第一个按钮的下拉菜单有4 个 按钮，第二个按钮的下拉菜单有6 个按钮，第三个按钮的下拉菜单有 2 个按钮，其余三个按钮分别为趋势曲线，报表及操作记录，以上每 个按钮调出相应的画面。 ini 文件举例如下： 西安开轩自动化有限责任公司 2 /17 西安市高新区锦业路38 号A 座7 层（710075 ） 029 使用ini 文件做画面切换 西安开轩自动化有限责任公司 3 /17 西安市高新区锦业路38 号A 座7 层（710075 ） 029 使用ini 文件做画面切换 2、建立全局变量 在 Globals 下的 User 下创建变量 CurrentPicName （画面标题）， CurrentPic （画面名称），数据类型为string 型: 3、标题连接数据源CurrentPicName 西安开轩自动化有限责任公司 4 /17 西安市高新区锦业路38 号A 座7 层（710075 ） 029 使用ini 文件做画面切换 注意：各个图形画面需加上下面代码，否则无法切换： Private Sub CFixPicture_Initialize() User.CurrentPic.CurrentValue = Me.Name End Sub 4 、编辑top.grf 画面 按下图加入各个元素： 6 个按钮分别为CommandButton1-CommandButton6，脚本如下： 加入头文件，如下： Option Explicit Private Declare Function WritePrivateProfileString Lib kernel32 Alias WritePrivateProfileStringA (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As 西安开轩自动化有限责任公司