PspLightConnector (Object)

Represents the light connector.
Role: To access light connector data.

Methods


Func GetAlignmentVector( iRelAxis) As
Returns the position of the connector.
Parameters:
iRelAxis
the relative axis object (Nothing means relative to parent)
oAlignmentDirection
Three double values stand for X,Y,Z components of the alignment vector
Example:
 
 Dim objThisIntf As PspLightConnector
 Dim objArg1 As Product
 Dim objArg2 As PspListOfDoubles
  ...
 Set objArg2 = objThisIntf.GetAlignmentVector (objArg1)
 
Func GetOrientationVector( iRelAxis) As
Returns the Orientation Direction of the connector.
Parameters:
iRelAxis
the relative axis object (Nothing means relative to parent)
oAlignmentDirection
Three double values stand for X,Y,Z components of the alignment vector
Example:
 
 Dim objThisIntf As PspLightConnector
 Dim objArg1 As Product
 Dim objArg2 As PspListOfDoubles
  ...
 Set objArg2 = objThisIntf.GetOrientationVector (objArg1)
 
Func GetOrigin( iRelAxis) As
Returns the position of the connector.
Parameters:
iRelAxis
the relative axis object (Nothing means relative to parent)
oOrigin
Origin point position-three double values stand for x,y,z
Example:
 
 Dim objThisIntf As PspLightConnector
 Dim objArg1 As Product
 Dim objArg2 As PspListOfDoubles
  ...
 Set objArg2 = objThisIntf.GetOrigin (objArg1)
 
Sub SetAlignmentVector( iRelAxis, iAlignmentDirection)
Sets the alignment direction of the connector.
Parameters:
iRelAxis
the relative axis object (Nothing means relative to parent)
iAlignmentDirection
Three double values stand for X,Y,Z component of the Alignment vector
Example:
 
 Dim objThisIntf As PspLightConnector
 Dim objArg1 As  Product
 Dim dbVar2(2) As CATSafeArrayVariant
  ...
 objThisIntf.SetAlignmentVector objArg1, dbVar2
 
Sub SetOrientationVector( iRelAxis, iOrientationDirection)
Sets the Orientation Direction of the connector.
Parameters:
iRelAxis
the relative axis object (Nothing means relative to parent)
iAlignmentDirection
Three double values stand for X,Y,Z component of the Alignment vector
Example:
 
 Dim objThisIntf As PspLightConnector
 Dim objArg1 As  Product
 Dim dbVar2(2) As CATSafeArrayVariant
  ...
 objThisIntf.SetAlignmentVector objArg1, dbVar2
 
Sub SetOrigin( iRelAxis, iDb3Position)
Sets the position of the connector.
Parameters:
iRelAxis
the relative axis object (Nothing means relative to parent)
iDb3Position
absolute X-Y-Z coordinates of the current position of the connector to be set
Example:
 
 Dim objThisIntf As PspLightConnector
 Dim objArg1 As  Product
 Dim dbVar2(3) As CATSafeArrayVariant
  ...
 objThisIntf.SetOrigin objArg1, dbVar2