*createmarkpanel elems 1 "onyl select bar elements"
set barlist [hm_getmark elems 1]
foreach elemID $barlist {
set propID [hm_getvalue elems id=$elemID dataname=propertyid]
set beamsecID [hm_getvalue props id=$propID dataname=BeamSec]
set width [hm_getvalue beamsects id=$beamsecID dataname=beamsect_dim1]
set thickness [hm_getvalue beamsects id=$beamsecID dataname=beamsect_dim2]
puts "Element ID $elemID width=$width thickness=$thickness "
}
#Element ID 176 width=44 thickness=4
#Element ID 194 width=50 thickness=6
Comments