Connect方法示例
2015-12-15 22:24:53   来源：   评论：0 点击：

下列示例把TEMP1 输出串的值与 ）。

Dim objAnim as Object

Dim lngStatus as Long

'创建动画对象

Set objAnim = Rect1.BuildObject("Linear")

'初始化Linear对象的属性

objAnim.Source = "Fix32.Scada1.AI1.F_CV"

'设置范围内和范围外转换参数

objAnim.AutoFetch = True '设置其获取限值

objAnim.UseDelta = True '设置其进行相对运动

objAnim.LoOutValue = 0 '设置低输出值

objAnim.HiOutValue = 15 '设置高输出值

'连接动画对象的输出与矩形的位置

Rect1.Connect "HorizontalPosition", objAnim.FullyQualifiedName & ".OutputValue", lngStatus