All Frameworks Object Hierarchy This Framework Previous Next Indexes
IUnknown | +---IDispatch | +---CATBaseUnknown | +---CATBaseDispatch | +---Collection | +---Dressups
o Func Add( | CATIAMechanism | iMechanism, |
CATIAProduct | iContext) As CATIADressup |
Dim NewDressup As Dressup Set NewDressup = TheDressups.Add(Mechanism)
o Func Item( | CATVariant | iIndex) As CATIADressup |
Dim ThisDressup As Dressup Set ThisDressup = TheDressups.Item(3) Dim ThatDressup As Dressup Set ThatDressup = CATIA.Dressups.Item("MyDressup")
o Func ListMechanismsContext( | ) As CATSafeArrayVariant |
Dim ContextList As Product ContextList = MyDressups.ListMechanismsContext() Dim FirstContext As Product Set FirstContext = ContextList(0) Dim LastContext As Product Set LastContext = ContextList(ubound(ContextList))
o Func ListPossibleMechanisms( | ) As CATSafeArrayVariant |
Dim PossibleMecList As Mechanism PossibleMecList = MyDressups.ListPossibleMechanisms() Dim FirstMeca As Mechanism Set Meca = PossibleMecList(0) Dim LastMeca As Mechanism Set Meca = PossibleMecList(ubound(PossibleMecList))
o Sub Remove( | CATVariant | iIndex) |
TheDressups.Remove(10) TheDressups.Remove("DressupTwo")
Copyright © 2003, Dassault Systèmes. All rights reserved.