摘要： proc autoscroll { scrollbar first last} { if {$first <= 0 && $last >= 1} {grid remove $scrollbar } else {grid $scrollbar } $scrollbar set $first $last}itk_component add viewcryst_scroll {scrollbar $itk_interior.iscroll \ -command [code $this component treectrlcom yview] \ -orient verti 阅读全文