拡張Widget

Img

Tcl8.3からImgパッケージを使うのにパッチがいらなくなりました。
Imgパッケージを使うと、標準で使えるGIF,PPM,PGM形式以外にBMP,XPM,XBM,PNG,JPEG,TIFF,PostScript形式等が使えるようになります。
GIFについてはUNISYSがLZW圧縮法の特許を持っているので、miGIF圧縮法で回避しているようです。

package require Img
pack [canvas .can -width 100 -height 70]
image create photo foo -file hana.jpg
.can create image 0 0 -image foo -anchor nw

BLT

BLTパッケージを使うと、イメージを任意のサイズに拡大/縮小できます。
縮小時にBOXフィルタを使うと、サムネイルの見栄えがよくなります。

package require BLT
namespace import blt::*

pack [canvas .can -width 100 -height 70]
image create photo foo
winop readjpeg hana.jpg foo
image create photo bar -width 111 -height 74
winop resample foo bar box
.can create image 0 0 -image bar -anchor nw

ComboBox

ComboBoxパッケージを使うと、Windows風のコンボボックスWidgetが使えるようになります。

McListBox

McListBoxパッケージを使うと、Windows風のリストビューWidgetが使えるようになります。

BWidget

BWidgetパッケージを使うと、Windows風の各種Widgetが使えるようになります。
興味のある方は、BWidget入門を御覧ください。

その他

Some Pure Tcl Widgetsにバルーンヘルプ等のサンプルがあります。