Role: To access the data of the hybrid shape curve parameter object. This data includes:
- The face to process
- The offset parameter.
Use the to create a HybridShapeCurvePar object.
You can access each normal coordinate as follows:
Properties
Sub-element(s) supported (see
object): see
or
.
This example retrieves the offset curve of
the
hybShpCurvePar in offsetCrv.
Dim offsetCrv As CATIAReference
offsetCrv = hybShpCurvePar.CurveOffseted
oLaw the offset law
for the hybShpCurvePar hybrid shape feature.
Dim oLaw As Reference
Set oLaw = hybShpCurvePar.CurveParLaw
Legal values:
oCurveParType the curve par type
for the hybShpCurvePar hybrid shape feature.
oCurveParType = hybShpCurvePar.CurveParType
Legal values: True Geodesic mode and False Euclidian mode .
This example sets that the geodesic mode of
the
hybShpCurvePar hybrid shape curve par feature to True.
hybShpCurvePar.Geodesic = True
Legal values: True True to invert this orientation and False False means that there is no invertion of the curve orientation
(orientation is the vector product of the tangent of the curve by the normal on the support).
This example sets that the orientation of
the
hybShpCurvePar hybrid shape curve par feature to True.
hybShpCurvePar.InvertDirection = True
Legal values:
True Law is applied from the end to the beginning of the curve (mapping is inverted).
False Law is applied from the beginning to the end of the curve (mapping is not inverted).
This example sets that the mapping orientation of
the
hybShpCurvePar hybrid shape curve par feature to True.
hybShpCurvePar.InvertMappingLaw = True
This example retrieves the both sides mode of
the
hybShpCurvePar
Dim bothSides As Boolean
bothSides = hybShpCurvePar.KeepBothSides
Legal values:
oLawType the law type
for the hybShpCurvePar hybrid shape feature.
oLawType = hybShpCurvePar.LawType
Sets in distance unit, it corresponds to the radius of a
pipe around the input curve in which the result is allowed to be.
This value must be set in SI unit (m).
DeviationValue the maximum deviation value for the
CurvePar hybrid shape feature.
Dim DeviationValue As CATIALength
Set DeviationValue = CurvePar.MaximumDeviationValue
This example retrieves the offset parameter of
the
hybShpCurvePar in offsetParm.
Dim offsetParm As CATIALength
offsetParm = hybShpCurvePar.Offset
This example retrieves the second offset parameter of
the
hybShpCurvePar in offsetParm.
Dim offsetParm As CATIALength
offsetParm = hybShpCurvePar.Offset2
This example retrieves the other side of
the
hybShpCurvePar
Dim otherSide As CATIAReference
Set otherSide = hybShpCurvePar.OtherSide
Sub-element(s) supported (see
object):
This example retrieves the offset curve of
the
hybShpCurvePar in offsetCrv.
Dim PassingPoint As CATIAReference
offsetCrv = hybShpCurvePar.PassingPoint
Smoothing type:
SType the smoothing type for the
CurvePar hybrid shape feature.
Dim SType As long
Set SType = CurvePar.SmoothingType
oElem the support of the curve
for the hybShpCurvePar hybrid shape feature.
Dim oElem As Reference
Set oElem = hybShpCurvePar.Support
3DSmoothingOption the support for the
Project hybrid shape feature.
Dim 3DSmoothingOption As boolean
Set 3DSmoothingOption = Project.p3DSmoothing
Methods
dd>
oNormal the normal
of the hybShpCurvePar plane created.
Dim oNormal(2)
hybShpCurvePar.GetPlaneNormal(oNormal)
x is in oNormal(0)
y is in oNormal(1)
z is in oNormal(2)