All Frameworks Object Hierarchy This Framework Indexes
The behavior value are defined in
| o Property AnnotatedViews( | ) As (Read Only) |
Dim TheAnnotatedViewsList As AnnotatedViews
Set TheAnnotatedViewsList = NewSection.AnnotatedViews
| o Property Behavior( | ) As |
The behavior value are defined in CatSectionBehavior.
Dim SectionBehavior As CatSectionBehavior
Behavior = NewSection.Behavior
NewSection.Behavior = catSectionBehaviorAutomatic
| o Property CutMode( | ) As |
The cutting mode value is 1 for clipping or 0 without clipping.
Dim SectionMode As Integer
SectionMode = NewSection.CutMode
NewSection.CutMode = 1
| o Property Group( | ) As |
By default, it is the all leaves group.
Dim AGroup As Group
AGroup = NewSection.Group
Dim AGroup As Group
NewSection.Group = AGroup
| o Property Height( | ) As |
The height value must be greater than 0.
Dim SectionHeight As double
SectionHeight = NewSection.Height
NewSection.Height = 100.
| o Property Marker3Ds( | ) As (Read Only) |
Dim TheMarker3DsList As Marker3Ds
Set TheMarker3DsList = NewSection.Marker3Ds
| o Property Thickness( | ) As |
The thickness value must be greater than 0.
Dim SectionThickness As double
SectionThickness = NewSection.Thickness
NewSection.Thickness = 100.
| o Property Type( | ) As |
The type value are defined in CatSectionType.
Dim SectionType As CatSectionType
SectionType = NewSection.Type
NewSection.Type = catSectionTypeSlice
| o Property Width( | ) As |
The width value must be greater than 0.
Dim SectionWidth As double
SectionWidth = NewSection.Width
NewSection.Width = 100.
| o Func Export( | ) As |
Dim PartDoc As Document
PartDoc = NewSection.Export
| o Sub GetPosition( | oComponents) |
The position of the section is made of a coordinate system whose origin is the center of the section, and X and Y axes lie on the section. It is retrieved in an array of the X, Y, Z axes components and the origin components with respect to the absolute coordinate system.
Dim Components (11)
NewSection.GetPosition Components
| o Func IsEmpty( | ) As |
The indicator value is 0 if the section is empty or 1 if the section comprise at least one segment.
Dim Indicator
Indicator = NewSection.IsEmpty
| o Sub SetPosition( | iComponents) |
Dim MatrixPos (11) As Double
MatrixPos( 0) = 1.0
MatrixPos( 1) = 0.0
MatrixPos( 2) = 0.0
MatrixPos( 3) = 0.0
MatrixPos( 4) = 1.0
MatrixPos( 5) = 0.0
MatrixPos( 6) = 0.0
MatrixPos( 7) = 0.0
MatrixPos( 8) = 1.0
MatrixPos( 9) = 1000.0
MatrixPos(10) = 0.0
MatrixPos(11) = 0.0
NewSection.SetPosition MatrixPos
Copyright © 2003, Dassault Systèmes. All rights reserved.