kotovalexarian-likes-github/ruby--ruby
1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00
Code Releases Activity

* ext/tk/lib/tk/*: untabify

Browse source 
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@7029 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
nagai 2004-10-11 04:51:21 +00:00
parent 05f5928c9d
commit 3514110b89
296 changed files with 13591 additions and 13558 deletions
Download patch file Download diff file Expand all files Collapse all files

68
ext/tk/sample/tkextlib/vu/canvItems.rb
View file

@ -10,63 +10,63 @@ xbm = File.join(File.dirname(File.expand_path(__FILE__)), 'm128_000.xbm')
sval = [ 11, 22, 33, 44, 55, 66, 77, 88, 99 ]
l0 = TkLabel.new(:width=>128, :height=>128,
:bitmap=>"@#{xbm}", :relief=>:groove).pack(:side=>:left)
:bitmap=>"@#{xbm}", :relief=>:groove).pack(:side=>:left)
c0 = TkCanvas.new(:width=>80, :height=>80,
:insertwidth=>0, :highlightthickness=>0,
:selectborderwidth=>0, :borderwidth=>2,
:relief=>:ridge).place(:in=>l0, :relx=>0.5, :rely=>0.5,
:anchor=>:c)
:insertwidth=>0, :highlightthickness=>0,
:selectborderwidth=>0, :borderwidth=>2,
:relief=>:ridge).place(:in=>l0, :relx=>0.5, :rely=>0.5,
:anchor=>:c)
st = Tk::Vu::TkcStripchart.new(c0, 3, 3, 80, 80,
:background=>"#b7c0d7", :fill=>'slategray3',
:jumpscroll=>1, :outline=>'black',
:scaleline=>'blue', :stripline=>'red',
:selected=>1, :values=>sval)
:background=>"#b7c0d7", :fill=>'slategray3',
:jumpscroll=>1, :outline=>'black',
:scaleline=>'blue', :stripline=>'red',
:selected=>1, :values=>sval)
TkcText.create(c0, 40, 40,
:text=>Tk::TCL_PATCHLEVEL, :fill=>'cyan', :tags=>'text')
:text=>Tk::TCL_PATCHLEVEL, :fill=>'cyan', :tags=>'text')
l1 = TkLabel.new(:width=>128, :height=>128,
:bitmap=>"@#{xbm}", :relief=>:groove).pack(:side=>:left)
:bitmap=>"@#{xbm}", :relief=>:groove).pack(:side=>:left)
c1 = TkCanvas.new(:width=>80, :height=>80,
:insertwidth=>0, :highlightthickness=>0,
:selectborderwidth=>0, :borderwidth=>2,
:relief=>:ridge).place(:in=>l1, :relx=>0.5, :rely=>0.5,
:anchor=>:c)
:insertwidth=>0, :highlightthickness=>0,
:selectborderwidth=>0, :borderwidth=>2,
:relief=>:ridge).place(:in=>l1, :relx=>0.5, :rely=>0.5,
:anchor=>:c)
bar1 = Tk::Vu::TkcBarchart.new(c1, 3, 3, 80, 80,
:background=>"#b7c0d7", :scalevalue=>10.0,
:autocolor=>true, :selected=>1,
:outline=>'black', :barline=>'yellow',
:scalelinestyle=>0)
:background=>"#b7c0d7", :scalevalue=>10.0,
:autocolor=>true, :selected=>1,
:outline=>'black', :barline=>'yellow',
:scalelinestyle=>0)
bar2 = Tk::Vu::TkcBarchart.new(c1, 53, 3, 80, 80,
:background=>"#b7c0d7", :scalevalue=>10.0,
:autocolor=>true, :selected=>1,
:outline=>'black', :fill=>"#b7c0d7",
:barline=>'red', :scalelinestyle=>22)
:background=>"#b7c0d7", :scalevalue=>10.0,
:autocolor=>true, :selected=>1,
:outline=>'black', :fill=>"#b7c0d7",
:barline=>'red', :scalelinestyle=>22)
l2 = TkLabel.new(:width=>128, :height=>128,
:bitmap=>"@#{xbm}", :relief=>:groove).pack(:side=>:left)
:bitmap=>"@#{xbm}", :relief=>:groove).pack(:side=>:left)
c2 = TkCanvas.new(:width=>80, :height=>80,
:insertwidth=>0, :highlightthickness=>0,
:selectborderwidth=>0, :borderwidth=>2,
:relief=>:ridge).place(:in=>l2, :relx=>0.5, :rely=>0.5,
:anchor=>:c)
:insertwidth=>0, :highlightthickness=>0,
:selectborderwidth=>0, :borderwidth=>2,
:relief=>:ridge).place(:in=>l2, :relx=>0.5, :rely=>0.5,
:anchor=>:c)
begin
stick = Tk::Vu::TkcSticker.new(c2, 3, 3, 80, 80,
:text=>"Tcl/Tk", :space=>0, :color=>'red',
:outline=>'red', :font=>'Helvetica 14 bold',
:fill=>'', :stipple=>'', :bar=>'blue',
:orient=>:vertical, :anchor=>:s,
:relheight=>1.0, :relwidth=>0.15,
:relx=>0.1, :rely=>0.0)
:text=>"Tcl/Tk", :space=>0, :color=>'red',
:outline=>'red', :font=>'Helvetica 14 bold',
:fill=>'', :stipple=>'', :bar=>'blue',
:orient=>:vertical, :anchor=>:s,
:relheight=>1.0, :relwidth=>0.15,
:relx=>0.1, :rely=>0.0)
rescue
stick = nil
TkcText.new(c2, 40, 10, :text=>"No Sticker Item")