← Back to branch summary

~ubuntu-branches/ubuntu/hardy/ruby1.8/hardy-updates

« back to all changes in this revision

Viewing changes to ext/tk/sample/tkextlib/iwidgets/sample/extbutton.rb

  • Committer: Bazaar Package Importer
  • Author(s): akira yamada
  • Date: 2007-03-13 22:11:58 UTC
  • mfrom: (1.1.5 upstream)
  • Revision ID: james.westby@ubuntu.com-20070313221158-h3oql37brlaf2go2
Tags: 1.8.6-1
http://bugs.debian.org/410018
* new upstream version, 1.8.6.
* libruby1.8 conflicts with libopenssl-ruby1.8 (< 1.8.6) (closes: #410018)
* changed packaging style to cdbs from dbs.

Show diffs side-by-side

added added

removed removed

Lines of Context:
ext/tk/sample/tkextlib/iwidgets/sample/extbutton.rb
 
1
#!/usr/bin/env ruby
 
2
require 'tk'
 
3
require 'tkextlib/iwidgets'
 
4
 
 
5
Tk::Iwidgets::Extbutton.new(:text=>'Bitmap example', :bitmap=>'info', 
 
6
                            :background=>'bisque',  :activeforeground=>'red', 
 
7
                            :bitmapforeground=>'blue', :defaultring=>true, 
 
8
                            :command=>proc{
 
9
                              puts "Bisque is beautiful"
 
10
                            }).pack(:expand=>true)
 
11
 
 
12
#img = TkPhotoImage.new(:file=>File.join(File.dirname(File.expand_path(__FILE__)), '../../../images/earthris.gif'))
 
13
img = TkPhotoImage.new(:file=>File.join(File.dirname(File.expand_path(__FILE__)), '../catalog_demo/images/clear.gif'))
 
14
 
 
15
Tk::Iwidgets::Extbutton.new(:text=>'Image example', :relief=>:ridge, 
 
16
                            :image=>img, :imagepos=>:e, :font=>'9x15bold', 
 
17
                            :activebackground=>'lightyellow', 
 
18
                            :background=>'lightgreen').pack(:expand=>true)
 
19
 
 
20
Tk.mainloop