diff options
Diffstat (limited to 'ext/tk/sample/demos-jp/msgbox.rb')
-rw-r--r-- | ext/tk/sample/demos-jp/msgbox.rb | 30 |
1 files changed, 15 insertions, 15 deletions
diff --git a/ext/tk/sample/demos-jp/msgbox.rb b/ext/tk/sample/demos-jp/msgbox.rb index ed5d01252e..ec7b4f2bbc 100644 --- a/ext/tk/sample/demos-jp/msgbox.rb +++ b/ext/tk/sample/demos-jp/msgbox.rb @@ -1,15 +1,15 @@ -# -*- coding: euc-jp -*- +# -*- coding: utf-8 -*- # # message boxes widget demo (called by 'widget') # -# toplevel widget が存在すれば削除する +# toplevel widget 絖医ゃ if defined?($msgbox_demo) && $msgbox_demo $msgbox_demo.destroy $msgbox_demo = nil end -# demo 用の toplevel widget を生成 +# demo toplevel widget $msgbox_demo = TkToplevel.new {|w| title("Message Box Demonstration") iconname("messagebox") @@ -18,15 +18,15 @@ $msgbox_demo = TkToplevel.new {|w| base_frame = TkFrame.new($msgbox_demo).pack(:fill=>:both, :expand=>true) -# label 生成 +# label TkLabel.new(base_frame, 'font'=>$font, 'wraplength'=>'4i', 'justify'=>'left', - 'text'=>"まず表示するアイコンとメッセージボックスの種類を選んで下さい。その後に\"メッセージボックス\"ボタンを押すと、指定したメッセージボックスが表示されます。").pack('side'=>'top') + 'text'=>"障茵腓冴≪ゃ潟潟<祉若吾鴻腮蕁吾т緇\"<祉若吾\"帥潟若絎<祉若吾鴻茵腓冴障").pack('side'=>'top') -# frame 生成 +# frame TkFrame.new(base_frame) {|frame| TkButton.new(frame) { - #text '了解' - text '閉じる' + #text '篋茹' + text '' command proc{ tmppath = $msgbox_demo $msgbox_demo = nil @@ -35,17 +35,17 @@ TkFrame.new(base_frame) {|frame| }.pack('side'=>'left', 'expand'=>'yes') TkButton.new(frame) { - text 'コード参照' + text '潟若' command proc{showCode 'msgbox'} }.pack('side'=>'left', 'expand'=>'yes') TkButton.new(frame) { - text 'メッセージボックス' + text '<祉若吾' command proc{showMessageBox $msgbox_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,9 +81,9 @@ $msgboxType = TkVariable.new('ok') def showMessageBox(w) button = Tk.messageBox('icon'=>$msgboxIcon.value, 'type'=>$msgboxType.value, 'title'=>'Message', 'parent'=>w, - 'message'=>"これは\"#{$msgboxType.value}\"という種類のメッセージボックスで、\"#{$msgboxIcon.value}\"のアイコンが表示されています。") + 'message'=>"\"#{$msgboxType.value}\"腮蕁<祉若吾鴻с\"#{$msgboxIcon.value}\"≪ゃ潟潟茵腓冴障") Tk.messageBox('icon'=>'info', 'type'=>'ok', 'parent'=>w, - 'message'=>"あなたは \"#{button}\" を押しましたね。") + 'message'=>" \"#{button}\" 若障") end |