lib/ruby-1.9.1-rc1/ext/tk/lib/tkextlib/bwidget.rb

   1 #
   2 #  BWidget extension support
   3 #                               by Hidetoshi NAGAI (nagai@ai.kyutech.ac.jp)
   4 #
   5
   6 require 'tk'
   7
   8 # call setup script for general 'tkextlib' libraries
   9 require 'tkextlib/setup.rb'
  10
  11 # call setup script
  12 require 'tkextlib/bwidget/setup.rb'
  13
  14 # load all image format handlers
  15 #TkPackage.require('BWidget', '1.7')
  16 TkPackage.require('BWidget')
  17
  18 module Tk
  19   module BWidget
  20     TkComm::TkExtlibAutoloadModule.unshift(self)
  21
  22     extend TkCore
  23
  24     LIBRARY = tk_call('set', '::BWIDGET::LIBRARY')
  25
  26     PACKAGE_NAME = 'BWidget'.freeze
  27     def self.package_name
  28       PACKAGE_NAME
  29     end
  30
  31     def self.package_version
  32       begin
  33         TkPackage.require('BWidget')
  34       rescue
  35         ''
  36       end
  37     end
  38
  39     def self.XLFDfont(cmd, *args)
  40       if args[-1].kind_of?(Hash)
  41         keys = args.pop
  42         args.concat(hash_kv(keys))
  43       end
  44       tk_call('BWidget::XLFDfont', cmd, *args)
  45     end
  46
  47     def self.assert(exp, msg=None)
  48       tk_call('BWidget::assert', exp, msg)
  49     end
  50
  51     def self.badOptionString(type, value, list)
  52       tk_call('BWidget::badOptionString', type, value, list)
  53     end
  54
  55     def self.bindMouseWheel(widget)
  56       tk_call('BWidget::bindMouseWheel', widget)
  57     end
  58
  59     def self.classes(klass)
  60       list(tk_call('BWidget::classes', klass))
  61     end
  62
  63     def self.clonename(menu)
  64       tk_call('BWidget::clonename', menu)
  65     end
  66
  67     def self.focus(opt, path)
  68       tk_call('BWidget::focus', opt, path)
  69     end
  70
  71     def self.get3dcolor(path, bgcolor)
  72       tk_call('BWidget::get3dcolor', path, bgcolor)
  73     end
  74
  75     def self.getname(name)
  76       tk_call('BWidget::getname', name)
  77     end
  78
  79     def self.grab(opt, path)
  80       tk_call('BWidget::grab', opt, path)
  81     end
  82
  83     def self.inuse(klass)
  84       bool(tk_call('BWidget::inuse', klass))
  85     end
  86
  87     def self.library(klass, *klasses)
  88       tk_call('BWidget::library', klass, *klasses)
  89     end
  90
  91     def self.lreorder(list, neworder)
  92       tk_call('BWidget::lreorder', list, neworder)
  93     end
  94
  95     def self.parsetext(text)
  96       tk_call('BWidget::parsetext', text)
  97     end
  98
  99     def self.place(path, w, h, *args)
 100       if args[-1].kind_of?(Hash)
 101         keys = args.pop
 102         args.concat(hash_kv(keys))
 103       end
 104       tk_call('BWidget::place', path, w, h, *(args.flatten))
 105     end
 106
 107     def self.write(file, mode=None)
 108       tk_call('BWidget::write', file, mode)
 109     end
 110
 111     def self.wrongNumArgsString(str)
 112       tk_call('BWidget::wrongNumArgsString', str)
 113     end
 114
 115     ####################################################
 116
 117     autoload :ArrowButton,     'tkextlib/bwidget/arrowbutton'
 118     autoload :Bitmap,          'tkextlib/bwidget/bitmap'
 119     autoload :Button,          'tkextlib/bwidget/button'
 120     autoload :ButtonBox,       'tkextlib/bwidget/buttonbox'
 121     autoload :ComboBox,        'tkextlib/bwidget/combobox'
 122     autoload :Dialog,          'tkextlib/bwidget/dialog'
 123     autoload :DragSite,        'tkextlib/bwidget/dragsite'
 124     autoload :DropSite,        'tkextlib/bwidget/dropsite'
 125     autoload :DynamicHelp,     'tkextlib/bwidget/dynamichelp'
 126     autoload :Entry,           'tkextlib/bwidget/entry'
 127     autoload :Label,           'tkextlib/bwidget/label'
 128     autoload :LabelEntry,      'tkextlib/bwidget/labelentry'
 129     autoload :LabelFrame,      'tkextlib/bwidget/labelframe'
 130     autoload :ListBox,         'tkextlib/bwidget/listbox'
 131     autoload :MainFrame,       'tkextlib/bwidget/mainframe'
 132     autoload :MessageDlg,      'tkextlib/bwidget/messagedlg'
 133     autoload :NoteBook,        'tkextlib/bwidget/notebook'
 134     autoload :PagesManager,    'tkextlib/bwidget/pagesmanager'
 135     autoload :PanedWindow,     'tkextlib/bwidget/panedwindow'
 136     autoload :PasswdDlg,       'tkextlib/bwidget/passwddlg'
 137     autoload :ProgressBar,     'tkextlib/bwidget/progressbar'
 138     autoload :ProgressDlg,     'tkextlib/bwidget/progressdlg'
 139     autoload :ScrollableFrame, 'tkextlib/bwidget/scrollableframe'
 140     autoload :ScrolledWindow,  'tkextlib/bwidget/scrolledwindow'
 141     autoload :ScrollView,      'tkextlib/bwidget/scrollview'
 142     autoload :SelectColor,     'tkextlib/bwidget/selectcolor'
 143     autoload :SelectFont,      'tkextlib/bwidget/selectfont'
 144     autoload :Separator,       'tkextlib/bwidget/separator'
 145     autoload :SpinBox,         'tkextlib/bwidget/spinbox'
 146     autoload :TitleFrame,      'tkextlib/bwidget/titleframe'
 147     autoload :Tree,            'tkextlib/bwidget/tree'
 148     autoload :Widget,          'tkextlib/bwidget/widget'
 149
 150   end
 151 end