diff options
Diffstat (limited to 'ext/tk/sample/demos-jp/entry3.rb')
-rw-r--r-- | ext/tk/sample/demos-jp/entry3.rb | 46 |
1 files changed, 23 insertions, 23 deletions
diff --git a/ext/tk/sample/demos-jp/entry3.rb b/ext/tk/sample/demos-jp/entry3.rb index 2728de0b93..59c698de62 100644 --- a/ext/tk/sample/demos-jp/entry3.rb +++ b/ext/tk/sample/demos-jp/entry3.rb @@ -1,4 +1,4 @@ -# -*- coding: euc-jp -*- +# -*- coding: utf-8 -*- # entry3.rb -- # # This demonstration script creates several entry widgets whose @@ -23,33 +23,33 @@ base_frame = TkFrame.new($entry3_demo).pack(:fill=>:both, :expand=>true) TkLabel.new(base_frame, :font=>$font, :wraplength=>'5i', :justify=>:left, :text=><<EOL).pack(:side=>:top) -以下には4種類のエントリボックスが表示されています.各エントリボックスは,\ -マウスクリックで選択し文字を打ち込むことが可能ですが,それぞれがどのような\ -入力を受け付けることができるかには制約が設けられています.\ -一つめのエントリボックスは整数と見なされる文字列か入力文字がない空の状態か\ -の場合だけを受け付け,問題がある場合はエントリボックスが点滅します\ -(フォーカスが去る時にチェックされます).\ -二つめのエントリボックスは,入力された文字列の長さが\ -10文字未満の場合だけを受け付け,制限を越えて書き込もうとしたときには\ -ベルを鳴らして知らせます.\ -三つめは米国の電話番号を受け付けるエントリボックスです.\ -アルファベットは,電話機のダイヤル上で対応づけられている数字に変換されます.\ -不適切な文字が入力されたり数字以外の文字の位置に数字を入力しようとしたり\ -した場合には警告のベルが鳴ります.\ -四つめのエントリボックスは,8文字までの入力を受け付ける\ -パスワードフィールドです(8文字以上は特に警告を出すことなく無視されます).\ -入力された文字はアスタリスク記号に置き換えて表示されます. +篁ヤ鐚腮蕁潟鴻茵腓冴障鐚潟鴻鐚\ +鴻ч御絖∴昭純с鐚\ +ュ篁с句荐障鐚\ +筝ゃ潟鴻贋違荀絖ュ絖腥冴倶\ +翫篁鐚馹翫潟鴻号障\ +鐚若鴻サс障鐚鐚\ +篋ゃ潟鴻鐚ュ絖激\ +鐚鐚絖羣翫篁鐚狗莇吾莨若\ +薐眼ャ障鐚\ +筝ゃ膠喝純肢援垩篁潟鴻с鐚\ +≪<鐚肢掩ゃゃ筝у上ャ医紊障鐚\ +筝絖ュ医篁ュ絖篏臀医ュ\ +翫茘薐眼障鐚\ +ゃ潟鴻鐚鐚絖障сュ篁\ +鴻若c若с鐚鐚絖篁ヤ鴻茘冴∴障鐚鐚\ +ュ絖≪鴻帥鴻荐垩臀茵腓冴障鐚 EOL TkFrame.new(base_frame){|f| pack(:side=>:bottom, :fill=>:x, :pady=>'2m') - TkButton.new(f, :text=>'閉じる', :width=>15, :command=>proc{ + TkButton.new(f, :text=>'', :width=>15, :command=>proc{ $entry3_demo.destroy $entry3_demo = nil }).pack(:side=>:left, :expand=>true) - TkButton.new(f, :text=>'コード参照', :width=>15, :command=>proc{ + TkButton.new(f, :text=>'潟若', :width=>15, :command=>proc{ showCode 'entry3' }).pack(:side=>:left, :expand=>true) } @@ -90,7 +90,7 @@ def focusAndFlash(widget, fg, bg, count=5) widget.focus(true) end -l1 = TkLabelFrame.new(base_frame, :text=>"整数エントリ") +l1 = TkLabelFrame.new(base_frame, :text=>"贋違潟") TkEntry.new(l1, :validate=>:focus, :vcmd=>[ proc{|s| s == '' || /^[+-]?\d+$/ =~ s }, '%P' @@ -101,7 +101,7 @@ TkEntry.new(l1, :validate=>:focus, pack(:fill=>:x, :expand=>true, :padx=>'1m', :pady=>'1m') } -l2 = TkLabelFrame.new(base_frame, :text=>"長さ制約付きエントリ") +l2 = TkLabelFrame.new(base_frame, :text=>"激句篁潟") TkEntry.new(l2, :validate=>:key, :invcmd=>proc{Tk.bell}, :vcmd=>[proc{|s| s.length < 10}, '%P'] ).pack(:fill=>:x, :expand=>true, :padx=>'1m', :pady=>'1m') @@ -190,7 +190,7 @@ def validatePhoneChange(widget, vmode, idx, char) end -l3 = TkLabelFrame.new(base_frame, :text=>"米国電話番号エントリ") +l3 = TkLabelFrame.new(base_frame, :text=>"膠喝初肢援垩潟") TkEntry.new(l3, :validate=>:key, :invcmd=>proc{Tk.bell}, :textvariable=>entry3content, :vcmd=>[ @@ -209,7 +209,7 @@ TkEntry.new(l3, :validate=>:key, :invcmd=>proc{Tk.bell}, pack(:fill=>:x, :expand=>true, :padx=>'1m', :pady=>'1m') } -l4 = TkLabelFrame.new(base_frame, :text=>"パスワードエントリ") +l4 = TkLabelFrame.new(base_frame, :text=>"鴻若潟") TkEntry.new(l4, :validate=>:key, :show=>'*', :vcmd=>[ proc{|s| s.length <= 8}, |