作者: 藤岡和夫
日時: 2008/1/13(20:57)
On Thu, 03 Jan 2008 12:19:25 +0900
藤岡和夫 <kazuf@...> wrote:

> 問題は、
> 
> http://aspn.activestate.com/ASPN/Cookbook/Tcl/Recipe/136605
> 
> にあるサンプルで、Error in 
> 
> package require Tkhtml
> package require http
> pack [scrollbar .v -o v -co {.h yv}] -s right -f y
> pack [html .h -ys {.v set}] -f both -e 1
> # フォントを指定
> .h configure -fontcommand "MS ゴシック 10 normal"
> bind .h.x <1> {eval g [.h href %x %y]}
> proc g u {
> 	set t [http::geturl $u]
> 	.h cl
> 	.h p [http::data $t]
> 	http::cleanup $t
> 	.h co -base $u
> };
> #g http://mini.net/tcl/976.html
> g http://homepage1.nifty.com/kazuf/renewal.html
> proc bgerror args {}
> # NEM :-)
> 
> 日本語フォントを指定したスクリプトが、おそらく8.4.13では動作していたと思
> うのですが。今回、8.5で起動しようとすると、Error in starup scriptで、
> 「System フォント名の羅列」のメッセージが出てきます。

 これは以前のバージョンでも動かなかったのを思い出しました。

htmlview.tcl : A simple htmlviewer
http://www.msen.com/~clif/HtmlView.html

にある、Stephen Uhler氏のSimple HTML display library version 0.3.4は動作します。

僕の日記では、この記事ですね。詳しくは書いていないけど・・・

PerlユーザーのためのTcl/Tk入門? - Tcl/Tkで日本語のHTMLを表示する
http://homepage1.nifty.com/kazuf/renewal_2005_03.html#tcl_1111394650

藤岡 和夫
kazuf@...
日曜プログラマのひとりごと http://homepage1.nifty.com/kazuf/renewal.html