All Frameworks Object Hierarchy This Framework Next Indexes
IUnknown
|
+---IDispatch
|
+---CATBaseUnknown
|
+---CATBaseDispatch
|
+---AnyObject
|
+---Layout2DFactory
| o Func Create2DLayout( | CATBSTR | iStandardName) As CATIALayout2DLayout |
Dim MyRoot As Layout2DRoot
Set MyRoot = CATIA.ActiveDocument.Part.GetItem("CATLayoutRoot")
if MyRoot Is Nothing then
Dim MyRootFact As Layout2DFactory
Set MyRootFact = CATIA.ActiveDocument.Part.GetItem("CATLayoutRootFactory")
Set MyRoot = MyRootFact.Create2DLayout("ISO_3D")
end if
Copyright © 2003, Dassault Systèmes. All rights reserved.