1# 2# tkextlib/tcllib/tablelist.rb 3# by Hidetoshi NAGAI (nagai@ai.kyutech.ac.jp) 4# 5# * Part of tcllib extension 6# * A multi-column listbox 7 8require 'tk' 9require 'tkextlib/tcllib.rb' 10 11# check Tile extension :: If already loaded, use tablelist_tile. 12unless defined? Tk::Tcllib::Tablelist_usingTile 13 Tk::Tcllib::Tablelist_usingTile = 14 TkPackage.provide('tile') || TkPackage.provide('Ttk') 15end 16 17if Tk::Tcllib::Tablelist_usingTile 18 # with Tile 19 require 'tkextlib/tcllib/tablelist_tile' 20 21else 22 # without Tile 23 24 # TkPackage.require('tablelist', '4.2') 25 TkPackage.require('tablelist') 26 27 require 'tkextlib/tcllib/tablelist_core' 28end 29