第3章组态王的画面的组态

“属性”选项卡中包括对象的几何尺寸、颜色、样 式、填充等外观特性，定义对象是如何出现在画 面上。可以修改对象的“属性”中的相关值来改 变对象的外观，如修改圆的背景颜色为红色，线 颜色为绿色。
青岛大学自动化工程学院
5
组态软件及其应用
“事件”选项卡包括对象的鼠标、键盘等操作设置 及对象属性引发的动作设置等，如图3-13所示。 可以为各种“事件”添加相应的动作和动态效果。
"Color value_container" "Color_input"
组态： -Events/ Option Group/ Miscellaneous/ Object Change/ C-action: int input; input=GetTagDWord("Color_input"); switch (input) { case 1: SetTagDWord("Colorvalue_container",CO_RED); break; case 2: SetTagDWord("Colorvalue_container",CO_GREEN); break; case 4: SetTagDWord("Colorvalue_container",CO_BLUE); break; } - Properties/ Option Group/ Output-input/ Selected Field/ Dynamic / Tag: Color_input
青岛大学自动化工程学院
13
组态软件及其应用
6、C动作
练习1
输入输出换算：I/O域1+100=I/O域2
int back; back=GetTagWord(Tag6);
back=back+100;
return (back);
青岛大学自动化工程学院
14
组态软件及其应用
练习2
单击一下按钮就加1/减1
float temp; temp=GetTagFloat(Tag6); temp=temp+1; SetTagFloat(Tag6,temp);
青岛大学自动化工程学院
6
组态软件及其应用
3.3 组态动态效果 1. 2. 3. 4. 5. 6. 7. 组态对话框 动态对话框 直接连接 变量 动态向导 C动作 VBS动作
青岛大学自动化工程学院
7
组态软件及其应用
1、组态对话框
“智能对象”中的控件、I/O域、棒图、图形 对象、状态显示、文本列表和“Windows对 象”中的按钮、滚动条对象。
青岛大学自动化工程学院
20
组态软件及其应用
通常一个值传递到变量管理器然后动作处理重新 开始，但有时在动作重新开始之前要确保值先被 写入，则可以使用可选参数附加1来实现。
Dim objTag
Set objTag = HMIRuntime.Tags("Tag1")
objTag.Write 8,1
Dim objTag
青岛大学自动化工程学院
24
组态软件及其应用
思考
华氏温度和摄氏温度的转换。
青岛大学自动化工程学院
25
组态软件及其应用
思考
更改瓶子的坐标位置，使其按照某种规律运动。
青岛大学自动化工程学院
26
组态软件及其应用
综合练习
1. 按钮对象作瞬时开关。“Off”状态以灰色显示， “On”状态以绿色显示，文本指示。
青岛大学自动化工程学院
2
组态软件及其应用
标题栏
菜单栏
工具栏
调色板
对象选 项板
缩放选 项板
样式选 项板
动态向导 层 状态栏 对齐选 项板
青岛大学自动化工程学院
3
组态软件及其应用
3.2 画面对象的属性
可以看到：对象属性对话框包括“属性”和“事 件”两个选项卡。
青岛大学自动化工程学院
4
组态软件及其应用
练习3
退出运行系统。
HMIRuntime.Stop
青岛大学自动化工程学院
19
组态软件及其应用
练习4
读写一个项目变量
第一种方法：
HMIRuntime.Tags("Tag1").Write 6
第二种方法：
Dim objTag Set objTag = HMIRuntime.Tags("Tag1") objTag.Write 7
CO_DKRED CO_DKGREEN CO_DKBLUE CO_DKCYAN CO_DKYELLOW CO_DKMAGENTA CO_DKGRAY CO_WHITE
本例采用C动作来实现，其它实现方法请自行练 习。
青岛大学自动化工程学院 28
组态软件及其应用
任务
检查一个过程变量是否超过极限值。该变量范围： 从 0到1000。若Value > 800: 颜色从墨绿色变为 黄色；第二个 Value > 900: 颜色从黄色变为红色。 需要一个 I/O 域以及一个棒图。 另外，为输入数 值，组态一个滚动条。 I/O 域和棒图都与过程变 量连接。
组态： -Properties/ I/O field/ Output-input/ Output Value/ Dynamic: "level_container"
组态： -Events/ Option Group/ Property topics/ Output/ Input/ Selected Field/ Change/ C-action: int input; input=GetTAGDWord("level_input"); switch (input) { case 1: SetTagDWord("level_container",20); break; case 2: SetTagDWord("level_container",50); break; case 4: SetTagDWord("level_container",90); break; } -Properties/ Option Group/ Output-input/ Selected Field/ Dynamic/ Tag: level_input
青岛大学自动化工程学院
29
组态软件及其应用
+0
类型 I/O
青岛大学自动化工程学院
30
组态软件及其应用
3.复选框 Check Box (对象的事件)
用变量连接组态： -Properties/ Output-input/ Selected Fields/ Dynamics: Tangram (signed 32-bit value)
青岛大学自动化工程学院 10
组态软件及其应用
3、直接连接
1. 练习1：组态一个瞬时按钮，即按钮按下 时变量Tag4的值为1，释放时为0； 2. 练习2：将滚动条移动改变后的值传给矩 形的液位填充量属性，矩形液位填充量属 性又传给静态文本。 3. 拖动滚动条改变圆对象的位置。
青岛大学自动化工程学院
11
青岛大学自动化工程学院
CO_RED CO_GREEN CO_BLUE CO_CYAN CO_YELLOW CO_MAGENTA CO_LTGRAY CO_BLACK
Red Green Blue Cyan Yellow Magenta Gray White
0x00000080: 0x00008000: 0x00800000: 0x00808000: 0x00008080: 0x00800080: 0x00808080: 0x00FFFFFF:
Set objTag = HMIRuntime.Tags("Tag1") objTag.Value = 8 objTag.Write ,1
青岛大学自动化工程学院
21
组态软件及其应用
练习5
单击一下按钮就加1/减1
Dim a Set a=HMIRuntime.Tags("Tag1")
a.Read
a.Value=a.Value+100 a.Write
用直接连接删除显示 -Source: Constant 0 -Target: Tag Tangram
用动态会话使显示成为动态的 位地址 0 //头 1 //左臂 2 //右臂 3 //左腿 4 //右腿 5 //左脚 6 //右脚
青岛大学自动化工程学院
31
组态软件及其应用
4.选项组 Option Group (对象的事件)
组态软件及其应用
第3章 画面的组态
3.1 图形编辑器概述 3.2 画面对象的属性 3.3 组态动态的几种方法 3.4 画面模板 3.5控件的使用 3.6 库 3.7 为对象生成帮助提示
青岛大学自动化工程学院
1
ห้องสมุดไป่ตู้
组态软件及其应用
3.1 图形编辑器概述
1. 2. 3. 4. 5. 6.
对象选项板 样式选项板 调色板 动态向导 层 等等
青岛大学自动化工程学院
22
组态软件及其应用
思考：一个I/O域输入数值，单击按钮设置圆的直 径为该I/O域对应的数。
青岛大学自动化工程学院
23
组态软件及其应用
练习6
输入输出换算：I/O域1+100=I/O域2
Dim obj Set obj=HMIRuntime.Tags("Tag200")
OutputValue_Trigger=obj.Read+100
符号常量 (用 #定义，除了预定义) Dark