西门子TP触摸屏-利用vbs让弹出窗口弹出位置在按钮附近

工控亿点点

西门子的TP精智系列触摸屏，可以使用vb脚本辅助编程，可以实现一些触摸屏本来不能做的事情。

此次说一下如何利用vbs，让弹出画面跟随在按钮附近弹出。

创建一个博途项目，组态一个HMI，我用的TP1200，都可以，随便用，当然，他要支持vbs，不支持就别组态了，比如KTP。

前提条件：创建一个弹出画面，尺寸可以自定义，我使用默认尺寸240x240，后期自己可以根据自己的需要，自行更改合适的尺寸

点击脚本，添加一个新的vb函数



声明变量



根据触摸屏点击的按钮，自动获取按钮的一些数据



通过获取的按钮数据，计算弹出的位置。此处以上居中为例子。例子中的240，就是弹出画面的尺寸数据。根据自己的需要，自行更改数据并计算。



最后，让它弹出这个画面。



完成视频



video: https://mp.weixin.qq.com/mp/readtemplate?t=pages/video_player_tmpl&action=mpvideo&auto=0&vid=wxv_2774977261174325251

注意事项：

弹出画面尺寸错误，弹出的位置也会错误。

如果计算到负值，或者计算到超出画面的值，则会在画面左上角弹出，如果在左上角弹出，基本可以确定计算的x和y的数据是错误的。例如视频中的1按钮和4按钮。