All Frameworks Object Hierarchy This Framework Previous Next Indexes
IUnknown | +---IDispatch | +---CATBaseUnknown | +---CATBaseDispatch | +---Collection | +---MaterialFamilies
o Func Add( | ) As CATIAMaterialFamily |
FileToOpen = "e:\users\ast\materials\Catalog.CATMaterial" Dim MyDocument As MaterialDocument Set MyDocument = Documents.Open(FileToOpen) Dim MyMaterialFamily As MaterialFamily Set MyMaterialFamily = MyDocument.MaterialFamilies.Add
o Func Item( | CATVariant | iIndex) As CATIAMaterialFamily |
Dim MyMaterialFamily As MaterialFamily Set MyMaterialFamily = MaterialFamilies.Item(6)
o Sub Remove( | CATVariant | iIndex) |
FileToOpen = "e:\users\ast\materials\Catalog.CATMaterial" Dim MyDocument As MaterialDocument Set MyDocument = Documents.Open(FileToOpen) MyDocument.MaterialFamilies.Remove(2)
Copyright © 2003, Dassault Systèmes. All rights reserved.