Retrieves the names of all defined material properties of the specified type.
Namespace: ETABS2015Assembly: ETABS2015 (in ETABS2015.dll) Version: 15.0.0.0 (15.0.0.0)
int GetNameList(
ref int NumberNames,
ref string[] MyName,
eMatType MatType =
)
Function GetNameList ( _
ByRef NumberNames As Integer, _
ByRef MyName As String(), _
Optional MatType As eMatType = _
) As Integer
int GetNameList(
int% NumberNames,
array<String^>^% MyName,
eMatType MatType =
)
Parameters
- NumberNames
- Type:
System Int32
The number of material property names retrieved by the program.
- MyName
- Type: System String
One-dimensional array of material property 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 program,
filled with the names, and returned to the API user.
- MatType (Optional)
- Type: ETABS2015 eMatType
This optional value is one of the items in the
eMatType enumeration.
If no value is input for MatType, names are returned for all material
properties in the model regardless of type.
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
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.PropMaterial.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
'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)
'get material property names
ret = SapModel.PropMaterial.GetNameList(NumberNames, MyName)
'close ETABS
EtabsObject.ApplicationExit(False)
'clean up variables
SapModel = Nothing
EtabsObject = Nothing
End Sub