曲线趋势设置时间

wincc的报表编辑器里,放了一个趋势,不过想设置起始时间,和终止时间,我试了下,取的是system info 里面的 时间,不行啊,打印的时候,不显示

最佳答案

网上的一篇文章,也就是用脚本设置控件属性——

 

 首先,你需要建立2个输入输出域用于输入你要显示的起始时间和结束时间。(变量连接类型为字符型)

 然后你需要设立一个按钮(当然也可以直接在你一个按钮脚本中输入)用于将输入的字符型变量转换为时间日期格式。

 按钮的VBS脚本为:

 Sub onClick(ByVal Item) 

 Dim ActDate

 Dim Year_Sect

 Dim Month_Sect

 Dim Day_Sect

 Dim Date_Mod

 Dim Date_End

 Dim ActTime

 Dim Time_Mod_b

 Dim Time_Mod_e

 Dim DateString_b

 Dim DateString_e

 

       ActDate = Date      ‘当前日期                                                                         

       Year_Sect = Year(Date)    ‘提取年份 

       Month_Sect = Month(Date) ’提取月份

       Day_Sect = Day(Date)    ‘提取日

       Date_Mod = Day_Sect & "." & Month_Sect & "." & Year_Sect

       ’然后根据归档的要求将日期重新组合成,日.月.年的格式

       ActTime = Time ‘当前时间

                                      

     

       Time_Mod_b = DateAdd("n", -15, ActTime)    ’起始时间减15分钟

       Time_Mod_e = DateAdd("n", -5,    ActTime)     ‘结束时间减5分钟

       DateString_b = Date_Mod &" "& Time_Mod_b     ’将起始时间编为:日.月.年    时间格式

       DateString_e = Date_Mod &" "& Time_Mod_e

 

 

       HMIRuntime.Tags("strVar_1").Write DateString_b    ‘25.02.2004 21:10:00

       HMIRuntime.Tags("strVar_2").Write DateString_e

 

 End Sub

 这段程序的作用就是查看过去15分钟到过去5分钟的时间段,如果你要显示任意时间,那么只要不调用DateADD函数即可。

 接下来你需要设立一个按钮,用于将时间设定起作用。

 大体思路是这样的:首先,停止趋势的显示,也就是取消激活(这里只是指趋势控件,而不是指项目),然后将转换的时间写入的控件属性,最后再激活控件,由于控件的时间是根据所有曲线来的,所以如果(这里指假设)你有3个变量(3条曲线,那么你需要重复3次,也就是说,我们可以对任意的曲线的时间作设定。)

 C语言脚本如下:

 void onClick(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName)

 {

 SetPropWord(lpszPictureName,"Control2","Index",0);      

     //相当于选择控件名为control2的趋势控件的第一条曲线(曲线顺序根据你组态控件时添加变量的先后)                              

 SetPropBOOL(lpszPictureName,"Control2","Online",FALSE);

 //在线方式的取消         

 SetPropBOOL(lpszPictureName,"Control2","TimeRange",FALSE);

 //取消当前的时间范围,方便我们将要定义的时间范围灌入      

 SetPropBOOL(lpszPictureName,"Control2","Activate",FALSE);      

 //将趋势控件取消激活

 

 SetPropChar(lpszPictureName,"Control2","BeginTime",GetTagChar("strVar_1")); 

 //设置起始时间,STRVAR变量为先前VBS中转换过来的

 SetPropChar(lpszPictureName,"Control2","EndTime",GetTagChar("strVar_2"));   

 //设置结束时间

 

 SetPropWord(lpszPictureName,"Control2","Index",1);      

 //对第二条曲线设置时间,如果你只有1条,那么无需写这段了,如果有多条,那么重复多次,你只需要改变Index后的参数,如第二条曲线,那么就是1,第3条,那么就是2了。

 SetPropBOOL(lpszPictureName,"Control2","Online",FALSE);         

 SetPropBOOL(lpszPictureName,"Control2","TimeRange",FALSE);     

 SetPropBOOL(lpszPictureName,"Control2","Activate",FALSE);  

 

 SetPropChar(lpszPictureName,"Control2","BeginTime",GetTagChar("strVar_1")); 

 

 SetPropChar(lpszPictureName,"Control2","EndTime",GetTagChar("strVar_2"));   

 

 

 SetPropBOOL(lpszPictureName,"Control2","Activate",TRUE);        

 //当所需要的时间曲线都设定完了后,激活控件即可,注意,你如果要对多个曲线做时间范围设定,那么你不能使用公共X轴和公共Y轴属性,否则无法看出效果。

 }
 

提问者对于答案的评价:
谢谢,不过又出现了一个小问题,就是我设置好开始,结束时间,又把温度强制了一个数值,出来的趋势图前面少了一大截,这是怎么回事,高人,有时间给我解释下好吧,我的邮箱是wd05468@yahoo.com.cn

原创文章,作者:more0621,如若转载,请注明出处:https://www.zhaoplc.com/plc270690.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2019年6月11日
下一篇 2019年6月11日

相关推荐

  • WinCC V6.0 sp3 授权移值(急!!!!)

    为了尽快完成Wincc  程序,我在自己的电脑上安装了正版Wincc  授权,现在需要移值到用户现场的工控机上,该怎么操作??? 最佳答案 …

    SIMATIC WinCC 2019年6月11日
  • wincc 画面切换综合问题!请大神指导指导

    我这里有一个wincc项目,然后客户要求打开的时候,首先显示的的所有画面的缩率图,然后点击打开想看的画面。如果想再次选择画面要按一个按钮弹回选择画面的界面继续选择另外一个画面。我听…

    2017年6月12日
  • WINCC V6,0 SP3 两地使用同一软件问题PLC用s7-400

    在A室有一套WINCC6.0监视画面系统,我想在B室再装一套同样的的WINCC6.0系统,可以两地监视。我把A室的WINCC6.0监视程序拷贝到B室电脑上,运行时不好使为什么?我把…

    SIMATIC WinCC 2019年6月11日
  • WINCC时常没有响应

    1  我的WINCC5.1有时候退出WINCC时没有了响应,必须在任务管理器中关闭后,然后重起系统后才又能正常使用,为什么?2  &nbsp…

    SIMATIC WinCC 2019年6月11日
  • ListView控件如何使用

    我想知道listview如何定义属性,最好能有个脚本例子! 最佳答案 我这里有一个使用ListView控件显示来自数据库的记录的脚本代码可供参考: Dim oL…

    SIMATIC WinCC 2019年6月11日
  • 变量记录 SQL

    变量记录的归档数据在SQL数据库中的位置在哪里啊? 最佳答案 变量记录在数据库中的位置不是固定的,它是以文件的形式记录的,数据库再和这些文件关联,所以没有固定的数据库名,也就没有办…

    SIMATIC WinCC 2019年6月11日
  • WINCC文本变量读取写入

    想实现一个功能 就是报警高低限的输入和读取  现有一个页面由 静态文本  高报低报输入输出域  读取…

    SIMATIC WinCC 2019年6月11日
  • Wincc突然无法启动

    故障过程描述:1,在自己的电脑上用PCS7 6.1仿真一个多项目,一直很好用,昨天打开一个其它PCS7单项目,想用MPI仿真。『在此过程中,曾经因为不小心删除了原来的pr…

    SIMATIC WinCC 2019年6月11日
  • 在WINCC中建立多个同数据类型的变量

    在WINCC中建立多个同数据类型的变量 手动太麻烦有没有比较简便的方法 最佳答案 用WinCC组态工具啊,插入安装光盘,选择自定义安装即可。 WinCC&nbs…

    SIMATIC WinCC 2019年6月11日
  • wincc项目打不开?

    这个项目是在工程上拷贝下来的,换了一台电脑就打不开了.如图提示,求解. 图片说明:    最佳答案 除了他说的以外:你的项目复制的不完整。你现场关闭wincc资…

    2017年7月26日