大型部件,其中包括許多復(fù)雜的部件是經(jīng)常需要在一些大型Tk的應(yīng)用。可用大型部件的列表,如下所示。
SN | Widget | 描述 |
---|---|---|
1 | Dialog | 小部件顯示對(duì)話框。 |
2 | Spinbox | 小工具,允許用戶選擇數(shù)字。 |
3 | Combobox | 窗口小部件,它結(jié)合了可供利用的選擇列表中的一個(gè)條目。 |
4 | Notebook | 標(biāo)簽窗口小部件,有助于幾個(gè)頁(yè)面之一之間切換,使用索引選項(xiàng)卡。 |
5 | Progressbar | 窗口小部件提供視覺(jué)反饋的一個(gè)長(zhǎng)操作,如文件上傳進(jìn)度。 |
6 | Treeview | 窗口小部件來(lái)顯示,并允許通過(guò)項(xiàng)目的層次結(jié)構(gòu)瀏覽更多的樹(shù)的形式。 |
7 | Scrollbar | 滾動(dòng)部件不帶文字或canvas小部件。 |
8 | Scale | 縮放小部件選擇通過(guò)滑塊的數(shù)值。 |
一個(gè)簡(jiǎn)單的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]
當(dāng)我們運(yùn)行上面的程序,會(huì)得到下面的輸出。