[ruby-list:44142] Re: ruby-tk with tcltk8.5b1

天野です。

---------------------------------------------------------------------
when /^8.*/
   $font = TkFont.new('Helvetica -12')
   $kanji_font = $font
   TkOption.add('*kanjiFont', knjfont, 'startupFile')
   $msg_kanji_font=TkFont.new('Helvetica 16')
---------------------------------------------------------------------
残念ながら同じ結果です。
うちの環境では、wraplengthの効き方が違います。

8.4.10

$KCODE = "e"
require "tk"

TkLabel.new("text"=>"He is a pen", "wraplength"=>"1").pack
Tk.mainloop
1letterごとに改行。

TkLabel.new("text"=>"こんばんは日本", "wraplength"=>"1").pack
1文字ごとに改行
"こんばんは"の後ろに半角スペースでも同じ。


8.5b1
$KCODE = "e"
require "tk"
TkLabel.new("text"=>"He is a pen", "wraplength"=>"1").pack
各単語で改行。

TkLabel.new("text"=>"こんばんは日本", "wraplength"=>"1").pack
１行で表示

"こんばんは 日本"
"こんばんは"の後ろに半角スペースだと、"こんばん 
は"で改行。


---------------------------------------------------------------------
   d1.bind('1',
           proc{
             eval_samplecode(`cat #{[$demo_dir,'items.rb'].join 
(File::Separator)}`)
           })
---------------------------------------------------------------------
直りました。

振り子は、
WindowsXPSP2 ruby 1.8.6 (2007-03-13 patchlevel 0)[i386-mswin32]
ActiveTcl 8.4.16でも同じエラーです。

Ryutaro Amano
[e-mail]