HybridShapeLinePtDir (Object)

Line defined by a point and a direction.
Role: To access data of the line feature created by using a passing point and a direction.

Use the CATIAHybridShapeFactory to create a HybridShapeLinePtDir object.

See also:
See also:
See also:
See also:

Properties


Property BeginOffset() As (Read Only)
Returns the start length of the line.
Start length : extension of the line, beginning at the starting point
Example:
This example retrieves in oStart the beginning offset length for the LinePtDir hybrid shape feature. 
 Dim oStart As  CATIALength 
 Set oStart = LinePtDir.BeginOffset
Property Dir() As
Returns or Sets the direction of the line.
Example:
This example retrieves in oDir the direction for the LinePtDir hybrid shape feature. 
 Dim oDir As CATIAHybridShapeDirection
 Set oDir = LinePtDir.Dir
Property EndOffset() As (Read Only)
Returns the end length of the line.
End length : extension of the line, beginning at the ending point
Example:
This example retrieves in oEnd the starting length for the LinePtDir hybrid shape feature. 
 Dim oEnd As  CATIALength 
 Set oEnd = LinePtDir.EndOffset
Property Orientation() As
Returns or Sets the line orientation.
Orientation allows to reverse the line direction from the reference point.
For a line of L length, it is the same as creating this line with -L length : Orientation : can be 1 or -1
Example:
This example retrieves in oOrientation the starting length for the LinePtDir hybrid shape feature. 
 Dim oOrientation As long
 Set oOrientation = LinePtDir.Orientation
Property Point() As
Returns or Sets the starting point of the line.
Sub-element(s) supported (see object): .
Example:
This example retrieves in oPoint the starting point for the LinePtDir hybrid shape feature. 
 Dim oPoint As Reference
 Set oPoint = LinePtDir.Point
Property Support() As
Returns or Sets the supporting surface.
Note: the support surface is not mandatory for LinePtDir

Sub-element(s) supported (see object): .
Example:
This example retrieves in oSurface the supporting surface (if it exist) for the LinePtDir hybrid shape feature. 
 Dim oSurface As Reference 
 Set oSurface = LinePtDir.Surface

Methods


Func GetLengthType() As
Gets the length type Default is 0.
Parameters:
oType
The length type = 0 : length - the line is limited by its extremities = 1 : infinite - the line is infinite = 2 : infinite start point - the line is infinite on the side of the start point = 3 : infinite end point - the line is infinite on the side of the end point
Func GetSymmetricalExtension() As
Gets whether the symmetrical extension of the line is active.
Parameters:
oSym
Symetry flag
Sub RemoveSupport()
Removes the support surface.
Sub SetLengthType( iType)
Sets the length type Default is 0.
Parameters:
iType
The length type = 0 : length - the line is limited by its extremities = 1 : infinite - the line is infinite = 2 : infinite start point - the line is infinite on the side of the start point = 3 : infinite end point - the line is infinite on the side of the end point
Sub SetSymmetricalExtension( iSym)
Sets the symmetrical extension of the line (start = -end).
Parameters:
iSym
Symetry flag