diff options
author | yugui <yugui@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2008-08-25 15:13:14 +0000 |
---|---|---|
committer | yugui <yugui@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2008-08-25 15:13:14 +0000 |
commit | d0233291bc8a5068e52c69c210e5979e5324b5bc (patch) | |
tree | 7d9459449c33792c63eeb7baa071e76352e0baab /trunk/ext/tk/sample/tkextlib/bwidget/dnd.rb | |
parent | 0dc342de848a642ecce8db697b8fecd83a63e117 (diff) | |
parent | 72eaacaa15256ab95c3b52ea386f88586fb9da40 (diff) |
re-adding tag v1_9_0_4 as an alias of trunk@18848v1_9_0_4
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/tags/v1_9_0_4@18849 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'trunk/ext/tk/sample/tkextlib/bwidget/dnd.rb')
-rw-r--r-- | trunk/ext/tk/sample/tkextlib/bwidget/dnd.rb | 46 |
1 files changed, 0 insertions, 46 deletions
diff --git a/trunk/ext/tk/sample/tkextlib/bwidget/dnd.rb b/trunk/ext/tk/sample/tkextlib/bwidget/dnd.rb deleted file mode 100644 index 1c8b036530..0000000000 --- a/trunk/ext/tk/sample/tkextlib/bwidget/dnd.rb +++ /dev/null @@ -1,46 +0,0 @@ -# -# dnd demo --- called from demo.rb -# -unless Object.const_defined?('DemoVar') - fail RuntimeError, "This is NOT a stand alone script. This script is called from 'demo.rb'. " -end - -module DemoDnD - def self.create(nb) - frame = nb.insert('end', 'demoDnD', :text=>'Drag and Drop') - - titf1 = Tk::BWidget::TitleFrame.new(frame, :text=>'Drag source') - subf = titf1.get_frame - - ent1 = Tk::BWidget::LabelEntry.new(subf, :label=>'Entry', - :labelwidth=>14, :dragenabled=>true, - :dragevent=>3) - labf1 = Tk::BWidget::LabelFrame.new(subf, :text=>'Label (text)', - :width=>14) - f = labf1.get_frame - lab = Tk::BWidget::Label.new(f, :text=>'Drag this text', - :dragenabled=>true, :dragevent=>3).pack - - labf2 = Tk::BWidget::LabelFrame.new(subf, :text=>'Label (bitmap)', - :width=>14) - f = labf2.get_frame - lab = Tk::BWidget::Label.new(f, :bitmap=>'info', - :dragenabled=>true, :dragevent=>3).pack - - Tk.pack(ent1, labf1, labf2, :side=>:top, :fill=>:x, :pady=>4) - - titf2 = Tk::BWidget::TitleFrame.new(frame, :text=>'Drop targets') - subf = titf2.get_frame - - ent1 = Tk::BWidget::LabelEntry.new(subf, :label=>'Entry', - :labelwidth=>14, :dropenabled=>true) - labf1 = Tk::BWidget::LabelFrame.new(subf, :text=>'Label', :width=>14) - f = labf1.get_frame - lab = Tk::BWidget::Label.new(f, :dropenabled=>true, - :highlightthickness=>1).pack(:fill=>:x) - Tk.pack(ent1, labf1, :side=>:top, :fill=>:x, :pady=>4) - Tk.pack(titf1, titf2, :pady=>4) - - frame - end -end |