diff options
Diffstat (limited to 'ext/tk/sample/demos-jp/msgbox2.rb')
-rw-r--r-- | ext/tk/sample/demos-jp/msgbox2.rb | 32 |
1 files changed, 16 insertions, 16 deletions
diff --git a/ext/tk/sample/demos-jp/msgbox2.rb b/ext/tk/sample/demos-jp/msgbox2.rb index 8c80e08d70..ad6d936036 100644 --- a/ext/tk/sample/demos-jp/msgbox2.rb +++ b/ext/tk/sample/demos-jp/msgbox2.rb @@ -1,15 +1,15 @@ -# -*- coding: euc-jp -*- +# -*- coding: utf-8 -*- # # message boxes widget demo (called by 'widget') # -# toplevel widget が存在すれば削除する +# toplevel widget 絖医ゃ if defined?($msgbox2_demo) && $msgbox2_demo $msgbox2_demo.destroy $msgbox2_demo = nil end -# demo 用の toplevel widget を生成 +# demo toplevel widget $msgbox2_demo = TkToplevel.new {|w| title("Message Box Demonstration") iconname("messagebox") @@ -18,15 +18,15 @@ $msgbox2_demo = TkToplevel.new {|w| base_frame = TkFrame.new($msgbox2_demo).pack(:fill=>:both, :expand=>true) -# label 生成 +# label TkLabel.new(base_frame, 'font'=>$font, 'wraplength'=>'4i', 'justify'=>'left', - 'text'=>"まず表示するアイコンとメッセージボックスの種類を選んで下さい。その後に\"メッセージボックス\"ボタンを押すと、指定された形式で、メッセージと詳細テキストとを持ったメッセージボックスが表示されます。").pack('side'=>'top') + 'text'=>"障茵腓冴≪ゃ潟潟<祉若吾鴻腮蕁吾т緇\"<祉若吾\"帥潟若絎綵√с<祉若吾荅括完鴻c<祉若吾鴻茵腓冴障").pack('side'=>'top') -# frame 生成 +# frame TkFrame.new(base_frame) {|frame| TkButton.new(frame) { - #text '了解' - text '閉じる' + #text '篋茹' + text '' command proc{ tmppath = $msgbox2_demo $msgbox2_demo = nil @@ -35,17 +35,17 @@ TkFrame.new(base_frame) {|frame| }.pack('side'=>'left', 'expand'=>'yes') TkButton.new(frame) { - text 'コード参照' + text '潟若' command proc{showCode 'msgbox2'} }.pack('side'=>'left', 'expand'=>'yes') TkButton.new(frame) { - text 'メッセージボックス' + text '<祉若吾' command proc{showMessageBox2 $msgbox2_demo} }.pack('side'=>'left', 'expand'=>'yes') }.pack('side'=>'bottom', 'fill'=>'x', 'pady'=>'2m') -# frame 生成 +# frame $msgbox_leftframe = TkFrame.new(base_frame) $msgbox_rightframe = TkFrame.new(base_frame) $msgbox_leftframe .pack('side'=>'left', 'expand'=>'yes', 'fill'=>'y', @@ -53,7 +53,7 @@ $msgbox_leftframe .pack('side'=>'left', 'expand'=>'yes', 'fill'=>'y', $msgbox_rightframe.pack('side'=>'left', 'expand'=>'yes', 'fill'=>'y', 'pady'=>'.5c', 'padx'=>'.5c') -TkLabel.new($msgbox_leftframe, 'text'=>'アイコン').pack('side'=>'top') +TkLabel.new($msgbox_leftframe, 'text'=>'≪ゃ潟').pack('side'=>'top') TkFrame.new($msgbox_leftframe, 'relief'=>'ridge', 'bd'=>1, 'height'=>2)\ .pack('side'=>'top', 'fill'=>'x', 'expand'=>'no') @@ -65,7 +65,7 @@ $msgboxIcon = TkVariable.new('info') 'anchor'=>'w', 'fill'=>'x') } -TkLabel.new($msgbox_rightframe, 'text'=>'種類').pack('side'=>'top') +TkLabel.new($msgbox_rightframe, 'text'=>'腮蕁').pack('side'=>'top') TkFrame.new($msgbox_rightframe, 'relief'=>'ridge', 'bd'=>1, 'height'=>2)\ .pack('side'=>'top', 'fill'=>'x', 'expand'=>'no') @@ -81,10 +81,10 @@ $msgboxType = TkVariable.new('ok') def showMessageBox2(w) button = Tk.messageBox('icon'=>$msgboxIcon.value, 'type'=>$msgboxType.value, 'title'=>'Message', 'parent'=>w, - 'message'=>"\"#{$msgboxType.value}\"タイプのメッセージボックス", - 'detail'=>"これは\"#{$msgboxType.value}\"という種類のメッセージボックスで、\"#{$msgboxIcon.value}\"のアイコンが表示されています。下のボタンのいずれかを選択してクリックしてください。") + 'message'=>"\"#{$msgboxType.value}\"帥ゃ<祉若吾", + 'detail'=>"\"#{$msgboxType.value}\"腮蕁<祉若吾鴻с\"#{$msgboxIcon.value}\"≪ゃ潟潟茵腓冴障筝帥潟御") Tk.messageBox('icon'=>'info', 'type'=>'ok', 'parent'=>w, - 'message'=>"あなたは \"#{button}\" を押しましたね。") + 'message'=>" \"#{button}\" 若障") end |