All Frameworks Object Hierarchy This Framework Previous Indexes
IUnknown | +---IDispatch | +---CATBaseUnknown | +---CATBaseDispatch | +---Collection | +---Layout2DViews
o Property ActiveView( | ) As CATIALayout2DView (Read Only) |
Dim MyRoot As Layout2DRoot Set MyRoot = CATIA.Documents.Part.GetItem("CATLayoutRoot") Dim ViewToWorkIn As Layout2DView Set ViewToWorkIn = MyRoot.Sheets.ActiveSheet.Layout2DViews.ActiveView
o Func AddAuxiliary( | CATIALayout2DView | iReferenceView, |
CATSafeArrayVariant | iBCSegment, | |
double | iXorient, | |
double | iYorient, | |
CatViewType | iSectionType, | |
double | iX, | |
double | iY) As CATIALayout2DView |
Dim x As double Set x = 10. Dim y As double Set y = 10. Dim MySegment ReDim MySegment(3) MySegment(0) = 10. MySegment(1) = 200. MySegment(2) = 100. MySegment(3) = 200. Dim MyRoot As Layout2DRoot Set MyRoot = CATIA.Documents.Part.GetItem("CATLayoutRoot") Dim MyFirstView As Layout2DView Set MyFirstView = MyRoot.Sheets.ActiveSheet.Views.ActiveView Dim MyView As Layout2DView Set MyView = MyRoot.Sheets.ActiveSheet.Views.
o Func AddDetail( | CATBSTR | iDetailName) As CATIALayout2DView |
Dim MyLayoutRoot As Layout2DRoot Set MyLayoutRoot = CATIA.Documents.Part.GetItem("CATLayoutRoot") Dim MyDetailSheet As Layout2DSheet Set MyDetailSheet = .Sheets.ActiveSheet Dim MyView As Layout2DView Set MyView = MyDetailSheet.Views.AddDetail("Ditto")
o Func AddFrom3DPlane( | CATSafeArrayVariant | iPlane, |
CatViewType | iViewType, | |
double | iX, | |
double | iY) As CATIALayout2DView |
o Func AddPrimary( | double | iX, |
double | iY) As CATIALayout2DView |
Dim x as double Set x = 10. Dim y as double Set y = 10. Dim MyView As Layout2DView Set MyView = CATIA.ActiveDocument.Part.GetItem("CATLayoutRoot").Sheets.ActiveSheet. Views.AddPrimary(x, y).
o Func AddRelated( | CATIALayout2DView | iReferenceView, |
CatViewSide | iSide, | |
double | iX, | |
double | iY) As CATIALayout2DView |
Dim x as double Set x = 10. Dim y as double Set y = 10. Dim MyFirstView As Layout2DView Set MyFirstView = CATIA.ActiveDocument.Part.GetItem("CATLayoutRoot").Sheets.ActiveSheet.Views.ActiveView Dim MyView As Layout2DView Set MyView = CATIA.ActiveDocument.Part.GetItem("CATLayoutRoot").Sheets.ActiveSheet.Views. AddRelated(MyFirstView,catLeftSide, x, y)
o Func Item( | CATVariant | iIndex) As CATIALayout2DView |
Dim MySheet As Layout2DSheet Set MySheet = CATIA.ActiveDocument.Part.GetItem("CATLayoutRoot").Sheets.ActiveSheet Dim ThisLayout2DView As Layout2DView Set ThisLayout2DView = MySheet.Views.ActiveView.Item(2) Dim ThatLayout2DView As Layout2DView Set ThatLayout2DView = MySheet.Views.ActiveView.Item("MyView")
o Sub Remove( | CATVariant | iIndex) |
Dim MySheet As Layout2DSheet Set MySheet = CATIA.ActiveDocument.Part.GetItem("CATLayoutRoot").Sheets.ActiveSheet MySheet.ActiveViews.Remove(3) MySheet.ActiveViews.Remove("TopView")
Copyright © 2003, Dassault Systèmes. All rights reserved.