All Frameworks Object Hierarchy This Framework Indexes
| o Func GetChildren( | ) As |
Dim oStiDBItem As StiDBItem
Dim ochildrenList As StiDBChildren
Set ochildrenList = oStiDBItem.GetChildren
Dim lChildrenNumber As long
lChildrenNumber = ochildrenList.Count
For i = 1 To lChildrenNumber
Dim oChildStiDBItem As StiDBItem
Set oChildStiDBItem = ochildrenList.Item(i)
Dim sChildLinkType As CATBSTR
sChildLinkType = ochildrenList.LinkType(i)
Next
| o Func GetDocumentFullPath( | ) As |
Dim oStiDBItem As StiDBItem Dim oFullPath As string oFullPath = oStiDBItem.GetDocumentFullPath
| o Func GetDocument( | ) As |
Dim oStiEngine As StiEngine
Set oStiEngine = CATIA.GetItem("CAIEngine")
Dim oStiDBItem As StiDBItem
Set oStiDBItem = oStiEngine.GetStiDBItemFromCATBSTR("E:\CATIAFiles\Engine.CATProduct")
Dim oDocument As Document
Set oDocument = oStiDBItem.GetDocument
| o Func IsCFOType( | ) As |
Dim oStiEngine As StiEngine
Set oStiEngine = CATIA.GetItem("CAIEngine")
(...)
Dim oIsCFOType As boolean
oIsCFOType = oStiEngine.IsCFOType
| o Func IsRoot( | ) As |
Dim oStiEngine As StiEngine
Set oStiEngine = CATIA.GetItem("CAIEngine")
(...)
Dim oIsRootCFO As boolean
oIsRootCFO = oStiEngine.IsRoot
Copyright © 2003, Dassault Systèmes. All rights reserved.