itk_component

      itk_component add dismiss {
            button $itk_interior.dismiss -text "Dismiss" -command "destroy $itk_component(hull)"
        }

the array of

itk_component get a new member as dismiss

new itk_component as arraylist

itk_componet add dismiss === itk_component.add(dismiss)

itk_component(dismiss)

button $itk_interior.dismiss

new a button as $itk_interior.dismiss, with the initial value as -text "Dismiss", -command "destory ..."

itk_component(dismiss)  do "new a button as $itk_interior.dismiss, with the initial value as -text "Dismiss", -command "destory ...""

posted @ 2011-07-26 01:48  greencolor  阅读(129)  评论(0编辑  收藏  举报