摘要：
itk_component add heading_f {frame $itk_interior.main.hf \ -bd 1 \ -relief solid } itk_component add heading_l {label $itk_interior.main.hf.fl \ -text "Images" \ -font title_font \ -anchor w } {usualignore -font } grid $itk_component(heading_f) -row 0 -column 0 -sticky nswe -padx 7 -pady { 阅读全文
posted @ 2011-08-01 22:05
greencolor
阅读(171)
评论(0)
推荐(0)
摘要：
class test {inherit itk::Widgetpublic method aaapublic method rollover public method rolloutofpublic method showStageprivate variable current_stage "hull"constructor { args } {itk_option add hull.width hull.height$itk_component(hull) configure -width 1050 -height 768wm minsize [winfo tople 阅读全文
posted @ 2011-08-01 00:53
greencolor
阅读(388)
评论(0)
推荐(0)
浙公网安备 33010602011771号