怎样在触摸屏上做一个自定义的弹出窗口?
在触摸屏的应用中,一些故障、警告等提示信息通常是使用系统的报警窗口来实现。系统的报警窗口通常只有故障/警告的编号、日期时间及报警信息等内容,并且可以被折叠。这种千篇一律的报警窗口有时候并不能满足项目的要求。能不能做一个类似Windows弹窗一样的包含警告/提示信息的弹出窗口呢?今天这篇文章,我就和大家分享这个炫酷的技能。

我们在西门子的Comfort触摸屏上实现这种功能,采用的软件环境是博途V13(或更高版本)。
第一步:打开博途开发环境,在【画面管理】-【弹出画面】中新建一个弹出窗体画面,命名为:frmPopup1,如下图:

第二步:根据项目情况修改弹出窗体的大小及内容。这里我修改成方正智芯官网的网址(www.founderchip.com),并在【布局】项中修改弹出窗体的大小为:398x310,如下图:

第三步:创建两个变量:Tag_2sec 和Tag_Popup_Window。
Tag_2sec连接到PLC 的系统变量(2秒),用于触发VB脚本;
Tag_Popup_Window用来触发弹出窗口;
如下图:

第四步:编写用于窗体显示的VB脚本。代码如下图:

第五步:修改变量属性及调用条件。将Tag_2sec的采集模式修改为"循环连续(Cyclic continuous)",采集的周期为1s(或500ms)。
如下图:

单击Tag_2sec的【属性】-【事件】,在其【数值更改】事件中调用我们写好的VB脚本:Popup_Window。如下图:

由于Tag_2sec是一个周期为2秒的脉冲信号,当其数值发生变化时,将会调用VB脚本"Popup_Window"。此时,如果Tag_Popup_Window的值为1,则会在屏幕的左上角弹出窗体:frmPopup1;如果Tag_Popup_Window的值为0,则窗体frmPopup1会消失。
这样一个自定义的弹出窗体就完成了。是不是感觉很酷呢?感兴趣的小伙伴赶紧试试吧。
-
Origin(Pro):学习版的窗口限制【数据绘图】 2020-08-07
-
如何卸载Aspen Plus并再重新安装,这篇文章告诉你! 2020-05-29
-
AutoCAD 保存时出现错误:“此图形中的一个或多个对象无法保存为指定格式”怎么办? 2020-08-03
-
OriginPro:学习版申请及过期激活方法【数据绘图】 2020-08-06
-
CAD视口的边框线看不到也选不中是怎么回事,怎么解决? 2020-06-04
-
教程 | Origin从DSC计算焓和比热容 2020-08-31
-
如何评价拟合效果-Origin(Pro)数据拟合系列教程【数据绘图】 2020-08-06
-
Aspen Plus安装过程中RMS License证书安装失败的解决方法,亲测有效! 2021-10-15
-
CAD外部参照无法绑定怎么办? 2020-06-03
-
CAD中如何将布局连带视口中的内容复制到另一张图中? 2020-07-03
