摘要: pack [canvas .c -bg yellow] -fill both -expand yes bind .c <Button-1> {puts 1}bind .c <Button-2> {puts 2}bind .c <Button-3> {puts 3}bind .c <Button-4> {puts 4} bind .c <Button-5> {puts 5}Button-1 left mouse clickButton-2 Middle mouse clickButton-3 Right mouse clickButto 阅读全文
posted @ 2011-08-27 15:11 greencolor 阅读(182) 评论(0) 推荐(0) 编辑
摘要: grid grid-------------------------------------| ----------- | -------------- || | pack | | | pack | || ----------- | -------------- || | pack | | | pack | || ----------- | -------------- ||------------------------------------grid option -column, -columnspan, -in, -ipadx, -ipady, -padx, -pady, -row.. 阅读全文
posted @ 2011-08-27 14:14 greencolor 阅读(176) 评论(0) 推荐(0) 编辑
摘要: constructor { args } {itk_component add tf {frame $itk_interior.tf}itk_component add fr1 {frame $itk_interior.tf.f1}itk_component add butt1 {button $itk_interior.tf.f1.b1 \ -text "a1" }itk_component add fr2 {frame $itk_interior.tf.f2}itk_component add butt2 {button $itk_interior.tf.f2.b2 \ 阅读全文
posted @ 2011-08-27 13:05 greencolor 阅读(136) 评论(0) 推荐(0) 编辑
摘要: $tclsh% info patchlevel8.4.19% exit$ wish% info patchlevel8.4.19% 阅读全文
posted @ 2011-08-27 10:41 greencolor 阅读(399) 评论(0) 推荐(0) 编辑