All Frameworks Object Hierarchy This Framework Indexes
Set ParentObject = CATIA.ActiveDocument.Selection.FindObject("CATIAProduct")
Set objTag = ParentObject.GetTechnologicalObject("Tag")
| o Sub GetName( | oTagName) |
Dim objTag As Tag
...
Dim Name as String
objTag.GetName Name
| o Sub GetType( | oFrameName) |
Dim objTag As Tag
...
Dim FrameType as String
objTag.GetType FrameType
| o Sub GetXYZ( | ioXYZ) |
Dim objTag As Tag
...
Dim List(3)
objTag.GetXYZ List
| o Sub GetYPR( | ioYPR) |
Dim objTag As Tag
...
Dim List(3)
objTag.GetYPR List
| o Sub SetName( | iTagName) |
Dim objTag As Tag
...
objTag.SetName("My_Tag")
| o Sub SetType( | iFrameName) |
Dim objTag As Tag
...
objTag.SetType("Design")
| o Sub SetXYZ( | iX, | |
| iY, | ||
| iZ) |
Dim objTag As Tag
...
objTag.SetXYZ 2800.0, 1800.0, 800.0
| o Sub SetYPR( | iY, | |
| iP, | ||
| iR) |
Dim objTag As Tag
...
objTag.SetYPR 1.4, 0.5, 3.14
Copyright © 2003, Dassault Systèmes. All rights reserved.