|
对象属性和方法 |
  
|
对象属性和方法
|
对象属性和方法 |
|
每个对象都有其属性和方法，在脚本编辑器中，输入脚本对象，然后输入“.” ，会出现该对象的方法和属性，用户可以选择需要的方法和属性，如下图所示：
u脚本对象的事件
„OnClick：单击响应；如果编辑该事件，运行状态下，移动到该图元时如图元可见，鼠标会变为手型。
„OnDbClick：双击响应。
„OnLButtonDown(long lFlag, long lPointX, long lPointY)：鼠标左键按下响应；如果编辑该事件，运行状态下，移动到该图元时如图元可见，鼠标会变为手型。
„OnLButtonUp(long lFlag, long lPointX, long lPointY)：鼠标左键抬起响应。
„OnMouseMoveIn(long lPointX, long lPointY)：鼠标移入对象响应。
„OnMouseMoveOut(long lPointX, long lPointY)：鼠标移出对象响应。
„OnRClick：右键单击响应。
„OnPropChanged(VARIANT varPropName, VARIANT varOldValue, VARIANT varNewValue)：自定义属性值发生改变响应。
„OnKeyDown(long lChar, long lRepCnt, long lFlag)：键盘按下响应。
„OnChange()：下拉列表值发生改变响应。
„OnDropDown()：点击下拉列表发生响应。
„Initialize：对象初始化。
„UnInitialize：对象释放。
u脚本对象的方法和属性
„Name：对象名称，字符串型。
„Type：对象类型，字符串型。
„FillColor：对象填充色，无符号长整型。
举例：
Dim Color
Color = &hff32ef
Rectangle2.FillColor Color
„FillBGColor：对象填充背景色，无符号长整型。
„FillHatch：对象填充画刷风格，整数型。
„FillTrans：是否填充为透明，布尔型。
„FillHorOrientation：水平填充方向，整数型。
„FillVerOrientation：竖直填充方向，整数型。
„FillHorScale：水平填充比例，浮点型。
„FillVerScale：竖直填充比例，浮点型。
„LineColor：线颜色，无符号长整型。
„LineWidth：线宽，整数型。
„LineStyle：线风格，整数型。
„Left：距左边距离，浮点型，像素为单位。
„Top：距上边距离，浮点型，像素为单位。
„Width：对象宽度，浮点型，像素为单位。
„Heigh：对象高度，浮点型，像素为单位。
„HorScale：水平填充比例，浮点型，百分数。
„VerScale：竖直填充比例，浮点型，百分数。
„HorOrientation：水平填充方向，整数。
„VerOrientation：竖直填充方向，整数。
„Text：文本对象的文本，字符串型。
„RotateCenterVertex：旋转中心，整数型。
„RotateCenterX：旋转中心的X坐标，整数型。
„RotateCenterY：旋转中心的Y坐标，整数型。
„RotateDegree：旋转角度，浮点型。
„Sound：声音序号，整数型。
„Flash：闪烁序号，整数型。
„Visible：是否可见，布尔型。
„VisibleLayers：设置、显示画面或对象所属图层，整数型。
„SetLayer：设置画面或对象所属图层。LayerID：图层号；lVisible：是否设置画面或对象属于该图层；无返回值。
„ToolTip：设置、显示对象的提示信息；字符串型。
„ScadaName：获取图库精灵对象关联的节点名；字符串型。
„ObjName：获取图库精灵对象关联的对象名；字符串型。
„SetFocus：设置焦点；只对windows控件对象有效
„GetVertexPoints：获取顶点坐标及其个数，a是坐标的数组，b是个数，此方法仅限于多边形。
举例：
Sub Rectangle2_OnClick()
polygon1.GetVertexPoints a,b ‘获取顶点坐标及其个数，a是坐标的数组，b是个数
„SetVertexPoints：设置顶点坐标，c为二维数组，该数组必须重新定义，不能直接拿a来用，此方法仅限于多边形。
举例：
Dim c()
ReDim c(b-1,1)
For i=0 to b-1
If i=3 Or i=2 Then
c(i,0) = a(i,0)+50
Else
c(i,0) = a(i,0)
End If
c(i,1) = a(i,1)
Next
polygon1.SetVertexPoints c '设置顶点坐标，c为二维数组，该数组必须重新定义，不能直接拿a来用
End Sub