OpenSTAAD V8i

Geometry.GetSelectedSolids

Returns the solid numbers selected in SelSolidArray variable. Call this function after GetNoOfSelectedSolids.

Parameter

SelSolidArray

A Long array variable to receive the selected solid numbers.

Sorted

Integer variable: 1 = return the selections in sorted order, 0 = to return in the order of selection.

 Dim objOpenSTAAD As Object
 Dim SelSolidsNo As Long
 Dim SelSolids() As Long
'Get the application object --
'Get no. of selected solids
 SelSolidsNo = objOpenSTAAD.Geometry.GetNoOfSelectedSolids
'Reallocate
 ReDim SelSolids(SelSolidsNo-1) As Long
 objOpenSTAAD.Geometry.GetSelectedSolids SelSolids 1