All Frameworks Object Hierarchy This Framework Indexes Previous Next
Dim CATDocs As Documents Set CATDocs = CATIA.Documents Dim part1 As Dccument Set part1 = CATDocs.Add("CATPart") Dim year As IntParam Set year = part1.Part.Parameters.CreateInteger("year", 1998)
o Property RangeMaxValidity( | ) As long |
o Property RangeMax( | ) As long |
If (Length.RangeMax < 0.0 and Length.RangeMaxValidity <> 0) Then Length.RangeMax = 0.0 End If
o Property RangeMinValidity( | ) As long |
o Property RangeMin( | ) As long |
If (Length.RangeMin > 0.0 and Length.RangeMinValidity <> 0) Then Length.RangeMin = 0.0 End If
o Property Value( | ) As long |
If (year.Value = 2000) Then year.Value = 0 End If
o Func GetEnumerateValuesSize( | ) As long |
o Sub GetEnumerateValues( | CATSafeArrayVariant | oSafeArray) |
Dim enumValues () as Variant ReDim enumValues (anIntegerParameter.GetEnumerateValuesSize() - 1) anIntegerParameter.GetEnumerateValues(enumValues) For i = LBound(enumValues) to UBound(enumValues) ... Next
o Sub SetEnumerateValues( | CATSafeArrayVariant | iSafeArray) |
o Sub SuppressEnumerateValues( | ) |
Copyright © 2003, Dassault Systèmes. All rights reserved.