Retrieves the names of all defined Spandrel Labels
Namespace: ETABS2015Assembly: ETABS2015 (in ETABS2015.dll) Version: 15.0.0.0 (15.0.0.0)
int GetNameList(
ref int NumberNames,
ref string[] MyName,
ref bool[] IsMultiStory
)
int GetNameList(
ref int NumberNames,
ref string[] MyName,
ref bool[] IsMultiStory
)
Function GetNameList ( _
ByRef NumberNames As Integer, _
ByRef MyName As String(), _
ByRef IsMultiStory As Boolean() _
) As Integer
int GetNameList(
int% NumberNames,
array<String^>^% MyName,
array<bool>^% IsMultiStory
)
int GetNameList(
int% NumberNames,
array<String^>^% MyName,
array<bool>^% IsMultiStory
)
Parameters
- NumberNames
- Type:
System Int32
The number of Spandrel Labels defined in the program
- MyName
- Type: System String
This is a one-dimensional array of coordinate system names. The MyName array is created
as a dynamic, zero-based, array by the API user:
Dim MyName() as String
The array is dimensioned to (NumberNames – 1)
inside the ETABS program, filled with the names, and returned to the API user.
- IsMultiStory
- Type: System Boolean
This values of this array are True or False, indicating
whether the associated Spandrel Label spans multiple story levels
Return Value
Returns zero if the names are successfully retrieved,
otherwise it returns nonzero.
Public Sub Example()
Dim SapModel As cSapModel
Dim EtabsObject As cOAPI
Dim ret As Integer = -1
Dim NumberNames As Integer
Dim MyName As String()
Dim IsMultiStory As Boolean()
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.SpandrelLabel.SetSpandrel("MySpandrel", False)
ret = SapModel.SpandrelLabel.GetNameList(NumberNames, MyName)
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 NumberNames As Integer
Dim MyName As String()
Dim IsMultiStory As Boolean()
'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)
'define new Spandrel label
ret = SapModel.SpandrelLabel.SetSpandrel("MySpandrel", False)
'get names
ret = SapModel.SpandrelLabel.GetNameList(NumberNames, MyName)
'close ETABS
EtabsObject.ApplicationExit(False)
'clean up variables
SapModel = Nothing
EtabsObject = Nothing
End Sub