自定义曲线 实现XY实时曲线

效果动画演示

 

 实现步骤

 第一步：新建窗口，分别拖拽计数器、重量0,1,2,3 和 限定线最大值、最小值

 第二步：分别创建变量字典

第三步 ：通过 用户程序==>时间程序==>模拟产生变量值

脚本内容如下：

 Var.计数器=Var.计数器+3
    Var.称重重量0=Rnd()*3+Var.称重重量0
    Var.称重重量1=Rnd()*6+Var.称重重量1
    Var.称重重量2=Rnd()*9+Var.称重重量2
    Var.称重重量3=Rnd()*12+Var.称重重量3
    If Var.称重重量0>=100 then
        Var.称重重量0=0
    End If
     If Var.称重重量1>=100 then
        Var.称重重量1=0
    End If
    If Var.称重重量2>=100 then
        Var.称重重量2=0
    End If
    If Var.称重重量3>=100 then
        Var.称重重量3=0
    End If

第三步：选中“自定义曲线”控件，设定属性“横轴”，“纵轴”，“集合”

第四步：给按钮“同时加载四条曲线”添加事件 通过脚本给“自定义曲线”绑定XY值

Call 自定义曲线0.SetPeroidRefreshTime(1000) 
Call 自定义曲线0.StartSeries()

Call 自定义曲线0.SetActiveSeriesNo(0)
Call 自定义曲线0.SetTableNameForColumns("称重记录","计数器","称重重量0",1)
Call 自定义曲线0.RealTimeXYPoint(0,10,0,100)

Call 自定义曲线0.SetActiveSeriesNo(1)
Call 自定义曲线0.SetTableNameForColumns("称重记录","计数器","称重重量1",1)
Call 自定义曲线0.RealTimeXYPoint(1,10,0,100)

Call 自定义曲线0.SetActiveSeriesNo(2)
Call 自定义曲线0.SetTableNameForColumns("称重记录","计数器","称重重量2",1)
Call 自定义曲线0.RealTimeXYPoint(2,10,0,100)

Call 自定义曲线0.SetActiveSeriesNo(3)
Call 自定义曲线0.SetTableNameForColumns("称重记录","计数器","称重重量3",1)
Call 自定义曲线0.RealTimeXYPoint(3,10,0,100)

MsgBox "开始刷新"