Retrieves the transformation matrix for a link object.
Namespace: ETABS2015Assembly: ETABS2015 (in ETABS2015.dll) Version: 15.0.0.0 (15.0.0.0)
int GetTransformationMatrix(
string Name,
ref double[] Value,
bool IsGlobal = true
)
Function GetTransformationMatrix ( _
Name As String, _
ByRef Value As Double(), _
Optional IsGlobal As Boolean = True _
) As Integer
Function GetTransformationMatrix ( _
Name As String, _
ByRef Value As Double(), _
Optional IsGlobal As Boolean = True _
) As Integer
int GetTransformationMatrix(
String^ Name,
array<double>^% Value,
bool IsGlobal = true
)
Parameters
- Name
- Type:
System String
The name of an existing link object.
- Value
- Type: System Double
Value is an array of nine direction cosines that define
the transformation matrix.
The following matrix equation shows how the transformation matrix is used to convert
items from the link object local coordinate system to the global coordinate system.
|c0 c1 c2| |Local1| |GlobalX|
|c3 c4 c5| * |Local2| = |GlobalY|
|c6 c7 c8| |Local3| |Globalz|
In the equation, c0 through c8 are the nine values from the transformation array,
(Local1, Local2, Local3) are an item (such as a load) in the object local coordinate system,
and (GlobalX, GlobalY, GlobalZ) are the same item in the global coordinate system.
The transformation from the local coordinate system to the present coordinate system
is the same as that shown above for the global system if you substitute the present system
for the global system.
- IsGlobal (Optional)
- Type: System Boolean
If this item is True, the transformation matrix is between the
Global coordinate system and the link object local coordinate system. If this item is
False, the transformation matrix is between the present coordinate system, and the
link object local coordinate system.
Return Value
Returns zero if the link object transformation matrix is successfully retrieved;
otherwise it returns a nonzero value.
Public Sub Example()
Dim SapModel As cSapModel
Dim EtabsObject As cOAPI
Dim ret As Integer = -1
Dim Name As String
Dim Value() As Double
EtabsObject = CreateObject("CSI.ETABS.API.ETABSObject")
ret = EtabsObject.ApplicationStart()
SapModel = EtabsObject.SapModel
ret = SapModel.InitializeNewModel()
ret = SapModel.File.NewSteelDeck(4,12,12,4,4,24,24)
ret = SapModel.LinkObj.AddByPoint("1", "5", Name)
ReDim Value(8)
ret = SapModel.LinkObj.GetTransformationMatrix(Name, Value)
EtabsObject.ApplicationExit(False)
SapModel = Nothing
EtabsObject = Nothing
End SubPublic Sub Example()
Dim SapModel As cSapModel
Dim EtabsObject As cOAPI
Dim ret As Integer = -1
Dim Name As String
Dim Value() As Double
'create ETABS object
EtabsObject = CreateObject("CSI.ETABS.API.ETABSObject")
'start ETABS application
ret = EtabsObject.ApplicationStart()
'create SapModel object
SapModel = EtabsObject.SapModel
'initialize model
ret = SapModel.InitializeNewModel()
'create steel deck template model
ret = SapModel.File.NewSteelDeck(4,12,12,4,4,24,24)
'add link object by points
ret = SapModel.LinkObj.AddByPoint("1", "5", Name)
'get link object transformation matrix
ReDim Value(8)
ret = SapModel.LinkObj.GetTransformationMatrix(Name, Value)
'close ETABS
EtabsObject.ApplicationExit(False)
'clean up variables
SapModel = Nothing
EtabsObject = Nothing
End Sub