Tk - Mega Widgets

Mega小部件包括许多复杂的小部件,这些小部件在某些大型Tk应用程序中经常需要.可用的超级小部件列表如下所示 :

Sr.No.小工具&说明
1Dialog

用于显示对话框的小工具.

2Spinbox

允许用户选择数字的小工具.

3Combobox

小工具将条目与可供选择的列表组合使用.

4Notebook

有助于在一个之间切换的标签式小部件几页,使用索引标签.

5Progressbar

小工具为文件上传等长时间操作的进度提供视觉反馈.

6Treeview

要显示和允许浏览的小工具通过更多树形式的项目层次结构.

7Scrollbar

滚动小部件而不使用文本或画布小部件.

8Scale

缩放小部件以通过滑块选择数值.

下面使用一些超级小部件显示一个简单的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]

当我们运行上述程序时,我们将获得以下输出 :

Mega Widget示例