diff options
Diffstat (limited to 'ext/tk/sample/demos-jp/menu84.rb')
-rw-r--r-- | ext/tk/sample/demos-jp/menu84.rb | 50 |
1 files changed, 25 insertions, 25 deletions
diff --git a/ext/tk/sample/demos-jp/menu84.rb b/ext/tk/sample/demos-jp/menu84.rb index 094853a728..6a57279481 100644 --- a/ext/tk/sample/demos-jp/menu84.rb +++ b/ext/tk/sample/demos-jp/menu84.rb @@ -1,4 +1,4 @@ -# -*- coding: euc-jp -*- +# -*- coding: utf-8 -*- # # menus widget demo (called by 'widget') # @@ -28,9 +28,9 @@ end TkLabel.new(base_frame,'font'=>$font,'wraplength'=>'4i','justify'=>'left') { if $tk_platform['platform'] == 'macintosh' || windowingsystem == "classic" || windowingsystem == "aqua" - text("このウィンドウにはカスケードメニューを持つメニューバーが付けられています。Command+x ('x'はコマンドキーシンボルに続けて表示されている文字です) とタイプすることによっても項目の機能を呼び出すことができます。最後のメニューは、マウスでウィンドウの外にドラッグすることによって、独立したパレットとなるように切り放すことが可能です。") + text("c潟鴻宴若<ャ若ゃ<ャ若若篁障Command+x ('x'潟潟若激潟膓茵腓冴絖с) 帥ゃc罘純若喝冴с障緇<ャ若鴻сc潟紊違c腴障純с") else - text("このウィンドウにはカスケードメニューを持つメニューバーが付けられています。Alt+x ('x'はメニュー上で下線が引かれた文字です) とタイプすることによってもメニューを呼び出すことができます。矢印キーを使って、メニュー間を移動することも可能です。メニューが表示されている時には、現在位置の項目をスペースキーで選択したり、下線が引かれた文字を入力することでその項目を選択したりすることができます。もし項目にアクセラレータの指定がなされていたならば、その指定されたキー入力を行うことで、メニューを表示させることなく直接その項目の機能を呼び出せます。最後のメニューは、メニューの最初の項目を選択することによって、独立したパレットとなるように切り放すことが可能です。") + text("c潟鴻宴若<ャ若ゃ<ャ若若篁障Alt+x ('x'<ャ寂т膩綣絖с) 帥ゃc<ャ若若喝冴с障√違若篏帥c<ャ守腱糸純с<ャ若茵腓冴憜篏臀鴻若鴻若ч御筝膩綣絖ュс御с障≪祉若帥絎違絎弱ュ茵с<ャ若茵腓冴贋・罘純若喝冴障緇<ャ若<ャ若御c腴障純с") end }.pack('side'=>'top') @@ -48,8 +48,8 @@ TkFrame.new(base_frame) {|frame| # frame TkFrame.new(base_frame) {|frame| TkButton.new(frame) { - #text '了解' - text '閉じる' + #text '篋茹' + text '' command proc{ tmppath = $menu84_demo $menu84_demo = nil @@ -58,7 +58,7 @@ TkFrame.new(base_frame) {|frame| }.pack('side'=>'left', 'expand'=>'yes') TkButton.new(frame) { - text 'コード参照' + text '潟若' command proc{showCode 'menu84'} }.pack('side'=>'left', 'expand'=>'yes') }.pack('side'=>'bottom', 'fill'=>'x', 'pady'=>'2m') @@ -70,13 +70,13 @@ $menu84_frame = TkMenu.new($menu84_demo, 'tearoff'=>false) # menu TkMenu.new($menu84_frame, 'tearoff'=>false) {|m| $menu84_frame.add('cascade', 'label'=>'File', 'menu'=>m, 'underline'=>0) - add('command', 'label'=>'Open...', 'command'=>proc{fail 'これは単なるデモですから、"Open..." 項目の機能は特に定義されてはいません。'}) - add('command', 'label'=>'New', 'command'=>proc{fail 'これは単なるデモですから、"New" 項目の機能は特に定義されてはいません。'}) - add('command', 'label'=>'Save', 'command'=>proc{fail 'これは単なるデモですから、"Save" 項目の機能は特に定義されてはいません。'}) - add('command', 'label'=>'Save As...', 'command'=>proc{fail 'これは単なるデモですから、"Save As..." 項目の機能は特に定義されてはいません。'}) + add('command', 'label'=>'Open...', 'command'=>proc{fail '≪с"Open..." 罘純鴻絎臂障'}) + add('command', 'label'=>'New', 'command'=>proc{fail '≪с"New" 罘純鴻絎臂障'}) + add('command', 'label'=>'Save', 'command'=>proc{fail '≪с"Save" 罘純鴻絎臂障'}) + add('command', 'label'=>'Save As...', 'command'=>proc{fail '≪с"Save As..." 罘純鴻絎臂障'}) add('separator') - add('command', 'label'=>'Print Setup...', 'command'=>proc{fail 'これは単なるデモですから、"Print Setup..." 項目の機能は特に定義されてはいません。'}) - add('command', 'label'=>'Print...', 'command'=>proc{fail 'これは単なるデモですから、"Print..." 項目の機能は特に定義されてはいません。'}) + add('command', 'label'=>'Print Setup...', 'command'=>proc{fail '≪с"Print Setup..." 罘純鴻絎臂障'}) + add('command', 'label'=>'Print...', 'command'=>proc{fail '≪с"Print..." 罘純鴻絎臂障'}) add('separator') add('command', 'label'=>'Dismiss Menus Demo', 'command'=>proc{$menu84_demo.destroy}) } @@ -116,20 +116,20 @@ TkMenu.new($menu84_frame, 'tearoff'=>false) {|m| m.add('cascade', 'label'=>'Check button', 'menu'=>cascade_check, 'underline'=>0) oil = TkVariable.new(0) - add('check', 'label'=>'オイル検査', 'variable'=>oil) + add('check', 'label'=>'ゃ罎', 'variable'=>oil) trans = TkVariable.new(0) - add('check', 'label'=>'トランスミッション検査', 'variable'=>trans) + add('check', 'label'=>'潟鴻激с恰', 'variable'=>trans) brakes = TkVariable.new(0) - add('check', 'label'=>'ブレーキ検査', 'variable'=>brakes) + add('check', 'label'=>'若罎', 'variable'=>brakes) lights = TkVariable.new(0) - add('check', 'label'=>'ライト検査', 'variable'=>lights) + add('check', 'label'=>'ゃ罎', 'variable'=>lights) add('separator') add('command', 'label'=>'Show current values', 'command'=>proc{showVars($menu84_demo, - ['オイル', oil], - ['トランスミッション', trans], - ['ブレーキ', brakes], - ['ライト', lights])} ) + ['ゃ', oil], + ['潟鴻激с', trans], + ['若', brakes], + ['ゃ', lights])} ) invoke 1 invoke 3 } @@ -149,7 +149,7 @@ TkMenu.new($menu84_frame, 'tearoff'=>false) {|m| add('radio', 'label'=>'Bold', 'variable'=>style, 'value'=>'bold') add('radio', 'label'=>'Italic', 'variable'=>style, 'value'=>'italic') add('separator') - add('command', 'label'=>'現在値の表示', + add('command', 'label'=>'憜ゃ茵腓', 'command'=>proc{showVars($menu84_demo, ['pointSize', pointSize], ['style', style])} ) @@ -164,9 +164,9 @@ TkMenu.new($menu84_frame, 'tearoff'=>false) {|m| 'bitmap'=>'@'+[$demo_dir,'..', 'images','pattern.xbm'].join(File::Separator), 'command'=>proc{TkDialog.new('title'=>'Bitmap Menu Entry', - 'text'=>'あなたが選択したメニュー項目は、文字列の代わりにビットマップイメージで項目を表示したものです。それ以外の点では、ほかのメニュー項目との間で特に違いがあるわけではありません。', + 'text'=>'御<ャ守絖篁cゃ<若吾ч茵腓冴с篁ュ鴻с祉<ャ守х鴻с障', 'bitmap'=>'', 'default'=>0, - 'buttons'=>'閉じる')} ) + 'buttons'=>'')} ) ['info', 'questhead', 'error'].each{|icon| add('command', 'bitmap'=>icon, 'hidemargin'=>1, 'command'=>proc{print "You invoked the #{icon} bitmap\n"}) @@ -187,8 +187,8 @@ TkMenu.new($menu84_frame, 'tearoff'=>false) {|m| 'bitmap'=>'questhead', 'compound'=>'left', 'command'=>proc{ TkDialog.new('title'=>'Compound Menu Entry', - 'message'=>'あなたが選択したメニュー項目は、ビットマップイメージと文字列とを同時に一つの項目に表示するようにしたものです。それ以外の点では、ほかのメニュー項目との間で特に違いがあるわけではありません。', - 'buttons'=>['了解'], 'bitmap'=>'') + 'message'=>'御<ャ守ゃ<若吾絖筝ゃ茵腓冴с篁ュ鴻с祉<ャ守х鴻с障', + 'buttons'=>['篋茹'], 'bitmap'=>'') }) } |