greencolor - 博客园

2011年8月5日

摘要： class child { inherit itk::Widget public variable child_a constructor { args } { itk_option add hull.width hull.height $itk_component(hull) configure -width 1050 -height 768 wm minsize [winfo toplevel $itk_component(hull)] 1050 768 pack propagate $itk_interior 0 itk_component add menu {menu $itk_int 阅读全文

posted @ 2011-08-05 13:51 greencolor 阅读(136) 评论(0) 推荐(0)

find classes

摘要： =>class aaa {}=>find classes aaaaaa=>delete class aaa=>find classes aaa=> 阅读全文

posted @ 2011-08-05 11:48 greencolor 阅读(90) 评论(0) 推荐(0)

2011年8月4日

double inherit

摘要： class person {public variable namepublic variable ageconstructor {{inname "A N Other"} {inage 21}} {set name $innameset age $inage}}person .kk# Second base classclass cost {public variable startuppublic variable annualconstructor {{yearly 12000}{newstart 0} } {set startup $newstart } {set 阅读全文

posted @ 2011-08-04 22:28 greencolor 阅读(218) 评论(0) 推荐(0)

set font

摘要： set title_font_size 12font create title_font -family helvetica -size $title_font_size -weight bold 阅读全文

posted @ 2011-08-04 15:42 greencolor 阅读(106) 评论(0) 推荐(0)

2011年8月1日

grid pack

摘要： 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)

body test

摘要： 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)

2011年7月31日

Activity test no class

摘要： class Balloonwidget { inherit itk::Widget itk_option define -balloonhelp balloonHelp BalloonHelp "" private variable balloon_queue "" private variable destroy_queue "" public method enter public method leave public method balloon constructor { args } {bind $itk_componen 阅读全文

posted @ 2011-07-31 22:45 greencolor 阅读(155) 评论(0) 推荐(0)

Activity test

摘要： class Balloonwidget { inherit itk::Widget itk_option define -balloonhelp balloonHelp BalloonHelp "" private variable balloon_queue "" private variable destroy_queue "" public method enter public method leave public method balloon constructor { args } {bind $itk_componen 阅读全文

posted @ 2011-07-31 22:39 greencolor 阅读(162) 评论(0) 推荐(0)

Activity test itk_component

摘要： class Balloonwidget { inherit itk::Widget itk_option define -balloonhelp balloonHelp BalloonHelp "" private variable balloon_queue "" private variable destroy_queue "" public method enter public method leave public method balloon constructor { args } {bind $itk_componen 阅读全文

posted @ 2011-07-31 22:21 greencolor 阅读(187) 评论(0) 推荐(0)

Toolbutton test itk_component

摘要： class Balloonwidget { inherit itk::Widget itk_option define -balloonhelp balloonHelp BalloonHelp "" private variable balloon_queue "" private variable destroy_queue "" public method enter public method leave public method balloon constructor { args } {bind $itk_componen 阅读全文

posted @ 2011-07-31 22:08 greencolor 阅读(219) 评论(0) 推荐(0)

公告