1
0
Fork 0
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:
nagai 2004-05-01 16:09:54 +00:00
parent ce23680755
commit 4c4631c2da
247 changed files with 27219 additions and 11144 deletions

View file

@ -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) {