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
|
@ -18,7 +18,8 @@ $twind_demo = TkToplevel.new {|w|
|
|||
# frame 生成
|
||||
$twind_buttons = TkFrame.new($twind_demo) {|frame|
|
||||
TkButton.new(frame) {
|
||||
text '了解'
|
||||
#text '了解'
|
||||
text '閉じる'
|
||||
command proc{
|
||||
tmppath = $twind_demo
|
||||
$twind_demo = nil
|
||||
|
@ -75,7 +76,7 @@ TkTextWindow.new($twind_text, 'end',
|
|||
command proc{textWindOn $twind_text,$twind_buttons}
|
||||
cursor 'top_left_arrow'
|
||||
})
|
||||
$twind_text.insert('end', 'にします。また2つめのボタンをクリックすると')
|
||||
$twind_text.insert('end', "にします。また2つめのボタンをクリックすると\n")
|
||||
$twind_text.insert('end', '水平方向のスクロールを')
|
||||
TkTextWindow.new($twind_text, 'end',
|
||||
'window'=>TkButton.new($twind_text) {
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue