OpenSTAAD | OSPropertyUI::CreateHSSRoundPropertyFromTable not available.

I'm using STAAD.Pro Script Editor and OpenSTAAD API Reference to generate a structural model. 

Unfortunately, the OpenSTAAD function (OSPropertyUI::CreateHSSRoundPropertyFromTable) to create HSS Round shapes from table is not available.

Question: Is Bentley Software / Technical Group is aware or been notified about this missing function? Any help will be much appreciated.

Parents
  • If you want to create HSS round shape property, please use function CreatePipePropertyFromTable function

    The syntax for rectangular hollow section. square hollow section, HSS round section:

    Set objOpenSTAAD = GetObject(, "StaadPro.OpenSTAAD")
    Dim prop(3) As Long
    Dim memb(3) As Long
    For i = 0 To 3
    prop(i) = i
    memb(i) = i + 1
    Next i

    ''For Rectangular Hollow Section''
    'prop(0) = objOpenSTAAD.Property.CreateTubePropertyFromTable(1, "HSST6X3X0.375", 0, 0, 0, 0)
    'prop(1) = objOpenSTAAD.Property.CreateTubePropertyFromTable(1, "HSSP20x0.5", 0, 0, 0, 0)
    'prop(2) = objOpenSTAAD.Property.CreateTubePropertyFromTable(4, "HSST305X305X16", 0, 0, 0, 0)
    'prop(3) = objOpenSTAAD.Property.CreateTubePropertyFromTable(7, "50X30X2.6RHS", 0, 0, 0, 0)

    ''For Square Hollow Section''
    'prop(0) = objOpenSTAAD.Property.CreateTubePropertyFromTable(7, "40x2.6SHS", 0, 0, 0, 0)
    'prop(1) = objOpenSTAAD.Property.CreateTubePropertyFromTable(7, "40x3.2SHS", 0, 0, 0, 0)
    'prop(2) = objOpenSTAAD.Property.CreateTubePropertyFromTable(7, "40x4SHS", 0, 0, 0, 0)
    'prop(3) = objOpenSTAAD.Property.CreateTubePropertyFromTable(7, "40x5SHS", 0, 0, 0, 0)


    ''For HSS round section''
    prop(0) = objOpenSTAAD.Property.CreatePipePropertyFromTable(1, "HSSP16X0.25", 0, 0, 0)
    prop(1) = objOpenSTAAD.Property.CreatePipePropertyFromTable(4, "HSSP324X6.4", 0, 0, 0)
    prop(2) = objOpenSTAAD.Property.CreatePipePropertyFromTable(7, "42.4X2.6CHS", 0, 0, 0)
    prop(3) = objOpenSTAAD.Property.CreatePipePropertyFromTable(11, "CHS114.3X4.5", 0, 0, 0)

    For i = 0 To 3
    objOpenSTAAD.Property.AssignBeamProperty memb(i), prop(i)
    Next i

    objOpenSTAAD.Property.AssignMaterialToMember "STEEL", memb
    End Sub

    Answer Verified By: Denisson Cruz 

  • Thank you, .

    Surprisingly, ''For HSS round section'' it also works with prop(0) = objOpenSTAAD.Property.CreateBeamPropertyFromTable(1, "HSSP16X0.25", 0, 0, 0). But prop(0) = objOpenSTAAD.Property.CreatePipePropertyFromTable(1, "HSSP16X0.25", 0, 0, 0) is better.

Reply Children
No Data