Mega小部件包括许多复杂的小部件,这些小部件在某些大型Tk应用程序中经常需要.可用的超级小部件列表如下所示 :
Sr.No. | 小工具&说明 |
---|---|
1 | Dialog 用于显示对话框的小工具. |
2 | Spinbox 允许用户选择数字的小工具. |
3 | Combobox 小工具将条目与可供选择的列表组合使用. |
4 | Notebook 有助于在一个之间切换的标签式小部件几页,使用索引标签. |
5 | Progressbar 小工具为文件上传等长时间操作的进度提供视觉反馈. |
6 | Treeview 要显示和允许浏览的小工具通过更多树形式的项目层次结构. |
7 | Scrollbar 滚动小部件而不使用文本或画布小部件. |
8 | Scale 缩放小部件以通过滑块选择数值. |
下面使用一些超级小部件显示一个简单的Tk示例.
#!/usr/bin/wish ttk::treeview .tree -columns "Creator Year" -displaycolumns "Year Creator" .tree heading Creator -text "Creator" -anchor center .tree heading Year -text "Year" -anchor center pack .tree .tree insert {} end -id Languages -text "Languages" .tree insert Languages end -text C -values [list "Dennis Ritchie" "1990"] proc scaleMe {mywidget scaleValue} { $mywidget configure -length $scaleValue } pack [scale .s2 -from 100.0 -to 200.0 -length 100 -background yellow -borderwidth 5 -font{Helvetica -18 bold} -foreground red -width 40 -relief ridge -orien horizontal -variable a -command "scaleMe .s2" ] pack [ttk::progressbar .p1 -orient horizontal -length 200 -mode indeterminate -value 90] pack [ttk::progressbar .p2 -orient horizontal -length 200 -mode determinate -variable a -maximum 75 -value 20]
当我们运行上述程序时,我们将获得以下输出 :