All Frameworks Object Hierarchy This Framework Indexes
Dim CATDocs As Documents
Set CATDocs = CATIA.Documents
Dim part1 As Document
Set part1 = CATDocs.Add("CATPart")
Dim parameterList As Parameters
Set parameterList = part1.Part.Parameters
| o Property RootParameterSet( | ) As (Read Only) |
| o Property Units( | ) As (Read Only) |
| o Func CreateBoolean( | iName, | |
| iValue) As |
Dim CATDocs As Documents
Set CATDocs = CATIA.Documents
Dim part1 As Document
Set part1 = CATDocs.Add("CATPart")
Dim chk As BooleanParam
Set chk = part1.Part.Parameters.CreateBoolean ("checked", False)
| o Func CreateDimension( | iName, | |
| iMagnitude, | ||
| iValue) As |
Dim depth As Dimension
Set depth = parameters.CreateDimension("depth", "LENGTH", 20)
depth.ValuateFromString("300mm");
| o Func CreateInteger( | iName, | |
| iValue) As |
Dim CATDocs As Documents
Set CATDocs = CATIA.Documents
Dim part1 As Document
Set part1 = CATDocs.Add("CATPart")
Dim revision As IntParam
Set revision = part1.Part.Parameters.CreateInteger ("RevisionRumber", 17)
| o Func CreateList( | iName) As |
Set CATDocs = CATIA.Documents
Set part1 = CATDocs.Add("CATPart")
Set list1 = part1.Part.Parameters.CreateList ("ListName")
| o Func CreateReal( | iName, | |
| iValue) As |
Dim CATDocs As Documents
Set CATDocs = CATIA.Documents
Dim part1 As Document
Set part1 = CATDocs.Add("CATPart")
Dim rate As RealParam
Set rate = part1.Part.Parameters.CreateReal ("ReliabilityRate", 2.5 )
| o Sub CreateSetOfParameters( | iFather) |
| o Func CreateString( | iName, | |
| iValue) As |
Set CATDocs = CATIA.Documents
Set part1 = CATDocs.Add("CATPart")
Set density = part1.Part.Parameters.CreateString ("responsible", "The Boss")
| o Func GetNameToUseInRelation( | iObject) As |
| o Func Item( | iIndex) As |
Set lastParameter = parameters.Item(parameters.Count)
| o Sub Remove( | iIndex) |
parameters.Remove("depth")
| o Func SubList( | iObject, | |
| iRecursively) As |
Dim Parameters1 As Parameters Set Parameters1 = CATIA.ActiveDocument.Part.Parameters gets the collection of parameters in the part Dim Body0 As AnyObject Set Body0 = CATIA.ActiveDocument.Part.Bodies.Item ( "MechanicalTool.1" ) Dim Pad1 As AnyObject Set Pad1 = Body0.Shapes.Item ( "Pad.1" ) gets the pad Pad.1 Dim Parameters2 As Parameters Set Parameters2 = Parameters1.SubList(Pad1,TRUE) gets the collection of parameters that are under the pad Pad.1
Copyright © 2003, Dassault Systèmes. All rights reserved.