All Frameworks Object Hierarchy This Framework Previous Next Indexes
IUnknown | +---IDispatch | +---CATBaseUnknown | +---CATBaseDispatch | +---AnyObject | +---Layout2DView
o Property Angle( | ) As double |
PI = 3.1415926535 Angle90Clockwise = -PI/2 MyView.Angle = Angle90Clockwise
o Property Arrows( | ) As CATIADrawingArrows (Read Only) |
Dim ArrowCollection As DrawingArrows Set ArrowCollection = MyView.Arrows
o Property Components( | ) As CATIADrawingComponents (Read Only) |
Dim ComponentCollection As DrawingComponents Set ComponentCollection = MyView.Components
o Property Dimensions( | ) As CATIADrawingDimensions (Read Only) |
Dim DimensionCollection As DrawingDimensions Set DimensionCollection = MyView.Dimensions
o Property Factory2D( | ) As CATIAFactory2D (Read Only) |
Set mySketch = my2DFactory.GetParent
Set my2DFactory = myView.Factory2D
o Property FrameVisualization( | ) As boolean |
MyView.FrameVisualization = True
o Property GeometricElements( | ) As CATIAGeometricElements (Read Only) |
Dim colGeometry As GeometricElements Set colGeometry = MyView.GeometricElements
o Property LockStatus( | ) As boolean |
ViewToWorkOn.LockStatus = True
o Property Pictures( | ) As CATIADrawingPictures (Read Only) |
Dim PictureCollection As DrawingPictures Set PictureCollection = MyView.Pictures
o Property ReferenceView( | ) As CATIALayout2DView |
Dim ReferenceView As Layout2DView Set ReferenceView = MyView.RefView
o Property Tables( | ) As CATIADrawingTables (Read Only) |
Dim TableCollection As DrawingTables Set TableCollection = MyView.Tables
o Property Texts( | ) As CATIADrawingTexts (Read Only) |
Dim TextCollection As DrawingTexts Set TextCollection = MyView.Texts
o Property Threads( | ) As CATIADrawingThreads (Read Only) |
Dim ThreadCollection As DrawingThreads Set ThreadCollection = MyView.Threads
o Property ViewScale( | ) As double |
MyView.Scale = 0.5
o Property Visu2DMode( | ) As CatView2DModeVisu |
View1.Visu2DMode = catView2DModeNoShow
o Property VisuBackground( | ) As CatVisuBackgroundMode |
View1.VisuBackground = catLowIntPick
o Property VisuIn3D( | ) As CatVisuIn3DMode |
View1.HideIn3DSize = catShowAll
o Property Weldings( | ) As CATIADrawingWeldings (Read Only) |
Dim weldingCollection As DrawingWeldings Set weldingCollection = MyView.Weldings
o Property x( | ) As double |
X = MyView.x
o Property y( | ) As double |
NewYCoordinate = 5*25.4 MyView.y = NewYCoordinate
o Sub Activate( | ) |
ViewToWorkOn.Activate()
o Sub AlignedWithReferenceView( | ) |
MyView.AlignedWithReferenceView()
o Sub GetViewName( | CATBSTR | iViewNamePrefix, |
CATBSTR | iViewNameIdent, | |
CATBSTR | iViewNameSuffix) |
Dim MyPrefix, MyIdent, MySuffix As CATBSTR MyView.GetViewName (MyPrefix, MyIdent, MySuffix)
o Sub SaveEdition( | ) |
MyView.SaveEdition
o Sub SetViewName( | CATBSTR | iViewNamePrefix, |
CATBSTR | iViewNameIdent, | |
CATBSTR | iViewNameSuffix) |
MyView.SetViewName ("MyPrefix", "MyIdent", "MySuffix")
o Sub Size( | CATSafeArrayVariant | oValues) |
Dim oXY(4) As Double ViewToWorkOn.Size oXY Xmin = oXY(0) Xmax = oXY(1) Ymin = oXY(2) Ymax = oXY(3)
o Sub UnAlignedWithReferenceView( | ) |
MyView.UnAlignedWithReferenceView()
Copyright © 2003, Dassault Systèmes. All rights reserved.