All Frameworks Object Hierarchy This Framework Indexes
o Property Angle( | ) As |
Angle90Clockwise = -90 MyText.Angle = Angle90Clockwise
o Property IdentificationLineSide( | ) As |
MyWeld.IdentificationLineSide = catWeldingUp
o Property Leaders( | ) As (Read Only) |
Dim LeaderCollection As DrawingLeaders Set LeaderCollection = MyWelding.Leaders
o Property TextProperties( | ) As (Read Only) |
Dim TextProperties As DrawingTextProperties Set TextProperties = MyWelding.TextProperties
o Property WeldingSide( | ) As |
MyWeld.WeldingSide = catWeldingUp
o Property WeldingTail( | ) As |
MyWeld.WeldingTail = catDftWeldingTailYES
o Property x( | ) As |
X = MyWelding.x
o Property y( | ) As |
NewYCoordinate = 5*25.4/1000 MyWelding.y = NewYCoordinate
o Func GetAdditionalSymbol( | iWeld) As |
MyWelding.Symbol = DftConcaveSymbol
o Func GetFinishSymbol( | iWeld) As |
MyWelding.GetFinishSymbol(catWeldingFieldOne,oFinishSymbol)
o Func GetSymbol( | iWeld) As |
MyWelding.GetSymbol(catWeldingFieldOne,oSymbol)
o Func GetTextRange( | iField) As |
Dim textRange As DrawingTextRange Set textRange = MyWelding.GetTextRange (catWeldingUp)
o Sub SetAdditionalSymbol( | iSymbol, | |
iweld) |
MyWelding.Symbol = DftConcaveSymbol
o Sub SetFinishSymbol( | iFinishSymbol, | |
iWeld) |
MyWelding.GetFinishSymbol(catWeldingFieldOne,catDftLetterCWelding)
o Sub SetSymbol( | iSymbol, | |
iweld) |
MyWelding.SetSymbol(catSquareWelding,catWeldingFieldOne)
Copyright © 2003, Dassault Systèmes. All rights reserved.