mirror of
https://github.com/ruby/ruby.git
synced 2022-11-09 12:17:21 -05:00
* renewal Ruby/Tk
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@6237 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
parent
ce23680755
commit
4c4631c2da
247 changed files with 27219 additions and 11144 deletions
|
@ -41,7 +41,7 @@ EOL
|
|||
TkFrame.new($entry3_demo){|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)
|
||||
|
@ -161,6 +161,8 @@ def validatePhoneChange(widget, vmode, idx, char)
|
|||
widget.delete(idx)
|
||||
widget.insert(idx, $phoneNumberMap[char] || char)
|
||||
Tk.after_idle(proc{phoneSkipRight(widget, -1)})
|
||||
# Tk.update(true) # Don't work 'update' inter validation callback.
|
||||
# It depends on Tcl/Tk side (tested on Tcl/Tk8.5a1).
|
||||
return true
|
||||
end
|
||||
return false
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue