System Manual: Siemens SIMATIC HMI (WinCCv7.0: Scripting VBS, ANSI-C, VBA)
Подождите немного. Документ загружается.
.ReferenceRotationLeft = 50
.ReferenceRotationTop = 50
End With
End Sub
See also
RotationAngle Property (Page 2274)
ReferenceRotationTop Property (Page 2271)
PolyLine Object (Page 1928)
Polygon Object (Page 1925)
Line Object (Page 1897)
ReferenceRotationTop Property
Description
Defines or returns the Y-coordinate of the reference point about which the object should be
rotated in Runtime.
The value of the Y-coordinate is relative to the object width. Enter the value in percent starting
from the top edge of the rectangle enclosing the object.
Example:
The "PolyLineConfiguration()" procedure accesses the properties of the PolyLine object. In
this
example, the coordinates of the reference point will be set to 50% of the object width and
50% of the object height:
Sub PolyLineConfiguration()
'VBA697
Dim objPolyLine As HMIPolyLine
Set objPolyLine = ActiveDocument.HMIObjects.AddHMIObject("PolyLine1", "HMIPolyLine")
With objPolyLine
.ReferenceRotationLeft = 50
.ReferenceRotationTop = 50
End With
End Sub
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
2271
See also
RotationAngle Property (Page 2274)
ReferenceRotationLeft Property (Page 2270)
PolyLine Object (Page 1928)
Polygon Object (Page 1925)
Line Object (Page 1897)
Relevant Property
Description
TRUE, when the object will be taken into account when forming the group display. BOOLEAN
write-read access.
Example:
The "GroupDisplayConfiguration()" procedure accesses the properties of the Group Display.
In this example the object for forming the group display will be considered:
Sub GroupDisplayConfiguration()
'VBA698
Dim objGroupDisplay As HMIGroupDisplay
Set objGroupDisplay = ActiveDocument.HMIObjects.AddHMIObject("GroupDisplay1",
"HMIGroupDisplay")
With objGroupDisplay
.Relevant = True
End With
End Sub
See also
Group Object (Page 1873)
ResultType Property
Description
Defines or returns the value range evaluation type in the Dynamic dialog.
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
2272
System Manual, 11/2008,
Example:
In the following example the radius of a circle will be dynamically configured using the Dynamic
dialog, a tag name will be assigned and the associated property values will be assigned to
both the binary value ranges:
Sub AddDynamicDialogToCircleRadiusTypeBinary()
'VBA699
Dim objDynDialog As HMIDynamicDialog
Dim objCircle As HMICircle
Set objCircle = ActiveDocument.HMIObjects.AddHMIObject("Circle_C", "HMICircle")
Set objDynDialog = objCircle.Radius.CreateDynamic(hmiDynamicCreationTypeDynamicDialog,
"'NewDynamic1'")
With objDynDialog
.ResultType = hmiResultTypeBool
.BinaryResultInfo.NegativeValue = 20
.BinaryResultInfo.PositiveValue = 40
End With
End Sub
See also
DynamicDialog Object (Page 1851)
RightComma Property
Description
Defines or returns the number of decimal places (0 to 20) for the BarGraph object.
Example:
The "BarGraphConfiguration()" procedure configures In this example the number of decimal
places will be limited to 4.
Sub BarGraphConfiguration()
'VBA700
Dim objBarGraph As HMIBarGraph
Set objBarGraph = ActiveDocument.HMIObjects.AddHMIObject("Bar1", "HMIBarGraph")
With objBarGraph
.RightComma = 4
End With
End Sub
See also
BarGraph Object (Page 1819)
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
2273
RotationAngle Property
Description
Line, Polygon and PolyLine
Defines or returns the rotation angle of the following objects in degrees: Line, Polygon,
PolyLine.
The object is displayed in Runtime only rotated clockwise around the reference point by the
specified value (starting from the configured starting position).
T-piece
Defines or returns the orientation of a T-piece in degrees. The attribute can only assume one
of four values:
0 The standard position of the T-piece is the shape of the letter "T"
90 The "leg" of the "T" points towards the left
180 The "leg" of the "T" points upwards
270 The "leg" of the "T" points to the right
Other values are automatically converted to modulus 360 and rounded up or down to the
nearest permissible value.
The T-piece is shown rotated around the center point in the project and in Runtime.
Example:
The "PolyLineConfiguration()" procedure accesses the properties of the PolyLine object. In
this example the object will be rotated by 45° in Runtime:
Sub PolyLineConfiguration()
'VBA701
Dim objPolyLine As HMIPolyLine
Set objPolyLine = ActiveDocument.HMIObjects.AddHMIObject("PolyLine1", "HMIPolyLine")
With objPolyLine
.ReferenceRotationLeft = 50
.ReferenceRotationTop = 50
.RotationAngle = 45
End With
End Sub
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
2274
System Manual, 11/2008,
See also
ReferenceRotationTop Property (Page 2271)
ReferenceRotationLeft Property (Page 2270)
PolyLine Object (Page 1928)
Polygon Object (Page 1925)
Line Object (Page 1897)
RoundCornerHeight Property
Description
Defines or returns the corner radius of the RoundRectangle object.
Enter the value as a percentage of half the height of the object.
Example:
The "RoundRectangleConfiguration()" procedure accesses the properties of the object
RoundRectangle.
In this example the corner radius will be set to 25% (height) and 50% (width).
Sub RoundRectangleConfiguration()
'VBA702
Dim objRoundRectangle As HMIRoundRectangle
Set objRoundRectangle = ActiveDocument.HMIObjects.AddHMIObject("RoundRectangle1",
"HMIRoundRectangle")
With objRoundRectangle
.RoundCornerHeight = 25
.RoundCornerWidth = 50
End With
End Sub
See also
RoundCornerWidth Property (Page 2275)
RoundRectangle Object (Page 1945)
RoundCornerWidth Property
Description
Defines or returns the corner radius of the RoundRectangle object.
Enter the value as a percentage of half the width of the object.
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
2275
Example:
The "RoundRectangleConfiguration()" procedure accesses the properties of the object
RoundRectangle.
In this example the corner radius will be set to 25% (height) and 50% (width):
Sub RoundRectangleConfiguration()
'VBA703
Dim objRoundRectangle As HMIRoundRectangle
Set objRoundRectangle = ActiveDocument.HMIObjects.AddHMIObject("RoundRectangle1",
"HMIRoundRectangle")
With objRoundRectangle
.RoundCornerHeight = 25
.RoundCornerWidth = 50
End With
End Sub
See also
RoundCornerHeight Property (Page 2275)
RoundRectangle Object (Page 1945)
4.4.8.14 S
SameSize Property
Description
TRUE, when all four buttons of a Group Display object have the same size. BOOLEAN write-
read access.
Example:
The "GroupDisplayConfiguration()" procedure accesses the properties of the Group Display.
In this example all four buttons will have the same size.
Sub GroupDisplayConfiguration()
'VBA704
Dim objGroupDisplay As HMIGroupDisplay
Set objGroupDisplay = ActiveDocument.HMIObjects.AddHMIObject("GroupDisplay1",
"HMIGroupDisplay")
With objGroupDisplay
.SameSize = True
End With
End Sub
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
2276
System Manual, 11/2008,
See also
GroupDisplay Object (Page 1874)
ScaleColor Property
Description
Defines or returns the color of the scale. LONG write-read access.
The "Scaling" property must be set to TRUE for the color to be displayed.
Determination of Color Value
The color is displayed in RGB format (Red, Green, Blue). Specify the corresponding decimal
value for each of the three RGB values (value range from 0 to 255).
Use VBA function "RGB" to assign a color to a property. The color "red", for example, is
represented as follows: RGB(255, 0, 0)
Example:
The "BarGraphConfiguration()" procedure configures In this example the scale will be
displayed and the scale color will be set to "Red":
Sub BarGraphConfiguration()
'VBA705
Dim objBarGraph As HMIBarGraph
Set objBarGraph = ActiveDocument.HMIObjects.AddHMIObject("Bar1", "HMIBarGraph")
With objBarGraph
.Scaling = True
.ScaleColor = RGB(255, 0, 0)
End With
End Sub
See also
Scaling Property (Page 2278)
BarGraph Object (Page 1819)
ScaleTicks Property
Description
Defines or returns the number of scale sections for the BarGraph object.
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
2277
A scale section is a part of the scale bounded by two long scale strokes or division ticks. If you
assign a value of "0" to the property, the appropriate scale marks will be calculated
automatically.
Example:
The "BarGraphConfiguration()" procedure configures In this example the number of scale
sections will be set to "10".
Sub BarGraphConfiguration()
'VBA706
Dim objBarGraph As HMIBarGraph
Set objBarGraph = ActiveDocument.HMIObjects.AddHMIObject("Bar1", "HMIBarGraph")
With objBarGraph
.Scaling = True
.ScaleTicks = 10
End With
End Sub
See also
BarGraph Object (Page 1819)
Scaling Property
Description
TRUE if a scale is also used to display the values in the case of the BarGraph object. BOOLEAN
write-read access.
Example:
The "BarGraphConfiguration()" procedure configures the properties of the BarGraph object.
In this example the scale will be displayed and the scale color will be set to "Red":
Sub BarGraphConfiguration()
'VBA707
Dim objBarGraph As HMIBarGraph
Set objBarGraph = ActiveDocument.HMIObjects.AddHMIObject("Bar1", "HMIBarGraph")
With objBarGraph
.Scaling = True
.ScaleColor = RGB(255, 0, 0)
End With
End Sub
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
2278
System Manual, 11/2008,
See also
BarGraph Object (Page 1819)
ScalingMode property
Description
Defines the size to display the objects of the faceplate instance.
Default Like scaling mode "proportional"
1 : 1 The faceplate type is displayed in the original size in the faceplate instance. If
the
faceplate instance is too small, the size of the faceplate instance is adapted
to the size of the faceplate type.
Proportional The faceplate type is scaled in proportion with the size of the faceplate
instance.
Example
ScalingType Property
Description
Defines or returns the type of bar scaling. Value range from 0 to 2.
The "Scaling" property must be set to TRUE for the color to be displayed.
Bar Scaling Assigned Value
Linear 0
Logarithmic 1
Automatic 2
Example:
The "BarGraphConfiguration()" procedure configures In this example the bar scaling will be
set to "Linear":
Sub BarGraphConfiguration()
'VBA708
Dim objBarGraph As HMIBarGraph
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
2279
Set objBarGraph = ActiveDocument.HMIObjects.AddHMIObject("Bar1", "HMIBarGraph")
With objBarGraph
.ScalingType = 0
.Scaling = True
End With
End Sub
See also
Scaling Property (Page 2278)
BarGraph Object (Page 1819)
ScriptType Property
Description
Returns the script type (C or VBS) which was used to make a property or event dynamic. Read
only access.
Example:
In the following example a button and a circle will be inserted in the active picture. In Runtime
the
radius of the circle will enlarge every time you click the button. In this case the script type
will be output:
Sub ExampleForPrototype()
'VBA709
Dim objButton As HMIButton
Dim objCircleA As HMICircle
Dim objEvent As HMIEvent
Dim objVBScript As HMIScriptInfo
Dim strScriptType As String
Set objCircleA = ActiveDocument.HMIObjects.AddHMIObject("CircleA", "HMICircle")
Set objButton = ActiveDocument.HMIObjects.AddHMIObject("myButton", "HMIButton")
With objCircleA
.Top = 100
.Left = 100
End With
With objButton
.Top = 10
.Left = 10
.Width = 200
.Text = "Increase Radius"
End With
'On every mouseclick the radius have to increase:
Set objEvent = objButton.Events(1)
Set objVBScript = objButton.Events(1).Actions.AddAction(hmiActionCreationTypeVBScript)
Select Case objVBScript.ScriptType
Case 0
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
2280
System Manual, 11/2008,