cPropMaterialSetONoDesign Method |
Sets the other material property data for no design type materials.
Namespace:
ETABS2016
Assembly:
ETABS2016 (in ETABS2016.dll) Version: 16.0.0.0 (16.0.0.0)
Syntaxint SetONoDesign(
string Name,
double FrictionAngle = 0,
double DilatationalAngle = 0,
double Temp = 0
)
Function SetONoDesign (
Name As String,
Optional FrictionAngle As Double = 0,
Optional DilatationalAngle As Double = 0,
Optional Temp As Double = 0
) As Integer
int SetONoDesign(
String^ Name,
double FrictionAngle = 0,
double DilatationalAngle = 0,
double Temp = 0
)
abstract SetONoDesign :
Name : string *
?FrictionAngle : float *
?DilatationalAngle : float *
?Temp : float
(* Defaults:
let _FrictionAngle = defaultArg FrictionAngle 0
let _DilatationalAngle = defaultArg DilatationalAngle 0
let _Temp = defaultArg Temp 0
*)
-> int
Parameters
- Name
- Type: SystemString
The name of an existing concrete material property. - FrictionAngle (Optional)
- Type: SystemDouble
The Drucker-Prager friction angle.
This item must be smaller or equal to 0 and less than 90. [deg] - DilatationalAngle (Optional)
- Type: SystemDouble
The Drucker-Prager dilatational angle.
This item must be smaller or equal to 0 and less than 90. [deg] - Temp (Optional)
- Type: SystemDouble
The temperature at which the specified data applies.
The temperature must have been defined previously for the material.
This item applies only if the specified material has properties that are temperature dependent.
That is, it applies only if properties are specified for the material at more than one temperature.
Return Value
Type:
Int32Returns zero if the data is successfully assigned; otherwise it returns a nonzero value.
Remarks
ExamplesPublic Sub Example()
Dim SapModel As cSapModel
Dim EtabsObject As cOAPI
Dim ret As Integer = -1
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.SetMaterial("NoDesign", eMatType.NoDesign)
ret = SapModel.PropMaterial.SetONoDesign(NoDesign", 10, 15)
EtabsObject.ApplicationExit(False)
SapModel = Nothing
EtabsObject = Nothing
End Sub
See Also