1、选中指定的row类别
select_row -site core_2660
2、获取每个row的面积
set myrows [dbGet selected.box_area]
3、加起来
set sum [::tcl::mathop::+ {*}$myrows]
