OpenSTAAD V8i
Returns all supported nodes in an array.
Where:
A long Array stores the numbers of the nodes, which are supported in the current structure.
Dim lSupportNodesArray() as Long
Dim iSupportCount as Integer
'Get the application object --
iSupportCount = Support.GetSupportCount
ReDim lSupportNodesArray(0 to (iSupportCount-1)) as Long
'Get Support Nodes
objOpenSTAAD.Support.GetSupportNodes (lSupportNodesArray)