diff options
Diffstat (limited to 'ext/tk/sample/demos-jp/textpeer.rb')
-rw-r--r-- | ext/tk/sample/demos-jp/textpeer.rb | 32 |
1 files changed, 16 insertions, 16 deletions
diff --git a/ext/tk/sample/demos-jp/textpeer.rb b/ext/tk/sample/demos-jp/textpeer.rb index de604f1940..4d896d2a12 100644 --- a/ext/tk/sample/demos-jp/textpeer.rb +++ b/ext/tk/sample/demos-jp/textpeer.rb @@ -1,4 +1,4 @@ -# -*- coding: euc-jp -*- +# -*- coding: utf-8 -*- # # text widget peering demo (called by 'widget') # @@ -22,17 +22,17 @@ count = [0] ## Define a widget that we peer from; it won't ever actually be shown though first = TkText.new(base_frame, :widgetname=>"text#{count[0] += 1}") -first.insert :end,"このデモは一つの組を成したテキストウィジェットを示します。" -first.insert :end,"それらのテキストウィジェットは対等(ピア;peer)の関係に" -first.insert :end,"なっています。" -first.insert :end,"それらは、基盤となるデータモデルは共通のものを持ちますが、" -first.insert :end,"画面表示位置、編集位置、選択範囲(selection)については" -first.insert :end,"独立に持つことができます。" -first.insert :end,"各テキストウィジェットの脇にある" -first.insert :end,"「ピア(peer)の作成」ボタンを使えば、" -first.insert :end,"新たなピアを追加することが可能です。" -first.insert :end,"また「ピア(peer)の消去」ボタンを使えば、" -first.insert :end,"特定のピアウィジェットを消去することもできます。" +first.insert :end,"≪筝ゃ腟鴻c吾с腓冴障" +first.insert :end,"鴻c吾с絲丞(;peer)≫" +first.insert :end,"c障" +first.insert :end,"榊ゃ若帥≪演<障" +first.insert :end,"脂∵;腓坂臀膩篏臀御膀(selection)ゃ" +first.insert :end,"腴ゃс障" +first.insert :end,"鴻c吾с" +first.insert :end,"(peer)篏帥潟篏帥違" +first.insert :end,"違≪菴遵純с" +first.insert :end,"障(peer)羔サ帥潟篏帥違" +first.insert :end,"劫≪c吾с羔サс障" Tk.update_idletasks ## for 'first' widget @@ -44,10 +44,10 @@ def makeClone(count, win, txt) sbar = TkScrollbar.new(win, :widgetname=>"sb#{cnt}") peer.yscrollbar sbar b1 = TkButton.new(win, :widgetname=>"clone#{cnt}", - :text=>'ピア(peer)の作成', + :text=>'(peer)篏', :command=>proc{makeClone(count, win, peer)}) b2 = TkButton.new(win, :widgetname=>"kill#{cnt}", - :text=>'ピア(peer)の消去', + :text=>'(peer)羔サ', :command=>proc{killClone(win, cnt)}) row = cnt * 2 TkGrid.configure(peer, sbar, b1, :sticky=>'nsew', :row=>row) @@ -68,12 +68,12 @@ first.destroy ## See Code / Dismiss buttons TkFrame.new(base_frame){|f| - TkButton.new(f, :text=>'閉じる', :width=>15, :command=>proc{ + TkButton.new(f, :text=>'', :width=>15, :command=>proc{ $textpeer_demo.destroy $textpeer_demo = nil }).pack(:side=>:left, :expand=>true) - TkButton.new(f, :text=>'コード参照', :width=>15, :command=>proc{ + TkButton.new(f, :text=>'潟若', :width=>15, :command=>proc{ showCode 'textpeer' }).pack(:side=>:left, :expand=>true) |