tk 0.1.0

Sign up to get free protection for your applications and to get access to all the features.
Files changed (1060) hide show
  1. checksums.yaml +7 -0
  2. data/.gitignore +10 -0
  3. data/.travis.yml +6 -0
  4. data/BSDL +22 -0
  5. data/ChangeLog.tkextlib +949 -0
  6. data/Gemfile +4 -0
  7. data/LICENSE.txt +56 -0
  8. data/MANUAL_tcltklib.eng +467 -0
  9. data/MANUAL_tcltklib.ja +578 -0
  10. data/README.1st +19 -0
  11. data/README.ActiveTcl +62 -0
  12. data/README.fork +34 -0
  13. data/README.macosx-aqua +67 -0
  14. data/README.md +33 -0
  15. data/README.tcltklib +152 -0
  16. data/Rakefile +16 -0
  17. data/bin/console +14 -0
  18. data/bin/setup +8 -0
  19. data/ext/tk/config_list.in +41 -0
  20. data/ext/tk/extconf.rb +2098 -0
  21. data/ext/tk/old-extconf.rb +441 -0
  22. data/ext/tk/stubs.c +592 -0
  23. data/ext/tk/stubs.h +33 -0
  24. data/ext/tk/tcltklib.c +11066 -0
  25. data/ext/tk/tkutil/extconf.rb +14 -0
  26. data/ext/tk/tkutil/tkutil.c +1900 -0
  27. data/lib/README +30 -0
  28. data/lib/multi-tk.rb +3743 -0
  29. data/lib/remote-tk.rb +527 -0
  30. data/lib/tcltk.rb +369 -0
  31. data/lib/tk.rb +5758 -0
  32. data/lib/tk/after.rb +7 -0
  33. data/lib/tk/autoload.rb +763 -0
  34. data/lib/tk/bgerror.rb +30 -0
  35. data/lib/tk/bindtag.rb +139 -0
  36. data/lib/tk/busy.rb +119 -0
  37. data/lib/tk/button.rb +32 -0
  38. data/lib/tk/canvas.rb +847 -0
  39. data/lib/tk/canvastag.rb +460 -0
  40. data/lib/tk/checkbutton.rb +33 -0
  41. data/lib/tk/clipboard.rb +76 -0
  42. data/lib/tk/clock.rb +72 -0
  43. data/lib/tk/composite.rb +485 -0
  44. data/lib/tk/console.rb +53 -0
  45. data/lib/tk/dialog.rb +327 -0
  46. data/lib/tk/encodedstr.rb +188 -0
  47. data/lib/tk/entry.rb +121 -0
  48. data/lib/tk/event.rb +563 -0
  49. data/lib/tk/font.rb +2352 -0
  50. data/lib/tk/fontchooser.rb +181 -0
  51. data/lib/tk/frame.rb +133 -0
  52. data/lib/tk/grid.rb +280 -0
  53. data/lib/tk/image.rb +396 -0
  54. data/lib/tk/itemconfig.rb +1222 -0
  55. data/lib/tk/itemfont.rb +328 -0
  56. data/lib/tk/kinput.rb +72 -0
  57. data/lib/tk/label.rb +23 -0
  58. data/lib/tk/labelframe.rb +32 -0
  59. data/lib/tk/listbox.rb +285 -0
  60. data/lib/tk/macpkg.rb +81 -0
  61. data/lib/tk/menu.rb +719 -0
  62. data/lib/tk/menubar.rb +138 -0
  63. data/lib/tk/menuspec.rb +457 -0
  64. data/lib/tk/message.rb +25 -0
  65. data/lib/tk/mngfocus.rb +34 -0
  66. data/lib/tk/msgcat.rb +300 -0
  67. data/lib/tk/namespace.rb +547 -0
  68. data/lib/tk/optiondb.rb +372 -0
  69. data/lib/tk/optionobj.rb +213 -0
  70. data/lib/tk/pack.rb +108 -0
  71. data/lib/tk/package.rb +144 -0
  72. data/lib/tk/palette.rb +56 -0
  73. data/lib/tk/panedwindow.rb +261 -0
  74. data/lib/tk/place.rb +129 -0
  75. data/lib/tk/radiobutton.rb +74 -0
  76. data/lib/tk/root.rb +96 -0
  77. data/lib/tk/scale.rb +113 -0
  78. data/lib/tk/scrollable.rb +83 -0
  79. data/lib/tk/scrollbar.rb +184 -0
  80. data/lib/tk/scrollbox.rb +40 -0
  81. data/lib/tk/selection.rb +87 -0
  82. data/lib/tk/spinbox.rb +145 -0
  83. data/lib/tk/tagfont.rb +44 -0
  84. data/lib/tk/text.rb +1605 -0
  85. data/lib/tk/textimage.rb +89 -0
  86. data/lib/tk/textmark.rb +205 -0
  87. data/lib/tk/texttag.rb +322 -0
  88. data/lib/tk/textwindow.rb +155 -0
  89. data/lib/tk/timer.rb +666 -0
  90. data/lib/tk/tk_mac.rb +159 -0
  91. data/lib/tk/toplevel.rb +265 -0
  92. data/lib/tk/ttk_selector.rb +99 -0
  93. data/lib/tk/txtwin_abst.rb +40 -0
  94. data/lib/tk/validation.rb +398 -0
  95. data/lib/tk/variable.rb +1797 -0
  96. data/lib/tk/virtevent.rb +140 -0
  97. data/lib/tk/winfo.rb +393 -0
  98. data/lib/tk/winpkg.rb +157 -0
  99. data/lib/tk/wm.rb +553 -0
  100. data/lib/tk/xim.rb +123 -0
  101. data/lib/tkafter.rb +5 -0
  102. data/lib/tkbgerror.rb +5 -0
  103. data/lib/tkcanvas.rb +5 -0
  104. data/lib/tkclass.rb +48 -0
  105. data/lib/tkconsole.rb +5 -0
  106. data/lib/tkdialog.rb +5 -0
  107. data/lib/tkentry.rb +5 -0
  108. data/lib/tkextlib/ICONS.rb +14 -0
  109. data/lib/tkextlib/ICONS/icons.rb +130 -0
  110. data/lib/tkextlib/ICONS/setup.rb +9 -0
  111. data/lib/tkextlib/SUPPORT_STATUS +193 -0
  112. data/lib/tkextlib/blt.rb +190 -0
  113. data/lib/tkextlib/blt/barchart.rb +80 -0
  114. data/lib/tkextlib/blt/bitmap.rb +113 -0
  115. data/lib/tkextlib/blt/busy.rb +84 -0
  116. data/lib/tkextlib/blt/component.rb +2219 -0
  117. data/lib/tkextlib/blt/container.rb +29 -0
  118. data/lib/tkextlib/blt/cutbuffer.rb +24 -0
  119. data/lib/tkextlib/blt/dragdrop.rb +270 -0
  120. data/lib/tkextlib/blt/eps.rb +33 -0
  121. data/lib/tkextlib/blt/graph.rb +68 -0
  122. data/lib/tkextlib/blt/htext.rb +113 -0
  123. data/lib/tkextlib/blt/setup.rb +9 -0
  124. data/lib/tkextlib/blt/spline.rb +24 -0
  125. data/lib/tkextlib/blt/stripchart.rb +75 -0
  126. data/lib/tkextlib/blt/table.rb +413 -0
  127. data/lib/tkextlib/blt/tabnotebook.rb +111 -0
  128. data/lib/tkextlib/blt/tabset.rb +505 -0
  129. data/lib/tkextlib/blt/ted.rb +69 -0
  130. data/lib/tkextlib/blt/tile.rb +26 -0
  131. data/lib/tkextlib/blt/tile/button.rb +17 -0
  132. data/lib/tkextlib/blt/tile/checkbutton.rb +18 -0
  133. data/lib/tkextlib/blt/tile/frame.rb +17 -0
  134. data/lib/tkextlib/blt/tile/label.rb +17 -0
  135. data/lib/tkextlib/blt/tile/radiobutton.rb +18 -0
  136. data/lib/tkextlib/blt/tile/scrollbar.rb +17 -0
  137. data/lib/tkextlib/blt/tile/toplevel.rb +17 -0
  138. data/lib/tkextlib/blt/tree.rb +1059 -0
  139. data/lib/tkextlib/blt/treeview.rb +1288 -0
  140. data/lib/tkextlib/blt/unix_dnd.rb +142 -0
  141. data/lib/tkextlib/blt/vector.rb +257 -0
  142. data/lib/tkextlib/blt/watch.rb +176 -0
  143. data/lib/tkextlib/blt/win_printer.rb +62 -0
  144. data/lib/tkextlib/blt/winop.rb +108 -0
  145. data/lib/tkextlib/bwidget.rb +154 -0
  146. data/lib/tkextlib/bwidget/arrowbutton.rb +22 -0
  147. data/lib/tkextlib/bwidget/bitmap.rb +22 -0
  148. data/lib/tkextlib/bwidget/button.rb +32 -0
  149. data/lib/tkextlib/bwidget/buttonbox.rb +91 -0
  150. data/lib/tkextlib/bwidget/combobox.rb +63 -0
  151. data/lib/tkextlib/bwidget/dialog.rb +195 -0
  152. data/lib/tkextlib/bwidget/dragsite.rb +32 -0
  153. data/lib/tkextlib/bwidget/dropsite.rb +40 -0
  154. data/lib/tkextlib/bwidget/dynamichelp.rb +64 -0
  155. data/lib/tkextlib/bwidget/entry.rb +44 -0
  156. data/lib/tkextlib/bwidget/label.rb +42 -0
  157. data/lib/tkextlib/bwidget/labelentry.rb +81 -0
  158. data/lib/tkextlib/bwidget/labelframe.rb +53 -0
  159. data/lib/tkextlib/bwidget/listbox.rb +362 -0
  160. data/lib/tkextlib/bwidget/mainframe.rb +133 -0
  161. data/lib/tkextlib/bwidget/messagedlg.rb +193 -0
  162. data/lib/tkextlib/bwidget/notebook.rb +167 -0
  163. data/lib/tkextlib/bwidget/pagesmanager.rb +74 -0
  164. data/lib/tkextlib/bwidget/panedwindow.rb +43 -0
  165. data/lib/tkextlib/bwidget/panelframe.rb +68 -0
  166. data/lib/tkextlib/bwidget/passwddlg.rb +45 -0
  167. data/lib/tkextlib/bwidget/progressbar.rb +21 -0
  168. data/lib/tkextlib/bwidget/progressdlg.rb +59 -0
  169. data/lib/tkextlib/bwidget/scrollableframe.rb +41 -0
  170. data/lib/tkextlib/bwidget/scrolledwindow.rb +49 -0
  171. data/lib/tkextlib/bwidget/scrollview.rb +26 -0
  172. data/lib/tkextlib/bwidget/selectcolor.rb +74 -0
  173. data/lib/tkextlib/bwidget/selectfont.rb +92 -0
  174. data/lib/tkextlib/bwidget/separator.rb +21 -0
  175. data/lib/tkextlib/bwidget/setup.rb +9 -0
  176. data/lib/tkextlib/bwidget/spinbox.rb +99 -0
  177. data/lib/tkextlib/bwidget/statusbar.rb +63 -0
  178. data/lib/tkextlib/bwidget/titleframe.rb +34 -0
  179. data/lib/tkextlib/bwidget/tree.rb +501 -0
  180. data/lib/tkextlib/bwidget/widget.rb +130 -0
  181. data/lib/tkextlib/itcl.rb +14 -0
  182. data/lib/tkextlib/itcl/incr_tcl.rb +179 -0
  183. data/lib/tkextlib/itcl/setup.rb +14 -0
  184. data/lib/tkextlib/itk.rb +14 -0
  185. data/lib/tkextlib/itk/incr_tk.rb +447 -0
  186. data/lib/tkextlib/itk/setup.rb +14 -0
  187. data/lib/tkextlib/iwidgets.rb +95 -0
  188. data/lib/tkextlib/iwidgets/buttonbox.rb +122 -0
  189. data/lib/tkextlib/iwidgets/calendar.rb +126 -0
  190. data/lib/tkextlib/iwidgets/canvasprintbox.rb +54 -0
  191. data/lib/tkextlib/iwidgets/canvasprintdialog.rb +39 -0
  192. data/lib/tkextlib/iwidgets/checkbox.rb +131 -0
  193. data/lib/tkextlib/iwidgets/combobox.rb +105 -0
  194. data/lib/tkextlib/iwidgets/dateentry.rb +21 -0
  195. data/lib/tkextlib/iwidgets/datefield.rb +59 -0
  196. data/lib/tkextlib/iwidgets/dialog.rb +21 -0
  197. data/lib/tkextlib/iwidgets/dialogshell.rb +122 -0
  198. data/lib/tkextlib/iwidgets/disjointlistbox.rb +51 -0
  199. data/lib/tkextlib/iwidgets/entryfield.rb +186 -0
  200. data/lib/tkextlib/iwidgets/extbutton.rb +41 -0
  201. data/lib/tkextlib/iwidgets/extfileselectionbox.rb +47 -0
  202. data/lib/tkextlib/iwidgets/extfileselectiondialog.rb +34 -0
  203. data/lib/tkextlib/iwidgets/feedback.rb +36 -0
  204. data/lib/tkextlib/iwidgets/fileselectionbox.rb +47 -0
  205. data/lib/tkextlib/iwidgets/fileselectiondialog.rb +34 -0
  206. data/lib/tkextlib/iwidgets/finddialog.rb +43 -0
  207. data/lib/tkextlib/iwidgets/hierarchy.rb +366 -0
  208. data/lib/tkextlib/iwidgets/hyperhelp.rb +51 -0
  209. data/lib/tkextlib/iwidgets/labeledframe.rb +40 -0
  210. data/lib/tkextlib/iwidgets/labeledwidget.rb +46 -0
  211. data/lib/tkextlib/iwidgets/mainwindow.rb +68 -0
  212. data/lib/tkextlib/iwidgets/menubar.rb +213 -0
  213. data/lib/tkextlib/iwidgets/messagebox.rb +94 -0
  214. data/lib/tkextlib/iwidgets/messagedialog.rb +21 -0
  215. data/lib/tkextlib/iwidgets/notebook.rb +176 -0
  216. data/lib/tkextlib/iwidgets/optionmenu.rb +93 -0
  217. data/lib/tkextlib/iwidgets/panedwindow.rb +135 -0
  218. data/lib/tkextlib/iwidgets/promptdialog.rb +132 -0
  219. data/lib/tkextlib/iwidgets/pushbutton.rb +36 -0
  220. data/lib/tkextlib/iwidgets/radiobox.rb +122 -0
  221. data/lib/tkextlib/iwidgets/scopedobject.rb +25 -0
  222. data/lib/tkextlib/iwidgets/scrolledcanvas.rb +354 -0
  223. data/lib/tkextlib/iwidgets/scrolledframe.rb +60 -0
  224. data/lib/tkextlib/iwidgets/scrolledhtml.rb +59 -0
  225. data/lib/tkextlib/iwidgets/scrolledlistbox.rb +208 -0
  226. data/lib/tkextlib/iwidgets/scrolledtext.rb +569 -0
  227. data/lib/tkextlib/iwidgets/scrolledwidget.rb +21 -0
  228. data/lib/tkextlib/iwidgets/selectionbox.rb +103 -0
  229. data/lib/tkextlib/iwidgets/selectiondialog.rb +93 -0
  230. data/lib/tkextlib/iwidgets/setup.rb +9 -0
  231. data/lib/tkextlib/iwidgets/shell.rb +39 -0
  232. data/lib/tkextlib/iwidgets/spindate.rb +49 -0
  233. data/lib/tkextlib/iwidgets/spinint.rb +31 -0
  234. data/lib/tkextlib/iwidgets/spinner.rb +170 -0
  235. data/lib/tkextlib/iwidgets/spintime.rb +49 -0
  236. data/lib/tkextlib/iwidgets/tabnotebook.rb +182 -0
  237. data/lib/tkextlib/iwidgets/tabset.rb +146 -0
  238. data/lib/tkextlib/iwidgets/timeentry.rb +26 -0
  239. data/lib/tkextlib/iwidgets/timefield.rb +59 -0
  240. data/lib/tkextlib/iwidgets/toolbar.rb +113 -0
  241. data/lib/tkextlib/iwidgets/watch.rb +57 -0
  242. data/lib/tkextlib/pkg_checker.rb +185 -0
  243. data/lib/tkextlib/setup.rb +9 -0
  244. data/lib/tkextlib/tcllib.rb +106 -0
  245. data/lib/tkextlib/tcllib/README +135 -0
  246. data/lib/tkextlib/tcllib/autoscroll.rb +159 -0
  247. data/lib/tkextlib/tcllib/calendar.rb +56 -0
  248. data/lib/tkextlib/tcllib/canvas_sqmap.rb +37 -0
  249. data/lib/tkextlib/tcllib/canvas_zoom.rb +22 -0
  250. data/lib/tkextlib/tcllib/chatwidget.rb +152 -0
  251. data/lib/tkextlib/tcllib/crosshair.rb +118 -0
  252. data/lib/tkextlib/tcllib/ctext.rb +161 -0
  253. data/lib/tkextlib/tcllib/cursor.rb +98 -0
  254. data/lib/tkextlib/tcllib/dateentry.rb +63 -0
  255. data/lib/tkextlib/tcllib/datefield.rb +58 -0
  256. data/lib/tkextlib/tcllib/diagrams.rb +225 -0
  257. data/lib/tkextlib/tcllib/dialog.rb +85 -0
  258. data/lib/tkextlib/tcllib/getstring.rb +135 -0
  259. data/lib/tkextlib/tcllib/history.rb +74 -0
  260. data/lib/tkextlib/tcllib/ico.rb +147 -0
  261. data/lib/tkextlib/tcllib/ip_entry.rb +76 -0
  262. data/lib/tkextlib/tcllib/khim.rb +69 -0
  263. data/lib/tkextlib/tcllib/menuentry.rb +48 -0
  264. data/lib/tkextlib/tcllib/ntext.rb +147 -0
  265. data/lib/tkextlib/tcllib/panelframe.rb +79 -0
  266. data/lib/tkextlib/tcllib/plotchart.rb +1405 -0
  267. data/lib/tkextlib/tcllib/ruler.rb +66 -0
  268. data/lib/tkextlib/tcllib/screenruler.rb +69 -0
  269. data/lib/tkextlib/tcllib/scrolledwindow.rb +58 -0
  270. data/lib/tkextlib/tcllib/scrollwin.rb +62 -0
  271. data/lib/tkextlib/tcllib/setup.rb +9 -0
  272. data/lib/tkextlib/tcllib/statusbar.rb +80 -0
  273. data/lib/tkextlib/tcllib/style.rb +62 -0
  274. data/lib/tkextlib/tcllib/superframe.rb +52 -0
  275. data/lib/tkextlib/tcllib/swaplist.rb +151 -0
  276. data/lib/tkextlib/tcllib/tablelist.rb +29 -0
  277. data/lib/tkextlib/tcllib/tablelist_core.rb +1073 -0
  278. data/lib/tkextlib/tcllib/tablelist_tile.rb +44 -0
  279. data/lib/tkextlib/tcllib/tkpiechart.rb +315 -0
  280. data/lib/tkextlib/tcllib/toolbar.rb +176 -0
  281. data/lib/tkextlib/tcllib/tooltip.rb +105 -0
  282. data/lib/tkextlib/tcllib/validator.rb +66 -0
  283. data/lib/tkextlib/tcllib/widget.rb +83 -0
  284. data/lib/tkextlib/tclx.rb +14 -0
  285. data/lib/tkextlib/tclx/setup.rb +9 -0
  286. data/lib/tkextlib/tclx/tclx.rb +75 -0
  287. data/lib/tkextlib/tile.rb +450 -0
  288. data/lib/tkextlib/tile/dialog.rb +103 -0
  289. data/lib/tkextlib/tile/setup.rb +9 -0
  290. data/lib/tkextlib/tile/sizegrip.rb +33 -0
  291. data/lib/tkextlib/tile/style.rb +337 -0
  292. data/lib/tkextlib/tile/tbutton.rb +35 -0
  293. data/lib/tkextlib/tile/tcheckbutton.rb +39 -0
  294. data/lib/tkextlib/tile/tcombobox.rb +56 -0
  295. data/lib/tkextlib/tile/tentry.rb +50 -0
  296. data/lib/tkextlib/tile/tframe.rb +35 -0
  297. data/lib/tkextlib/tile/tlabel.rb +35 -0
  298. data/lib/tkextlib/tile/tlabelframe.rb +39 -0
  299. data/lib/tkextlib/tile/tmenubutton.rb +39 -0
  300. data/lib/tkextlib/tile/tnotebook.rb +148 -0
  301. data/lib/tkextlib/tile/tpaned.rb +246 -0
  302. data/lib/tkextlib/tile/tprogressbar.rb +58 -0
  303. data/lib/tkextlib/tile/tradiobutton.rb +39 -0
  304. data/lib/tkextlib/tile/treeview.rb +1337 -0
  305. data/lib/tkextlib/tile/tscale.rb +57 -0
  306. data/lib/tkextlib/tile/tscrollbar.rb +64 -0
  307. data/lib/tkextlib/tile/tseparator.rb +35 -0
  308. data/lib/tkextlib/tile/tspinbox.rb +108 -0
  309. data/lib/tkextlib/tile/tsquare.rb +31 -0
  310. data/lib/tkextlib/tkDND.rb +19 -0
  311. data/lib/tkextlib/tkDND/setup.rb +9 -0
  312. data/lib/tkextlib/tkDND/shape.rb +126 -0
  313. data/lib/tkextlib/tkDND/tkdnd.rb +183 -0
  314. data/lib/tkextlib/tkHTML.rb +14 -0
  315. data/lib/tkextlib/tkHTML/htmlwidget.rb +454 -0
  316. data/lib/tkextlib/tkHTML/setup.rb +9 -0
  317. data/lib/tkextlib/tkimg.rb +37 -0
  318. data/lib/tkextlib/tkimg/README +26 -0
  319. data/lib/tkextlib/tkimg/bmp.rb +34 -0
  320. data/lib/tkextlib/tkimg/dted.rb +34 -0
  321. data/lib/tkextlib/tkimg/gif.rb +34 -0
  322. data/lib/tkextlib/tkimg/ico.rb +34 -0
  323. data/lib/tkextlib/tkimg/jpeg.rb +34 -0
  324. data/lib/tkextlib/tkimg/pcx.rb +34 -0
  325. data/lib/tkextlib/tkimg/pixmap.rb +45 -0
  326. data/lib/tkextlib/tkimg/png.rb +34 -0
  327. data/lib/tkextlib/tkimg/ppm.rb +34 -0
  328. data/lib/tkextlib/tkimg/ps.rb +34 -0
  329. data/lib/tkextlib/tkimg/raw.rb +34 -0
  330. data/lib/tkextlib/tkimg/setup.rb +9 -0
  331. data/lib/tkextlib/tkimg/sgi.rb +34 -0
  332. data/lib/tkextlib/tkimg/sun.rb +34 -0
  333. data/lib/tkextlib/tkimg/tga.rb +34 -0
  334. data/lib/tkextlib/tkimg/tiff.rb +34 -0
  335. data/lib/tkextlib/tkimg/window.rb +34 -0
  336. data/lib/tkextlib/tkimg/xbm.rb +34 -0
  337. data/lib/tkextlib/tkimg/xpm.rb +34 -0
  338. data/lib/tkextlib/tktable.rb +15 -0
  339. data/lib/tkextlib/tktable/setup.rb +9 -0
  340. data/lib/tkextlib/tktable/tktable.rb +967 -0
  341. data/lib/tkextlib/tktrans.rb +15 -0
  342. data/lib/tkextlib/tktrans/setup.rb +9 -0
  343. data/lib/tkextlib/tktrans/tktrans.rb +65 -0
  344. data/lib/tkextlib/treectrl.rb +14 -0
  345. data/lib/tkextlib/treectrl/setup.rb +9 -0
  346. data/lib/tkextlib/treectrl/tktreectrl.rb +2523 -0
  347. data/lib/tkextlib/trofs.rb +14 -0
  348. data/lib/tkextlib/trofs/setup.rb +9 -0
  349. data/lib/tkextlib/trofs/trofs.rb +52 -0
  350. data/lib/tkextlib/version.rb +7 -0
  351. data/lib/tkextlib/vu.rb +49 -0
  352. data/lib/tkextlib/vu/bargraph.rb +62 -0
  353. data/lib/tkextlib/vu/charts.rb +54 -0
  354. data/lib/tkextlib/vu/dial.rb +103 -0
  355. data/lib/tkextlib/vu/pie.rb +287 -0
  356. data/lib/tkextlib/vu/setup.rb +9 -0
  357. data/lib/tkextlib/vu/spinbox.rb +23 -0
  358. data/lib/tkextlib/winico.rb +15 -0
  359. data/lib/tkextlib/winico/setup.rb +9 -0
  360. data/lib/tkextlib/winico/winico.rb +225 -0
  361. data/lib/tkfont.rb +5 -0
  362. data/lib/tkmacpkg.rb +5 -0
  363. data/lib/tkmenubar.rb +5 -0
  364. data/lib/tkmngfocus.rb +5 -0
  365. data/lib/tkpalette.rb +5 -0
  366. data/lib/tkscrollbox.rb +5 -0
  367. data/lib/tktext.rb +5 -0
  368. data/lib/tkvirtevent.rb +5 -0
  369. data/lib/tkwinpkg.rb +5 -0
  370. data/old-README.tcltklib.ja +159 -0
  371. data/sample/24hr_clock.rb +287 -0
  372. data/sample/binding_sample.rb +88 -0
  373. data/sample/bindtag_sample.rb +128 -0
  374. data/sample/binstr_usage.rb +46 -0
  375. data/sample/btn_with_frame.rb +21 -0
  376. data/sample/cd_timer.rb +82 -0
  377. data/sample/cmd_res_test.rb +18 -0
  378. data/sample/cmd_resource +5 -0
  379. data/sample/demos-en/ChangeLog +64 -0
  380. data/sample/demos-en/ChangeLog.prev +9 -0
  381. data/sample/demos-en/README +138 -0
  382. data/sample/demos-en/README.1st +18 -0
  383. data/sample/demos-en/README.tkencoding +29 -0
  384. data/sample/demos-en/anilabel.rb +175 -0
  385. data/sample/demos-en/aniwave.rb +119 -0
  386. data/sample/demos-en/arrow.rb +250 -0
  387. data/sample/demos-en/bind.rb +128 -0
  388. data/sample/demos-en/bitmap.rb +76 -0
  389. data/sample/demos-en/browse1 +63 -0
  390. data/sample/demos-en/browse2 +82 -0
  391. data/sample/demos-en/button.rb +85 -0
  392. data/sample/demos-en/check.rb +73 -0
  393. data/sample/demos-en/check2.rb +110 -0
  394. data/sample/demos-en/clrpick.rb +88 -0
  395. data/sample/demos-en/colors.rb +159 -0
  396. data/sample/demos-en/combo.rb +97 -0
  397. data/sample/demos-en/cscroll.rb +137 -0
  398. data/sample/demos-en/ctext.rb +208 -0
  399. data/sample/demos-en/dialog1.rb +39 -0
  400. data/sample/demos-en/dialog2.rb +42 -0
  401. data/sample/demos-en/doc.org/README +7 -0
  402. data/sample/demos-en/doc.org/README.JP +14 -0
  403. data/sample/demos-en/doc.org/README.tk80 +46 -0
  404. data/sample/demos-en/doc.org/license.terms +39 -0
  405. data/sample/demos-en/doc.org/license.terms.tk80 +39 -0
  406. data/sample/demos-en/entry1.rb +59 -0
  407. data/sample/demos-en/entry2.rb +94 -0
  408. data/sample/demos-en/entry3.rb +221 -0
  409. data/sample/demos-en/filebox.rb +103 -0
  410. data/sample/demos-en/floor.rb +1724 -0
  411. data/sample/demos-en/floor2.rb +1723 -0
  412. data/sample/demos-en/form.rb +65 -0
  413. data/sample/demos-en/goldberg.rb +2007 -0
  414. data/sample/demos-en/hello +14 -0
  415. data/sample/demos-en/hscale.rb +76 -0
  416. data/sample/demos-en/icon.rb +106 -0
  417. data/sample/demos-en/image1.rb +66 -0
  418. data/sample/demos-en/image2.rb +108 -0
  419. data/sample/demos-en/image3.rb +126 -0
  420. data/sample/demos-en/items.rb +382 -0
  421. data/sample/demos-en/ixset +333 -0
  422. data/sample/demos-en/ixset2 +367 -0
  423. data/sample/demos-en/knightstour.rb +272 -0
  424. data/sample/demos-en/label.rb +73 -0
  425. data/sample/demos-en/labelframe.rb +96 -0
  426. data/sample/demos-en/mclist.rb +118 -0
  427. data/sample/demos-en/menu.rb +197 -0
  428. data/sample/demos-en/menu84.rb +216 -0
  429. data/sample/demos-en/menubu.rb +238 -0
  430. data/sample/demos-en/msgbox.rb +91 -0
  431. data/sample/demos-en/msgbox2.rb +92 -0
  432. data/sample/demos-en/paned1.rb +48 -0
  433. data/sample/demos-en/paned2.rb +95 -0
  434. data/sample/demos-en/pendulum.rb +241 -0
  435. data/sample/demos-en/plot.rb +125 -0
  436. data/sample/demos-en/puzzle.rb +135 -0
  437. data/sample/demos-en/radio.rb +87 -0
  438. data/sample/demos-en/radio2.rb +110 -0
  439. data/sample/demos-en/radio3.rb +118 -0
  440. data/sample/demos-en/rmt +268 -0
  441. data/sample/demos-en/rolodex +320 -0
  442. data/sample/demos-en/ruler.rb +206 -0
  443. data/sample/demos-en/sayings.rb +107 -0
  444. data/sample/demos-en/search.rb +188 -0
  445. data/sample/demos-en/spin.rb +66 -0
  446. data/sample/demos-en/square +81 -0
  447. data/sample/demos-en/states.rb +81 -0
  448. data/sample/demos-en/style.rb +232 -0
  449. data/sample/demos-en/tcolor +526 -0
  450. data/sample/demos-en/text.rb +129 -0
  451. data/sample/demos-en/textpeer.rb +77 -0
  452. data/sample/demos-en/timer +136 -0
  453. data/sample/demos-en/tkencoding.rb +43 -0
  454. data/sample/demos-en/toolbar.rb +131 -0
  455. data/sample/demos-en/tree.rb +120 -0
  456. data/sample/demos-en/ttkbut.rb +140 -0
  457. data/sample/demos-en/ttkmenu.rb +86 -0
  458. data/sample/demos-en/ttknote.rb +90 -0
  459. data/sample/demos-en/ttkpane.rb +214 -0
  460. data/sample/demos-en/ttkprogress.rb +67 -0
  461. data/sample/demos-en/twind.rb +292 -0
  462. data/sample/demos-en/twind2.rb +385 -0
  463. data/sample/demos-en/unicodeout.rb +115 -0
  464. data/sample/demos-en/vscale.rb +80 -0
  465. data/sample/demos-en/widget +1087 -0
  466. data/sample/demos-jp/README +54 -0
  467. data/sample/demos-jp/README.1st +20 -0
  468. data/sample/demos-jp/anilabel.rb +178 -0
  469. data/sample/demos-jp/aniwave.rb +121 -0
  470. data/sample/demos-jp/arrow.rb +248 -0
  471. data/sample/demos-jp/bind.rb +126 -0
  472. data/sample/demos-jp/bitmap.rb +75 -0
  473. data/sample/demos-jp/browse1 +63 -0
  474. data/sample/demos-jp/browse2 +82 -0
  475. data/sample/demos-jp/button.rb +84 -0
  476. data/sample/demos-jp/check.rb +71 -0
  477. data/sample/demos-jp/check2.rb +111 -0
  478. data/sample/demos-jp/clrpick.rb +85 -0
  479. data/sample/demos-jp/colors.rb +156 -0
  480. data/sample/demos-jp/combo.rb +99 -0
  481. data/sample/demos-jp/cscroll.rb +135 -0
  482. data/sample/demos-jp/ctext.rb +205 -0
  483. data/sample/demos-jp/dialog1.rb +40 -0
  484. data/sample/demos-jp/dialog2.rb +44 -0
  485. data/sample/demos-jp/doc.org/README +7 -0
  486. data/sample/demos-jp/doc.org/README.JP +14 -0
  487. data/sample/demos-jp/doc.org/README.tk80 +46 -0
  488. data/sample/demos-jp/doc.org/license.terms +39 -0
  489. data/sample/demos-jp/doc.org/license.terms.tk80 +39 -0
  490. data/sample/demos-jp/entry1.rb +61 -0
  491. data/sample/demos-jp/entry2.rb +92 -0
  492. data/sample/demos-jp/entry3.rb +226 -0
  493. data/sample/demos-jp/filebox.rb +103 -0
  494. data/sample/demos-jp/floor.rb +1722 -0
  495. data/sample/demos-jp/floor2.rb +1720 -0
  496. data/sample/demos-jp/form.rb +67 -0
  497. data/sample/demos-jp/goldberg.rb +2012 -0
  498. data/sample/demos-jp/hello +10 -0
  499. data/sample/demos-jp/hscale.rb +79 -0
  500. data/sample/demos-jp/icon.rb +104 -0
  501. data/sample/demos-jp/image1.rb +65 -0
  502. data/sample/demos-jp/image2.rb +107 -0
  503. data/sample/demos-jp/image3.rb +128 -0
  504. data/sample/demos-jp/items.rb +380 -0
  505. data/sample/demos-jp/ixset +333 -0
  506. data/sample/demos-jp/ixset2 +369 -0
  507. data/sample/demos-jp/knightstour.rb +274 -0
  508. data/sample/demos-jp/label.rb +70 -0
  509. data/sample/demos-jp/labelframe.rb +103 -0
  510. data/sample/demos-jp/mclist.rb +122 -0
  511. data/sample/demos-jp/menu.rb +202 -0
  512. data/sample/demos-jp/menu84.rb +214 -0
  513. data/sample/demos-jp/menu8x.rb +234 -0
  514. data/sample/demos-jp/menubu.rb +239 -0
  515. data/sample/demos-jp/msgbox.rb +90 -0
  516. data/sample/demos-jp/msgbox2.rb +91 -0
  517. data/sample/demos-jp/paned1.rb +53 -0
  518. data/sample/demos-jp/paned2.rb +101 -0
  519. data/sample/demos-jp/pendulum.rb +243 -0
  520. data/sample/demos-jp/plot.rb +127 -0
  521. data/sample/demos-jp/puzzle.rb +132 -0
  522. data/sample/demos-jp/radio.rb +85 -0
  523. data/sample/demos-jp/radio2.rb +113 -0
  524. data/sample/demos-jp/radio3.rb +120 -0
  525. data/sample/demos-jp/rmt +268 -0
  526. data/sample/demos-jp/rolodex +320 -0
  527. data/sample/demos-jp/rolodex-j +300 -0
  528. data/sample/demos-jp/ruler.rb +204 -0
  529. data/sample/demos-jp/sayings.rb +104 -0
  530. data/sample/demos-jp/search.rb +185 -0
  531. data/sample/demos-jp/spin.rb +72 -0
  532. data/sample/demos-jp/square +81 -0
  533. data/sample/demos-jp/states.rb +75 -0
  534. data/sample/demos-jp/style.rb +271 -0
  535. data/sample/demos-jp/tcolor +534 -0
  536. data/sample/demos-jp/text.rb +121 -0
  537. data/sample/demos-jp/textpeer.rb +83 -0
  538. data/sample/demos-jp/timer +136 -0
  539. data/sample/demos-jp/toolbar.rb +137 -0
  540. data/sample/demos-jp/tree.rb +121 -0
  541. data/sample/demos-jp/ttkbut.rb +146 -0
  542. data/sample/demos-jp/ttkmenu.rb +92 -0
  543. data/sample/demos-jp/ttknote.rb +98 -0
  544. data/sample/demos-jp/ttkpane.rb +217 -0
  545. data/sample/demos-jp/ttkprogress.rb +72 -0
  546. data/sample/demos-jp/twind.rb +293 -0
  547. data/sample/demos-jp/twind2.rb +385 -0
  548. data/sample/demos-jp/unicodeout.rb +120 -0
  549. data/sample/demos-jp/vscale.rb +81 -0
  550. data/sample/demos-jp/widget +1122 -0
  551. data/sample/editable_listbox.rb +149 -0
  552. data/sample/encstr_usage.rb +31 -0
  553. data/sample/figmemo_sample.rb +457 -0
  554. data/sample/images/earth.gif +0 -0
  555. data/sample/images/earthris.gif +0 -0
  556. data/sample/images/face.xbm +173 -0
  557. data/sample/images/flagdown.xbm +27 -0
  558. data/sample/images/flagup.xbm +27 -0
  559. data/sample/images/gray25.xbm +6 -0
  560. data/sample/images/grey.25 +6 -0
  561. data/sample/images/grey.5 +6 -0
  562. data/sample/images/letters.xbm +27 -0
  563. data/sample/images/noletter.xbm +27 -0
  564. data/sample/images/pattern.xbm +6 -0
  565. data/sample/images/tcllogo.gif +0 -0
  566. data/sample/images/teapot.ppm +31 -0
  567. data/sample/irbtk.rb +31 -0
  568. data/sample/irbtkw.rbw +156 -0
  569. data/sample/iso2022-kr.txt +2 -0
  570. data/sample/menubar1.rb +52 -0
  571. data/sample/menubar2.rb +57 -0
  572. data/sample/menubar3.rb +73 -0
  573. data/sample/msgs_rb/README +3 -0
  574. data/sample/msgs_rb/cs.msg +84 -0
  575. data/sample/msgs_rb/de.msg +88 -0
  576. data/sample/msgs_rb/el.msg +98 -0
  577. data/sample/msgs_rb/en.msg +83 -0
  578. data/sample/msgs_rb/en_gb.msg +7 -0
  579. data/sample/msgs_rb/eo.msg +87 -0
  580. data/sample/msgs_rb/es.msg +84 -0
  581. data/sample/msgs_rb/fr.msg +84 -0
  582. data/sample/msgs_rb/it.msg +84 -0
  583. data/sample/msgs_rb/ja.msg +13 -0
  584. data/sample/msgs_rb/nl.msg +123 -0
  585. data/sample/msgs_rb/pl.msg +87 -0
  586. data/sample/msgs_rb/ru.msg +87 -0
  587. data/sample/msgs_rb2/README +5 -0
  588. data/sample/msgs_rb2/de.msg +88 -0
  589. data/sample/msgs_rb2/ja.msg +85 -0
  590. data/sample/msgs_tk/README +4 -0
  591. data/sample/msgs_tk/cs.msg +84 -0
  592. data/sample/msgs_tk/de.msg +88 -0
  593. data/sample/msgs_tk/el.msg +103 -0
  594. data/sample/msgs_tk/en.msg +83 -0
  595. data/sample/msgs_tk/en_gb.msg +7 -0
  596. data/sample/msgs_tk/eo.msg +87 -0
  597. data/sample/msgs_tk/es.msg +84 -0
  598. data/sample/msgs_tk/fr.msg +84 -0
  599. data/sample/msgs_tk/it.msg +84 -0
  600. data/sample/msgs_tk/ja.msg +13 -0
  601. data/sample/msgs_tk/license.terms +39 -0
  602. data/sample/msgs_tk/nl.msg +123 -0
  603. data/sample/msgs_tk/pl.msg +87 -0
  604. data/sample/msgs_tk/ru.msg +87 -0
  605. data/sample/multi-ip_sample.rb +104 -0
  606. data/sample/multi-ip_sample2.rb +30 -0
  607. data/sample/optobj_sample.rb +68 -0
  608. data/sample/propagate.rb +31 -0
  609. data/sample/remote-ip_sample.rb +34 -0
  610. data/sample/remote-ip_sample2.rb +57 -0
  611. data/sample/resource.en +13 -0
  612. data/sample/resource.ja +13 -0
  613. data/sample/safe-tk.rb +132 -0
  614. data/sample/scrollframe.rb +250 -0
  615. data/sample/tcltklib/batsu.gif +0 -0
  616. data/sample/tcltklib/lines0.tcl +42 -0
  617. data/sample/tcltklib/lines1.rb +51 -0
  618. data/sample/tcltklib/lines2.rb +55 -0
  619. data/sample/tcltklib/lines3.rb +55 -0
  620. data/sample/tcltklib/lines4.rb +55 -0
  621. data/sample/tcltklib/maru.gif +0 -0
  622. data/sample/tcltklib/safeTk.rb +23 -0
  623. data/sample/tcltklib/sample0.rb +40 -0
  624. data/sample/tcltklib/sample1.rb +635 -0
  625. data/sample/tcltklib/sample2.rb +452 -0
  626. data/sample/tkalignbox.rb +236 -0
  627. data/sample/tkballoonhelp.rb +221 -0
  628. data/sample/tkbiff.rb +156 -0
  629. data/sample/tkbrowse.rb +80 -0
  630. data/sample/tkcombobox.rb +498 -0
  631. data/sample/tkdialog.rb +62 -0
  632. data/sample/tkextlib/ICONS/Orig_LICENSE.txt +61 -0
  633. data/sample/tkextlib/ICONS/tkIcons +195 -0
  634. data/sample/tkextlib/ICONS/tkIcons-sample.kde +658 -0
  635. data/sample/tkextlib/ICONS/tkIcons.kde +195 -0
  636. data/sample/tkextlib/ICONS/viewIcons.rb +330 -0
  637. data/sample/tkextlib/blt/barchart5.rb +102 -0
  638. data/sample/tkextlib/blt/calendar.rb +118 -0
  639. data/sample/tkextlib/blt/graph6.rb +2223 -0
  640. data/sample/tkextlib/blt/graph7.rb +41 -0
  641. data/sample/tkextlib/blt/graph7a.rb +64 -0
  642. data/sample/tkextlib/blt/graph7b.rb +42 -0
  643. data/sample/tkextlib/blt/graph7c.rb +46 -0
  644. data/sample/tkextlib/blt/images/buckskin.gif +0 -0
  645. data/sample/tkextlib/blt/images/chalk.gif +0 -0
  646. data/sample/tkextlib/blt/images/qv100.t.gif +0 -0
  647. data/sample/tkextlib/blt/images/rain.gif +0 -0
  648. data/sample/tkextlib/blt/images/sample.gif +0 -0
  649. data/sample/tkextlib/blt/pareto.rb +91 -0
  650. data/sample/tkextlib/blt/plot1.rb +10 -0
  651. data/sample/tkextlib/blt/plot1b.rb +11 -0
  652. data/sample/tkextlib/blt/readme.txt +2 -0
  653. data/sample/tkextlib/blt/scripts/stipples.rb +157 -0
  654. data/sample/tkextlib/blt/winop1.rb +41 -0
  655. data/sample/tkextlib/blt/winop2.rb +29 -0
  656. data/sample/tkextlib/bwidget/Orig_LICENSE.txt +53 -0
  657. data/sample/tkextlib/bwidget/basic.rb +199 -0
  658. data/sample/tkextlib/bwidget/bwidget.xbm +46 -0
  659. data/sample/tkextlib/bwidget/demo.rb +244 -0
  660. data/sample/tkextlib/bwidget/dnd.rb +47 -0
  661. data/sample/tkextlib/bwidget/manager.rb +151 -0
  662. data/sample/tkextlib/bwidget/select.rb +83 -0
  663. data/sample/tkextlib/bwidget/tmpldlg.rb +222 -0
  664. data/sample/tkextlib/bwidget/tree.rb +290 -0
  665. data/sample/tkextlib/bwidget/x1.xbm +2258 -0
  666. data/sample/tkextlib/iwidgets/catalog_demo/Orig_LICENSE.txt +42 -0
  667. data/sample/tkextlib/iwidgets/catalog_demo/images/box.xbm +14 -0
  668. data/sample/tkextlib/iwidgets/catalog_demo/images/clear.gif +0 -0
  669. data/sample/tkextlib/iwidgets/catalog_demo/images/close.gif +0 -0
  670. data/sample/tkextlib/iwidgets/catalog_demo/images/copy.gif +0 -0
  671. data/sample/tkextlib/iwidgets/catalog_demo/images/cut.gif +0 -0
  672. data/sample/tkextlib/iwidgets/catalog_demo/images/exit.gif +0 -0
  673. data/sample/tkextlib/iwidgets/catalog_demo/images/find.gif +0 -0
  674. data/sample/tkextlib/iwidgets/catalog_demo/images/help.gif +0 -0
  675. data/sample/tkextlib/iwidgets/catalog_demo/images/line.xbm +14 -0
  676. data/sample/tkextlib/iwidgets/catalog_demo/images/mag.gif +0 -0
  677. data/sample/tkextlib/iwidgets/catalog_demo/images/new.gif +0 -0
  678. data/sample/tkextlib/iwidgets/catalog_demo/images/open.gif +0 -0
  679. data/sample/tkextlib/iwidgets/catalog_demo/images/oval.xbm +14 -0
  680. data/sample/tkextlib/iwidgets/catalog_demo/images/paste.gif +0 -0
  681. data/sample/tkextlib/iwidgets/catalog_demo/images/points.xbm +14 -0
  682. data/sample/tkextlib/iwidgets/catalog_demo/images/poly.gif +0 -0
  683. data/sample/tkextlib/iwidgets/catalog_demo/images/print.gif +0 -0
  684. data/sample/tkextlib/iwidgets/catalog_demo/images/ruler.gif +0 -0
  685. data/sample/tkextlib/iwidgets/catalog_demo/images/save.gif +0 -0
  686. data/sample/tkextlib/iwidgets/catalog_demo/images/select.gif +0 -0
  687. data/sample/tkextlib/iwidgets/catalog_demo/images/text.xbm +14 -0
  688. data/sample/tkextlib/iwidgets/sample/buttonbox.rb +23 -0
  689. data/sample/tkextlib/iwidgets/sample/calendar.rb +11 -0
  690. data/sample/tkextlib/iwidgets/sample/canvasprintbox.rb +9 -0
  691. data/sample/tkextlib/iwidgets/sample/canvasprintdialog.rb +9 -0
  692. data/sample/tkextlib/iwidgets/sample/checkbox.rb +13 -0
  693. data/sample/tkextlib/iwidgets/sample/combobox.rb +33 -0
  694. data/sample/tkextlib/iwidgets/sample/dateentry.rb +8 -0
  695. data/sample/tkextlib/iwidgets/sample/datefield.rb +9 -0
  696. data/sample/tkextlib/iwidgets/sample/dialog.rb +21 -0
  697. data/sample/tkextlib/iwidgets/sample/dialogshell.rb +15 -0
  698. data/sample/tkextlib/iwidgets/sample/disjointlistbox.rb +17 -0
  699. data/sample/tkextlib/iwidgets/sample/entryfield-1.rb +40 -0
  700. data/sample/tkextlib/iwidgets/sample/entryfield-2.rb +45 -0
  701. data/sample/tkextlib/iwidgets/sample/entryfield-3.rb +41 -0
  702. data/sample/tkextlib/iwidgets/sample/extbutton.rb +21 -0
  703. data/sample/tkextlib/iwidgets/sample/extfileselectionbox.rb +9 -0
  704. data/sample/tkextlib/iwidgets/sample/extfileselectiondialog.rb +30 -0
  705. data/sample/tkextlib/iwidgets/sample/feedback.rb +11 -0
  706. data/sample/tkextlib/iwidgets/sample/fileselectionbox.rb +9 -0
  707. data/sample/tkextlib/iwidgets/sample/fileselectiondialog.rb +29 -0
  708. data/sample/tkextlib/iwidgets/sample/finddialog.rb +16 -0
  709. data/sample/tkextlib/iwidgets/sample/hierarchy.rb +26 -0
  710. data/sample/tkextlib/iwidgets/sample/hyperhelp.rb +15 -0
  711. data/sample/tkextlib/iwidgets/sample/labeledframe.rb +15 -0
  712. data/sample/tkextlib/iwidgets/sample/labeledwidget.rb +14 -0
  713. data/sample/tkextlib/iwidgets/sample/mainwindow.rb +65 -0
  714. data/sample/tkextlib/iwidgets/sample/menubar.rb +125 -0
  715. data/sample/tkextlib/iwidgets/sample/menubar2.rb +45 -0
  716. data/sample/tkextlib/iwidgets/sample/messagebox1.rb +20 -0
  717. data/sample/tkextlib/iwidgets/sample/messagebox2.rb +20 -0
  718. data/sample/tkextlib/iwidgets/sample/messagedialog.rb +45 -0
  719. data/sample/tkextlib/iwidgets/sample/notebook.rb +31 -0
  720. data/sample/tkextlib/iwidgets/sample/notebook2.rb +31 -0
  721. data/sample/tkextlib/iwidgets/sample/optionmenu.rb +15 -0
  722. data/sample/tkextlib/iwidgets/sample/panedwindow.rb +23 -0
  723. data/sample/tkextlib/iwidgets/sample/panedwindow2.rb +23 -0
  724. data/sample/tkextlib/iwidgets/sample/promptdialog.rb +18 -0
  725. data/sample/tkextlib/iwidgets/sample/pushbutton.rb +10 -0
  726. data/sample/tkextlib/iwidgets/sample/radiobox.rb +14 -0
  727. data/sample/tkextlib/iwidgets/sample/scrolledcanvas.rb +14 -0
  728. data/sample/tkextlib/iwidgets/sample/scrolledframe.rb +19 -0
  729. data/sample/tkextlib/iwidgets/sample/scrolledhtml.rb +16 -0
  730. data/sample/tkextlib/iwidgets/sample/scrolledlistbox.rb +23 -0
  731. data/sample/tkextlib/iwidgets/sample/scrolledtext.rb +12 -0
  732. data/sample/tkextlib/iwidgets/sample/selectionbox.rb +20 -0
  733. data/sample/tkextlib/iwidgets/sample/selectiondialog.rb +13 -0
  734. data/sample/tkextlib/iwidgets/sample/shell.rb +18 -0
  735. data/sample/tkextlib/iwidgets/sample/spindate.rb +8 -0
  736. data/sample/tkextlib/iwidgets/sample/spinint.rb +11 -0
  737. data/sample/tkextlib/iwidgets/sample/spinner.rb +34 -0
  738. data/sample/tkextlib/iwidgets/sample/spintime.rb +8 -0
  739. data/sample/tkextlib/iwidgets/sample/tabnotebook.rb +27 -0
  740. data/sample/tkextlib/iwidgets/sample/tabnotebook2.rb +31 -0
  741. data/sample/tkextlib/iwidgets/sample/tabset.rb +35 -0
  742. data/sample/tkextlib/iwidgets/sample/timeentry.rb +8 -0
  743. data/sample/tkextlib/iwidgets/sample/timefield.rb +9 -0
  744. data/sample/tkextlib/iwidgets/sample/toolbar.rb +153 -0
  745. data/sample/tkextlib/iwidgets/sample/watch.rb +19 -0
  746. data/sample/tkextlib/tcllib/Orig_LICENSE.txt +46 -0
  747. data/sample/tkextlib/tcllib/datefield.rb +30 -0
  748. data/sample/tkextlib/tcllib/plotdemos1.rb +159 -0
  749. data/sample/tkextlib/tcllib/plotdemos2.rb +72 -0
  750. data/sample/tkextlib/tcllib/plotdemos3.rb +84 -0
  751. data/sample/tkextlib/tcllib/xyplot.rb +18 -0
  752. data/sample/tkextlib/tile/Orig_LICENSE.txt +30 -0
  753. data/sample/tkextlib/tile/demo.rb +984 -0
  754. data/sample/tkextlib/tile/iconlib.tcl +110 -0
  755. data/sample/tkextlib/tile/readme.txt +2 -0
  756. data/sample/tkextlib/tile/repeater.tcl +117 -0
  757. data/sample/tkextlib/tile/themes/blue/blue.tcl +149 -0
  758. data/sample/tkextlib/tile/themes/blue/blue/arrowdown-h.gif +0 -0
  759. data/sample/tkextlib/tile/themes/blue/blue/arrowdown-p.gif +0 -0
  760. data/sample/tkextlib/tile/themes/blue/blue/arrowdown.gif +0 -0
  761. data/sample/tkextlib/tile/themes/blue/blue/arrowleft-h.gif +0 -0
  762. data/sample/tkextlib/tile/themes/blue/blue/arrowleft-p.gif +0 -0
  763. data/sample/tkextlib/tile/themes/blue/blue/arrowleft.gif +0 -0
  764. data/sample/tkextlib/tile/themes/blue/blue/arrowright-h.gif +0 -0
  765. data/sample/tkextlib/tile/themes/blue/blue/arrowright-p.gif +0 -0
  766. data/sample/tkextlib/tile/themes/blue/blue/arrowright.gif +0 -0
  767. data/sample/tkextlib/tile/themes/blue/blue/arrowup-h.gif +0 -0
  768. data/sample/tkextlib/tile/themes/blue/blue/arrowup-p.gif +0 -0
  769. data/sample/tkextlib/tile/themes/blue/blue/arrowup.gif +0 -0
  770. data/sample/tkextlib/tile/themes/blue/blue/button-h.gif +0 -0
  771. data/sample/tkextlib/tile/themes/blue/blue/button-n.gif +0 -0
  772. data/sample/tkextlib/tile/themes/blue/blue/button-n.xcf +0 -0
  773. data/sample/tkextlib/tile/themes/blue/blue/button-p.gif +0 -0
  774. data/sample/tkextlib/tile/themes/blue/blue/check-hc.gif +0 -0
  775. data/sample/tkextlib/tile/themes/blue/blue/check-hu.gif +0 -0
  776. data/sample/tkextlib/tile/themes/blue/blue/check-nc.gif +0 -0
  777. data/sample/tkextlib/tile/themes/blue/blue/check-nu.gif +0 -0
  778. data/sample/tkextlib/tile/themes/blue/blue/radio-hc.gif +0 -0
  779. data/sample/tkextlib/tile/themes/blue/blue/radio-hu.gif +0 -0
  780. data/sample/tkextlib/tile/themes/blue/blue/radio-nc.gif +0 -0
  781. data/sample/tkextlib/tile/themes/blue/blue/radio-nu.gif +0 -0
  782. data/sample/tkextlib/tile/themes/blue/blue/sb-thumb-p.gif +0 -0
  783. data/sample/tkextlib/tile/themes/blue/blue/sb-thumb.gif +0 -0
  784. data/sample/tkextlib/tile/themes/blue/blue/sb-vthumb-p.gif +0 -0
  785. data/sample/tkextlib/tile/themes/blue/blue/sb-vthumb.gif +0 -0
  786. data/sample/tkextlib/tile/themes/blue/blue/slider-p.gif +0 -0
  787. data/sample/tkextlib/tile/themes/blue/blue/slider.gif +0 -0
  788. data/sample/tkextlib/tile/themes/blue/blue/vslider-p.gif +0 -0
  789. data/sample/tkextlib/tile/themes/blue/blue/vslider.gif +0 -0
  790. data/sample/tkextlib/tile/themes/blue/pkgIndex.tcl +6 -0
  791. data/sample/tkextlib/tile/themes/keramik/keramik.tcl +194 -0
  792. data/sample/tkextlib/tile/themes/keramik/keramik/arrowdown-n.gif +0 -0
  793. data/sample/tkextlib/tile/themes/keramik/keramik/arrowdown-p.gif +0 -0
  794. data/sample/tkextlib/tile/themes/keramik/keramik/arrowleft-n.gif +0 -0
  795. data/sample/tkextlib/tile/themes/keramik/keramik/arrowleft-p.gif +0 -0
  796. data/sample/tkextlib/tile/themes/keramik/keramik/arrowright-n.gif +0 -0
  797. data/sample/tkextlib/tile/themes/keramik/keramik/arrowright-p.gif +0 -0
  798. data/sample/tkextlib/tile/themes/keramik/keramik/arrowup-n.gif +0 -0
  799. data/sample/tkextlib/tile/themes/keramik/keramik/arrowup-p.gif +0 -0
  800. data/sample/tkextlib/tile/themes/keramik/keramik/button-d.gif +0 -0
  801. data/sample/tkextlib/tile/themes/keramik/keramik/button-h.gif +0 -0
  802. data/sample/tkextlib/tile/themes/keramik/keramik/button-n.gif +0 -0
  803. data/sample/tkextlib/tile/themes/keramik/keramik/button-p.gif +0 -0
  804. data/sample/tkextlib/tile/themes/keramik/keramik/button-s.gif +0 -0
  805. data/sample/tkextlib/tile/themes/keramik/keramik/check-c.gif +0 -0
  806. data/sample/tkextlib/tile/themes/keramik/keramik/check-u.gif +0 -0
  807. data/sample/tkextlib/tile/themes/keramik/keramik/hsb-n.gif +0 -0
  808. data/sample/tkextlib/tile/themes/keramik/keramik/hsb-p.gif +0 -0
  809. data/sample/tkextlib/tile/themes/keramik/keramik/hslider-n.gif +0 -0
  810. data/sample/tkextlib/tile/themes/keramik/keramik/mbut-a.gif +0 -0
  811. data/sample/tkextlib/tile/themes/keramik/keramik/mbut-arrow-n.gif +0 -0
  812. data/sample/tkextlib/tile/themes/keramik/keramik/mbut-d.gif +0 -0
  813. data/sample/tkextlib/tile/themes/keramik/keramik/mbut-n.gif +0 -0
  814. data/sample/tkextlib/tile/themes/keramik/keramik/radio-c.gif +0 -0
  815. data/sample/tkextlib/tile/themes/keramik/keramik/radio-u.gif +0 -0
  816. data/sample/tkextlib/tile/themes/keramik/keramik/tab-n.gif +0 -0
  817. data/sample/tkextlib/tile/themes/keramik/keramik/tab-p.gif +0 -0
  818. data/sample/tkextlib/tile/themes/keramik/keramik/tbar-a.gif +0 -0
  819. data/sample/tkextlib/tile/themes/keramik/keramik/tbar-n.gif +0 -0
  820. data/sample/tkextlib/tile/themes/keramik/keramik/tbar-p.gif +0 -0
  821. data/sample/tkextlib/tile/themes/keramik/keramik/vsb-n.gif +0 -0
  822. data/sample/tkextlib/tile/themes/keramik/keramik/vsb-p.gif +0 -0
  823. data/sample/tkextlib/tile/themes/keramik/keramik/vslider-n.gif +0 -0
  824. data/sample/tkextlib/tile/themes/keramik/pkgIndex.tcl +15 -0
  825. data/sample/tkextlib/tile/themes/kroc.rb +227 -0
  826. data/sample/tkextlib/tile/themes/kroc/kroc.tcl +163 -0
  827. data/sample/tkextlib/tile/themes/kroc/kroc/button-h.gif +0 -0
  828. data/sample/tkextlib/tile/themes/kroc/kroc/button-n.gif +0 -0
  829. data/sample/tkextlib/tile/themes/kroc/kroc/button-p.gif +0 -0
  830. data/sample/tkextlib/tile/themes/kroc/kroc/check-hc.gif +0 -0
  831. data/sample/tkextlib/tile/themes/kroc/kroc/check-hu.gif +0 -0
  832. data/sample/tkextlib/tile/themes/kroc/kroc/check-nc.gif +0 -0
  833. data/sample/tkextlib/tile/themes/kroc/kroc/check-nu.gif +0 -0
  834. data/sample/tkextlib/tile/themes/kroc/kroc/radio-hc.gif +0 -0
  835. data/sample/tkextlib/tile/themes/kroc/kroc/radio-hu.gif +0 -0
  836. data/sample/tkextlib/tile/themes/kroc/kroc/radio-nc.gif +0 -0
  837. data/sample/tkextlib/tile/themes/kroc/kroc/radio-nu.gif +0 -0
  838. data/sample/tkextlib/tile/themes/kroc/pkgIndex.tcl +15 -0
  839. data/sample/tkextlib/tile/themes/plastik/pkgIndex.tcl +16 -0
  840. data/sample/tkextlib/tile/themes/plastik/plastik.tcl +125 -0
  841. data/sample/tkextlib/tile/themes/plastik/plastik/arrowdown-n.gif +0 -0
  842. data/sample/tkextlib/tile/themes/plastik/plastik/arrowdown-p.gif +0 -0
  843. data/sample/tkextlib/tile/themes/plastik/plastik/arrowleft-n.gif +0 -0
  844. data/sample/tkextlib/tile/themes/plastik/plastik/arrowleft-p.gif +0 -0
  845. data/sample/tkextlib/tile/themes/plastik/plastik/arrowright-n.gif +0 -0
  846. data/sample/tkextlib/tile/themes/plastik/plastik/arrowright-p.gif +0 -0
  847. data/sample/tkextlib/tile/themes/plastik/plastik/arrowup-n.gif +0 -0
  848. data/sample/tkextlib/tile/themes/plastik/plastik/arrowup-p.gif +0 -0
  849. data/sample/tkextlib/tile/themes/plastik/plastik/button-h.gif +0 -0
  850. data/sample/tkextlib/tile/themes/plastik/plastik/button-n.gif +0 -0
  851. data/sample/tkextlib/tile/themes/plastik/plastik/button-p.gif +0 -0
  852. data/sample/tkextlib/tile/themes/plastik/plastik/check-hc.gif +0 -0
  853. data/sample/tkextlib/tile/themes/plastik/plastik/check-hu.gif +0 -0
  854. data/sample/tkextlib/tile/themes/plastik/plastik/check-nc.gif +0 -0
  855. data/sample/tkextlib/tile/themes/plastik/plastik/check-nu.gif +0 -0
  856. data/sample/tkextlib/tile/themes/plastik/plastik/check-pc.gif +0 -0
  857. data/sample/tkextlib/tile/themes/plastik/plastik/hsb-n.gif +0 -0
  858. data/sample/tkextlib/tile/themes/plastik/plastik/hslider-n.gif +0 -0
  859. data/sample/tkextlib/tile/themes/plastik/plastik/radio-hc.gif +0 -0
  860. data/sample/tkextlib/tile/themes/plastik/plastik/radio-hu.gif +0 -0
  861. data/sample/tkextlib/tile/themes/plastik/plastik/radio-nc.gif +0 -0
  862. data/sample/tkextlib/tile/themes/plastik/plastik/radio-nu.gif +0 -0
  863. data/sample/tkextlib/tile/themes/plastik/plastik/radio-pc.gif +0 -0
  864. data/sample/tkextlib/tile/themes/plastik/plastik/vsb-n.gif +0 -0
  865. data/sample/tkextlib/tile/themes/plastik/plastik/vslider-n.gif +0 -0
  866. data/sample/tkextlib/tile/toolbutton.tcl +152 -0
  867. data/sample/tkextlib/tkHTML/Orig_COPYRIGHT.txt +12 -0
  868. data/sample/tkextlib/tkHTML/README +12 -0
  869. data/sample/tkextlib/tkHTML/hv.rb +314 -0
  870. data/sample/tkextlib/tkHTML/page1/image1 +0 -0
  871. data/sample/tkextlib/tkHTML/page1/image10 +0 -0
  872. data/sample/tkextlib/tkHTML/page1/image11 +0 -0
  873. data/sample/tkextlib/tkHTML/page1/image12 +0 -0
  874. data/sample/tkextlib/tkHTML/page1/image13 +0 -0
  875. data/sample/tkextlib/tkHTML/page1/image14 +0 -0
  876. data/sample/tkextlib/tkHTML/page1/image2 +0 -0
  877. data/sample/tkextlib/tkHTML/page1/image3 +0 -0
  878. data/sample/tkextlib/tkHTML/page1/image4 +0 -0
  879. data/sample/tkextlib/tkHTML/page1/image5 +0 -0
  880. data/sample/tkextlib/tkHTML/page1/image6 +0 -0
  881. data/sample/tkextlib/tkHTML/page1/image7 +0 -0
  882. data/sample/tkextlib/tkHTML/page1/image8 +0 -0
  883. data/sample/tkextlib/tkHTML/page1/image9 +0 -0
  884. data/sample/tkextlib/tkHTML/page1/index.html +115 -0
  885. data/sample/tkextlib/tkHTML/page2/image1 +0 -0
  886. data/sample/tkextlib/tkHTML/page2/image10 +0 -0
  887. data/sample/tkextlib/tkHTML/page2/image11 +0 -0
  888. data/sample/tkextlib/tkHTML/page2/image12 +0 -0
  889. data/sample/tkextlib/tkHTML/page2/image13 +0 -0
  890. data/sample/tkextlib/tkHTML/page2/image14 +0 -0
  891. data/sample/tkextlib/tkHTML/page2/image15 +0 -0
  892. data/sample/tkextlib/tkHTML/page2/image16 +0 -0
  893. data/sample/tkextlib/tkHTML/page2/image17 +0 -0
  894. data/sample/tkextlib/tkHTML/page2/image18 +0 -0
  895. data/sample/tkextlib/tkHTML/page2/image19 +0 -0
  896. data/sample/tkextlib/tkHTML/page2/image2 +0 -0
  897. data/sample/tkextlib/tkHTML/page2/image20 +0 -0
  898. data/sample/tkextlib/tkHTML/page2/image21 +0 -0
  899. data/sample/tkextlib/tkHTML/page2/image22 +0 -0
  900. data/sample/tkextlib/tkHTML/page2/image23 +0 -0
  901. data/sample/tkextlib/tkHTML/page2/image24 +0 -0
  902. data/sample/tkextlib/tkHTML/page2/image25 +0 -0
  903. data/sample/tkextlib/tkHTML/page2/image26 +0 -0
  904. data/sample/tkextlib/tkHTML/page2/image27 +0 -0
  905. data/sample/tkextlib/tkHTML/page2/image28 +0 -0
  906. data/sample/tkextlib/tkHTML/page2/image29 +0 -0
  907. data/sample/tkextlib/tkHTML/page2/image3 +0 -0
  908. data/sample/tkextlib/tkHTML/page2/image30 +0 -0
  909. data/sample/tkextlib/tkHTML/page2/image31 +0 -0
  910. data/sample/tkextlib/tkHTML/page2/image32 +0 -0
  911. data/sample/tkextlib/tkHTML/page2/image33 +0 -0
  912. data/sample/tkextlib/tkHTML/page2/image34 +0 -0
  913. data/sample/tkextlib/tkHTML/page2/image35 +0 -0
  914. data/sample/tkextlib/tkHTML/page2/image36 +0 -0
  915. data/sample/tkextlib/tkHTML/page2/image37 +0 -0
  916. data/sample/tkextlib/tkHTML/page2/image38 +0 -0
  917. data/sample/tkextlib/tkHTML/page2/image39 +0 -0
  918. data/sample/tkextlib/tkHTML/page2/image4 +0 -0
  919. data/sample/tkextlib/tkHTML/page2/image5 +0 -0
  920. data/sample/tkextlib/tkHTML/page2/image6 +0 -0
  921. data/sample/tkextlib/tkHTML/page2/image7 +0 -0
  922. data/sample/tkextlib/tkHTML/page2/image8 +0 -0
  923. data/sample/tkextlib/tkHTML/page2/image9 +0 -0
  924. data/sample/tkextlib/tkHTML/page2/index.html +433 -0
  925. data/sample/tkextlib/tkHTML/page3/image1 +0 -0
  926. data/sample/tkextlib/tkHTML/page3/image10 +0 -0
  927. data/sample/tkextlib/tkHTML/page3/image11 +0 -0
  928. data/sample/tkextlib/tkHTML/page3/image12 +0 -0
  929. data/sample/tkextlib/tkHTML/page3/image13 +0 -0
  930. data/sample/tkextlib/tkHTML/page3/image14 +0 -0
  931. data/sample/tkextlib/tkHTML/page3/image2 +0 -0
  932. data/sample/tkextlib/tkHTML/page3/image3 +0 -0
  933. data/sample/tkextlib/tkHTML/page3/image4 +0 -0
  934. data/sample/tkextlib/tkHTML/page3/image5 +0 -0
  935. data/sample/tkextlib/tkHTML/page3/image6 +0 -0
  936. data/sample/tkextlib/tkHTML/page3/image7 +0 -0
  937. data/sample/tkextlib/tkHTML/page3/image8 +0 -0
  938. data/sample/tkextlib/tkHTML/page3/image9 +0 -0
  939. data/sample/tkextlib/tkHTML/page3/index.html +2787 -0
  940. data/sample/tkextlib/tkHTML/page4/image1 +0 -0
  941. data/sample/tkextlib/tkHTML/page4/image2 +0 -0
  942. data/sample/tkextlib/tkHTML/page4/image3 +0 -0
  943. data/sample/tkextlib/tkHTML/page4/image4 +0 -0
  944. data/sample/tkextlib/tkHTML/page4/image5 +0 -0
  945. data/sample/tkextlib/tkHTML/page4/image6 +0 -0
  946. data/sample/tkextlib/tkHTML/page4/image7 +0 -0
  947. data/sample/tkextlib/tkHTML/page4/image8 +0 -0
  948. data/sample/tkextlib/tkHTML/page4/image9 +0 -0
  949. data/sample/tkextlib/tkHTML/page4/index.html +768 -0
  950. data/sample/tkextlib/tkHTML/ss.rb +437 -0
  951. data/sample/tkextlib/tkimg/demo.rb +1479 -0
  952. data/sample/tkextlib/tkimg/license_terms_of_Img_extension +41 -0
  953. data/sample/tkextlib/tkimg/readme.txt +3 -0
  954. data/sample/tkextlib/tktable/Orig_LICENSE.txt +52 -0
  955. data/sample/tkextlib/tktable/basic.rb +61 -0
  956. data/sample/tkextlib/tktable/buttons.rb +77 -0
  957. data/sample/tkextlib/tktable/command.rb +90 -0
  958. data/sample/tkextlib/tktable/debug.rb +102 -0
  959. data/sample/tkextlib/tktable/dynarows.rb +100 -0
  960. data/sample/tkextlib/tktable/maxsize.rb +68 -0
  961. data/sample/tkextlib/tktable/spreadsheet.rb +138 -0
  962. data/sample/tkextlib/tktable/tcllogo.gif +0 -0
  963. data/sample/tkextlib/tktable/valid.rb +89 -0
  964. data/sample/tkextlib/treectrl/bitmaps.rb +77 -0
  965. data/sample/tkextlib/treectrl/demo.rb +1306 -0
  966. data/sample/tkextlib/treectrl/explorer.rb +431 -0
  967. data/sample/tkextlib/treectrl/help.rb +405 -0
  968. data/sample/tkextlib/treectrl/imovie.rb +131 -0
  969. data/sample/tkextlib/treectrl/layout.rb +160 -0
  970. data/sample/tkextlib/treectrl/mailwasher.rb +270 -0
  971. data/sample/tkextlib/treectrl/outlook-folders.rb +125 -0
  972. data/sample/tkextlib/treectrl/outlook-newgroup.rb +449 -0
  973. data/sample/tkextlib/treectrl/pics/big-dll.gif +0 -0
  974. data/sample/tkextlib/treectrl/pics/big-exe.gif +0 -0
  975. data/sample/tkextlib/treectrl/pics/big-file.gif +0 -0
  976. data/sample/tkextlib/treectrl/pics/big-folder.gif +0 -0
  977. data/sample/tkextlib/treectrl/pics/big-txt.gif +0 -0
  978. data/sample/tkextlib/treectrl/pics/checked.gif +0 -0
  979. data/sample/tkextlib/treectrl/pics/file.gif +0 -0
  980. data/sample/tkextlib/treectrl/pics/folder-closed.gif +0 -0
  981. data/sample/tkextlib/treectrl/pics/folder-open.gif +0 -0
  982. data/sample/tkextlib/treectrl/pics/help-book-closed.gif +0 -0
  983. data/sample/tkextlib/treectrl/pics/help-book-open.gif +0 -0
  984. data/sample/tkextlib/treectrl/pics/help-page.gif +0 -0
  985. data/sample/tkextlib/treectrl/pics/imovie-01.gif +0 -0
  986. data/sample/tkextlib/treectrl/pics/imovie-02.gif +0 -0
  987. data/sample/tkextlib/treectrl/pics/imovie-03.gif +0 -0
  988. data/sample/tkextlib/treectrl/pics/imovie-04.gif +0 -0
  989. data/sample/tkextlib/treectrl/pics/imovie-05.gif +0 -0
  990. data/sample/tkextlib/treectrl/pics/imovie-06.gif +0 -0
  991. data/sample/tkextlib/treectrl/pics/imovie-07.gif +0 -0
  992. data/sample/tkextlib/treectrl/pics/internet-check-off.gif +0 -0
  993. data/sample/tkextlib/treectrl/pics/internet-check-on.gif +0 -0
  994. data/sample/tkextlib/treectrl/pics/internet-print.gif +0 -0
  995. data/sample/tkextlib/treectrl/pics/internet-radio-off.gif +0 -0
  996. data/sample/tkextlib/treectrl/pics/internet-radio-on.gif +0 -0
  997. data/sample/tkextlib/treectrl/pics/internet-search.gif +0 -0
  998. data/sample/tkextlib/treectrl/pics/internet-security.gif +0 -0
  999. data/sample/tkextlib/treectrl/pics/mac-collapse.gif +0 -0
  1000. data/sample/tkextlib/treectrl/pics/mac-expand.gif +0 -0
  1001. data/sample/tkextlib/treectrl/pics/outlook-arrow.gif +0 -0
  1002. data/sample/tkextlib/treectrl/pics/outlook-clip.gif +0 -0
  1003. data/sample/tkextlib/treectrl/pics/outlook-deleted.gif +0 -0
  1004. data/sample/tkextlib/treectrl/pics/outlook-draft.gif +0 -0
  1005. data/sample/tkextlib/treectrl/pics/outlook-folder.gif +0 -0
  1006. data/sample/tkextlib/treectrl/pics/outlook-group.gif +0 -0
  1007. data/sample/tkextlib/treectrl/pics/outlook-inbox.gif +0 -0
  1008. data/sample/tkextlib/treectrl/pics/outlook-local.gif +0 -0
  1009. data/sample/tkextlib/treectrl/pics/outlook-main.gif +0 -0
  1010. data/sample/tkextlib/treectrl/pics/outlook-outbox.gif +0 -0
  1011. data/sample/tkextlib/treectrl/pics/outlook-read-2.gif +0 -0
  1012. data/sample/tkextlib/treectrl/pics/outlook-read.gif +0 -0
  1013. data/sample/tkextlib/treectrl/pics/outlook-sent.gif +0 -0
  1014. data/sample/tkextlib/treectrl/pics/outlook-server.gif +0 -0
  1015. data/sample/tkextlib/treectrl/pics/outlook-unread.gif +0 -0
  1016. data/sample/tkextlib/treectrl/pics/outlook-watch.gif +0 -0
  1017. data/sample/tkextlib/treectrl/pics/sky.gif +0 -0
  1018. data/sample/tkextlib/treectrl/pics/small-dll.gif +0 -0
  1019. data/sample/tkextlib/treectrl/pics/small-exe.gif +0 -0
  1020. data/sample/tkextlib/treectrl/pics/small-file.gif +0 -0
  1021. data/sample/tkextlib/treectrl/pics/small-folder.gif +0 -0
  1022. data/sample/tkextlib/treectrl/pics/small-txt.gif +0 -0
  1023. data/sample/tkextlib/treectrl/pics/unchecked.gif +0 -0
  1024. data/sample/tkextlib/treectrl/random.rb +509 -0
  1025. data/sample/tkextlib/treectrl/readme.txt +2 -0
  1026. data/sample/tkextlib/treectrl/www-options.rb +304 -0
  1027. data/sample/tkextlib/vu/Orig_LICENSE.txt +51 -0
  1028. data/sample/tkextlib/vu/README.txt +50 -0
  1029. data/sample/tkextlib/vu/canvItems.rb +91 -0
  1030. data/sample/tkextlib/vu/canvSticker.rb +83 -0
  1031. data/sample/tkextlib/vu/canvSticker2.rb +102 -0
  1032. data/sample/tkextlib/vu/dial_demo.rb +114 -0
  1033. data/sample/tkextlib/vu/m128_000.xbm +174 -0
  1034. data/sample/tkextlib/vu/oscilloscope.rb +69 -0
  1035. data/sample/tkextlib/vu/pie.rb +57 -0
  1036. data/sample/tkextlib/vu/vu_demo.rb +68 -0
  1037. data/sample/tkfrom.rb +133 -0
  1038. data/sample/tkhello.rb +11 -0
  1039. data/sample/tkline.rb +48 -0
  1040. data/sample/tkmenubutton.rb +136 -0
  1041. data/sample/tkmsgcat-load_rb.rb +103 -0
  1042. data/sample/tkmsgcat-load_rb2.rb +103 -0
  1043. data/sample/tkmsgcat-load_tk.rb +119 -0
  1044. data/sample/tkmulticolumnlist.rb +744 -0
  1045. data/sample/tkmultilistbox.rb +655 -0
  1046. data/sample/tkmultilistframe.rb +941 -0
  1047. data/sample/tkoptdb-safeTk.rb +74 -0
  1048. data/sample/tkoptdb.rb +107 -0
  1049. data/sample/tkrttimer.rb +78 -0
  1050. data/sample/tksleep_sample.rb +30 -0
  1051. data/sample/tktextframe.rb +282 -0
  1052. data/sample/tktextio.rb +1061 -0
  1053. data/sample/tktimer.rb +51 -0
  1054. data/sample/tktimer2.rb +48 -0
  1055. data/sample/tktimer3.rb +60 -0
  1056. data/sample/tktree.rb +104 -0
  1057. data/sample/tktree.tcl +305 -0
  1058. data/sample/ttk_wrapper.rb +155 -0
  1059. data/tk.gemspec +24 -0
  1060. metadata +1144 -0
@@ -0,0 +1,72 @@
1
+ #!/usr/bin/ruby
2
+ # frozen_string_literal: false
3
+
4
+ require 'tk'
5
+ require 'tkextlib/tcllib/plotchart'
6
+
7
+ ###############################
8
+
9
+ c1 = TkCanvas.new(:background=>'white', :width=>400, :height=>200)
10
+ c2 = TkCanvas.new(:background=>'white', :width=>400, :height=>200)
11
+ Tk.pack(c1,c2, :fill=>:both, :side=>:top)
12
+
13
+ ###############################
14
+ # Set up a strip chart
15
+ ###############################
16
+ slipchart = Tk::Tcllib::Plotchart::Stripchart.new(c1, [0.0, 100.0, 10.0],
17
+ [0.0, 100.0, 20.0])
18
+
19
+ TkTimer.new(500, -1, proc{|obj| # obj --> TkTimer object
20
+ slipchart, xold, xd, yold, yd = obj.return_value
21
+ xnew = xold + xd
22
+ ynew = yold + (rand() - 0.5) * yd
23
+ ynew2 = yold + (rand() - 0.5) * 2.0 * yd
24
+ slipchart.plot('series1', xnew, ynew)
25
+ slipchart.plot('series2', xnew, ynew2)
26
+ obj.stop if xnew >= 200
27
+ [slipchart, xnew, xd, ynew, yd] # return_value
28
+ }).start(100, proc{
29
+ # init return_value
30
+ [slipchart, 0.0, 15.0, 50.0, 30.0]
31
+ })
32
+
33
+ slipchart.title "Aha!"
34
+
35
+ ###############################
36
+ # Set up an isometric plot
37
+ ###############################
38
+ s = Tk::Tcllib::Plotchart::IsometricPlot.new(c2, [0.0, 100.0], [0.0, 200.0],
39
+ :noaxes)
40
+
41
+ s.set_zoom_pan
42
+
43
+ s.plot('rectangle', [10.0, 10.0, 50.0, 50.0], 'green')
44
+ s.plot('filled-rectangle', [20.0, 20.0, 40.0, 40.0], 'red')
45
+ s.plot('filled-circle', [70.0, 70.0, 40.0], 'yellow')
46
+ s.plot('circle', [70.0, 70.0, 42.0])
47
+
48
+ ###############################
49
+ # Check the symbols
50
+ ###############################
51
+ h = TkToplevel.new(:title=>'h')
52
+ c = TkCanvas.new(h, :bg=>'white', :width=>400, :height=>200).pack(:fill=>:both)
53
+
54
+ s = Tk::Tcllib::Plotchart::XYPlot.new(c, [0.0, 100.0, 10.0],
55
+ [0.0, 100.0, 20.0])
56
+ s.dataconfig('series1', :colour=>'red', :type=>:symbol)
57
+ s.dataconfig('series2', :colour=>'green', :type=>:both)
58
+
59
+ s.yconfig(:format=>"%12.2e")
60
+
61
+ x = 5.0
62
+ %w(plus cross circle up down dot upfilled downfilled).each{|sym|
63
+ s.dataconfig('series1', :symbol=>sym)
64
+ s.dataconfig('series2', :symbol=>sym)
65
+ s.plot('series1', x, 50.0)
66
+ s.plot('series2', x, 20)
67
+ x += 10
68
+ }
69
+
70
+ ##############################
71
+
72
+ Tk.mainloop
@@ -0,0 +1,84 @@
1
+ #!/usr/bin/ruby
2
+ # frozen_string_literal: false
3
+
4
+ require 'tk'
5
+ require 'tkextlib/tcllib/plotchart'
6
+
7
+ ###############################
8
+ # Set up a strip chart
9
+ ###############################
10
+
11
+ Tk::Tcllib::Plotchart::Stripchart.new([0.0, 100.0, 10.0],
12
+ [0.0, 100.0, 20.0],
13
+ :background=>'white',
14
+ :width=>400, :height=>200){|chart|
15
+ title "Aha!"
16
+ pack(:fill=>:both, :side=>:top)
17
+
18
+ series1 = Tk::Tcllib::Plotchart::PlotSeries.new(chart)
19
+ series2 = Tk::Tcllib::Plotchart::PlotSeries.new(chart)
20
+
21
+ xd = 15.0
22
+ yd = 30.0
23
+
24
+ TkTimer.new(500, -1, proc{|obj| # obj --> TkTimer object
25
+ xold, yold = obj.return_value
26
+ xnew = xold + xd
27
+ ynew = yold + (rand() - 0.5) * yd
28
+ ynew2 = yold + (rand() - 0.5) * 2.0 * yd
29
+
30
+ series1.plot(xnew, ynew)
31
+ series2.plot(xnew, ynew2)
32
+
33
+ obj.stop if xnew >= 200
34
+
35
+ [xnew, ynew] # return_value
36
+ }).start(100, proc{ [0.0, 50.0] }) # init return_value
37
+ }
38
+
39
+ ###############################
40
+ # Set up an isometric plot
41
+ ###############################
42
+ Tk::Tcllib::Plotchart::IsometricPlot.new([0.0, 100.0], [0.0, 200.0], :noaxes,
43
+ :background=>'white',
44
+ :width=>400, :height=>200){|chart|
45
+ pack(:fill=>:both, :side=>:top)
46
+ set_zoom_pan
47
+
48
+ chart.plot('rectangle', [10.0, 10.0, 50.0, 50.0], 'green')
49
+ chart.plot('filled-rectangle', [20.0, 20.0, 40.0, 40.0], 'red')
50
+ chart.plot('filled-circle', [70.0, 70.0, 40.0], 'yellow')
51
+ chart.plot('circle', [70.0, 70.0, 42.0])
52
+ }
53
+
54
+ ###############################
55
+ # Check the symbols
56
+ ###############################
57
+ TkToplevel.new(:title=>'h'){|h|
58
+ Tk::Tcllib::Plotchart::XYPlot.new(h, [0.0, 100.0, 10.0],
59
+ [0.0, 100.0, 20.0],
60
+ :bg=>'white',
61
+ :width=>400, :height=>200){|chart|
62
+ pack(:fill=>:both)
63
+
64
+ yconfig(:format=>"%12.2e")
65
+
66
+ series1 = Tk::Tcllib::Plotchart::PlotSeries.new(chart, :colour=>'red',
67
+ :type=>:symbol)
68
+ series2 = Tk::Tcllib::Plotchart::PlotSeries.new(chart, :colour=>'green',
69
+ :type=>:both)
70
+
71
+ x = 5.0
72
+ %w(plus cross circle up down dot upfilled downfilled).each{|sym|
73
+ series1.dataconfig(:symbol=>sym)
74
+ series2.dataconfig(:symbol=>sym)
75
+ series1.plot(x, 50.0)
76
+ series2.plot(x, 20)
77
+ x += 10
78
+ }
79
+ }
80
+ }
81
+
82
+ ##############################
83
+
84
+ Tk.mainloop
@@ -0,0 +1,18 @@
1
+ #!/usr/bin/ruby
2
+ # frozen_string_literal: false
3
+
4
+ require 'tk'
5
+ require 'tkextlib/tcllib/plotchart'
6
+
7
+ TkCanvas.new(:background=>'white', :width=>400, :height=>200){|c|
8
+ pack(:fill=>:both)
9
+ Tk::Tcllib::Plotchart::XYPlot.new(c, [0.0, 100.0, 10.0],
10
+ [0.0, 100.0, 20.0]){
11
+ [ [0.0, 32.0], [10.0, 50.0], [25.0, 60.0], [78.0, 11.0] ].each{|x, y|
12
+ plot('series1', x, y)
13
+ }
14
+ title("Data series")
15
+ }
16
+ }
17
+
18
+ Tk.mainloop
@@ -0,0 +1,30 @@
1
+
2
+ ######################################################################
3
+ ### The following text is the original 'license.terms' of tile ###
4
+ ### extension. ###
5
+ ######################################################################
6
+
7
+
8
+ LICENSE ("MIT-style")
9
+
10
+ This software is Copyright (C) 2003 Joe English and other parties.
11
+
12
+ The following terms apply to all files associated with this software
13
+ unless explicitly disclaimed in individual files.
14
+
15
+ The author(s) hereby grant permission to use, copy, modify, distribute,
16
+ and license this software and its documentation for any purpose, provided
17
+ that existing copyright notices are retained in all copies and that this
18
+ notice is included in any distributions. No written agreement,
19
+ license, or royalty fee is required for any of the authorized uses.
20
+ Modifications to this software may be copyrighted by their authors
21
+ and need not follow the licensing terms described here, provided that
22
+ the new terms are clearly indicated on the first page of each file where
23
+ they apply.
24
+
25
+ This program is distributed in the hope that it will be useful,
26
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
27
+ MERCHANTABILITY or FITNESS for a PARTICULAR PURPOSE. IN NO EVENT
28
+ shall the AUTHORS of THIS SOFTWARE be LIABLE to ANY PARTY for
29
+ DIRECT, INDIRECT, SPECIAL, INCIDENTAL, or CONSEQUENTIAL DAMAGES
30
+ arising out of the USE of THIS SOFTWARE and its DOCUMENTATION.
@@ -0,0 +1,984 @@
1
+ #!/usr/bin/env ruby
2
+ # frozen_string_literal: false
3
+ #
4
+ # Demo for 'tile' package.
5
+ #
6
+ require 'tk'
7
+
8
+ demodir = File.dirname($0)
9
+ themesdir = File.join(demodir, 'themes')
10
+ Tk::AUTO_PATH.lappend('.', demodir, themesdir)
11
+
12
+ Dir.foreach(themesdir){|name|
13
+ next if name == '.' || name == '..'
14
+ dir = File.join(themesdir, name)
15
+ Tk::AUTO_PATH.lappend(dir) if File.directory?(dir)
16
+ }
17
+
18
+ require 'tkextlib/tile'
19
+
20
+ def version?(ver)
21
+ TkPackage.vcompare(Tk::Tile.package_version, ver) >= 0
22
+ end
23
+
24
+ # define Tcl/Tk procedures for compatibility
25
+ Tk::Tile.__define_LoadImages_proc_for_compatibility__!
26
+ Tk::Tile::Style.__define_wrapper_proc_for_compatibility__!
27
+
28
+ unless Tk::Tile::Style.theme_names.include?('step')
29
+ Tk::Tile::Style.theme_create('step')
30
+ end
31
+
32
+ Tk.load_tclscript(File.join(demodir, 'toolbutton.tcl'))
33
+ Tk.load_tclscript(File.join(demodir, 'repeater.tcl'))
34
+
35
+ # This forces an update of the available packages list. It's required
36
+ # for package names to find the themes in demos/themes/*.tcl
37
+ ## Tk.tk_call(TkPackage.unknown_proc, 'Tcl', TkPackage.provide('Tcl'))
38
+ ## --> This doesn't work.
39
+ ## Because, unknown_proc may be "command + some arguments".
40
+ Tk.ip_eval("#{TkPackage.unknown_proc} Tcl #{TkPackage.provide('Tcl')}")
41
+
42
+ TkRoot.new{
43
+ title 'Tile demo'
44
+ iconname 'Tile demo'
45
+ }
46
+
47
+ # The descriptive names of the builtin themes.
48
+ $THEMELIST = [
49
+ ['default', 'Default'],
50
+ ['classic', 'Classic'],
51
+ ['alt', 'Revitalized'],
52
+ ['winnative', 'Windows native'],
53
+ ['xpnative', 'XP Native'],
54
+ ['aqua', 'Aqua'],
55
+ ]
56
+
57
+ $V = TkVariable.new_hash(:THEME => 'default',
58
+ :COMPOUND => 'top',
59
+ :CONSOLE => false,
60
+ :MENURADIO1 => 'One',
61
+ :MENUCHECK1 => true,
62
+ :PBMODE => 'determinate',
63
+ :SELECTED => true,
64
+ :CHOICE => 2)
65
+
66
+ # Add in any available loadable themes.
67
+ TkPackage.names.find_all{|n| n =~ /^(tile|ttk)::theme::/}.each{|pkg|
68
+ name = pkg.split('::')[-1]
69
+ unless $THEMELIST.assoc(name)
70
+ $THEMELIST << [name, Tk.tk_call('string', 'totitle', name)]
71
+ end
72
+ }
73
+
74
+ # Add theme definition written by ruby
75
+ $RUBY_THEMELIST = []
76
+ begin
77
+ load(File.join(demodir, 'themes', 'kroc.rb'), true)
78
+ rescue => e
79
+ raise e
80
+ $RUBY_THEMELIST << ['kroc-rb', 'Kroc (by Ruby)', false]
81
+ else
82
+ $RUBY_THEMELIST << ['kroc-rb', 'Kroc (by Ruby)', true]
83
+ end
84
+
85
+ def makeThemeControl(parent)
86
+ c = Tk::Tile::Labelframe.new(parent, :text=>'Theme')
87
+ $THEMELIST.each{|theme, name|
88
+ b = Tk::Tile::Radiobutton.new(c, :text=>name, :value=>theme,
89
+ :variable=>$V.ref(:THEME),
90
+ :command=>proc{setTheme(theme)})
91
+ b.grid(:sticky=>:ew)
92
+ unless (TkPackage.names.find{|n| n =~ /(tile|ttk)::theme::#{theme}/})
93
+ b.ttk_state(:disabled)
94
+ end
95
+ }
96
+ $RUBY_THEMELIST.each{|theme, name, available|
97
+ b = Tk::Tile::Radiobutton.new(c, :text=>name, :value=>theme,
98
+ :variable=>$V.ref(:THEME),
99
+ :command=>proc{setTheme(theme)})
100
+ b.grid(:sticky=>:ew)
101
+ b.ttk_state(:disabled) unless available
102
+ }
103
+ c
104
+ end
105
+
106
+ def makeThemeMenu(parent)
107
+ m = TkMenu.new(parent)
108
+ $THEMELIST.each{|theme, name|
109
+ m.add(:radiobutton, :label=>name, :variable=>$V.ref(:THEME),
110
+ :value=>theme, :command=>proc{setTheme(theme)})
111
+ unless (TkPackage.names.find{|n| n =~ /(tile|ttk)::theme::#{theme}/})
112
+ m.entryconfigure(:end, :state=>:disabled)
113
+ end
114
+ }
115
+ $RUBY_THEMELIST.each{|theme, name, available|
116
+ m.add(:radiobutton, :label=>name, :variable=>$V.ref(:THEME),
117
+ :value=>theme, :command=>proc{setTheme(theme)})
118
+ m.entryconfigure(:end, :state=>:disabled) unless available
119
+ }
120
+ m
121
+ end
122
+
123
+ def setTheme(theme)
124
+ if (pkg = TkPackage.names.find{|n| n =~ /(tile|ttk)::theme::#{theme}/})
125
+ unless Tk::Tile::Style.theme_names.find{|n| n == theme}
126
+ TkPackage.require(pkg)
127
+ end
128
+ end
129
+ Tk::Tile::Style.theme_use(theme)
130
+ end
131
+
132
+ #
133
+ # Load icons...
134
+ #
135
+ $BUTTONS = ['open', 'new', 'save']
136
+ $CHECKBOXES = ['bold', 'italic']
137
+ $ICON = {}
138
+
139
+ def loadIcons(file)
140
+ Tk.load_tclscript(file)
141
+ img_data = TkVarAccess.new('ImgData')
142
+ img_data.keys.each{|icon|
143
+ $ICON[icon] = TkPhotoImage.new(:data=>img_data[icon])
144
+ }
145
+ end
146
+
147
+ loadIcons(File.join(demodir, 'iconlib.tcl'))
148
+
149
+ #
150
+ # Utilities:
151
+ #
152
+ def foreachWidget(wins, cmd)
153
+ wins.each{|w|
154
+ cmd.call(w)
155
+ foreachWidget(w.winfo_children, cmd)
156
+ }
157
+ end
158
+
159
+ # sbstub
160
+ # Used as the :command option for a scrollbar,
161
+ # updates the scrollbar's position.
162
+ #
163
+ def sbstub(sb, cmd, num, units = 'units')
164
+ num = TkComm.number(num)
165
+ case cmd.to_s
166
+ when 'moveto'
167
+ sb.set(num, num+0.5)
168
+
169
+ when 'scroll'
170
+ if units.to_s == 'pages'
171
+ delta = 0.2
172
+ else
173
+ delta = 0.05
174
+ end
175
+ current = sb.get
176
+ sb.set(current[0] + delta * num, current[1] + delta * num)
177
+ end
178
+ end
179
+
180
+ # ... for debugging:
181
+ TkBindTag::ALL.bind('ButtonPress-3', proc{|w| $W = w}, '%W')
182
+ TkBindTag::ALL.bind('Control-ButtonPress-3', proc{|w| w.set_focus}, '%W')
183
+
184
+ def showHelp()
185
+ Tk.messageBox(:message=>'No help yet...')
186
+ end
187
+
188
+ #
189
+ # See toolbutton.tcl.
190
+ TkOption.add('*Toolbar.relief', :groove)
191
+ TkOption.add('*Toolbar.borderWidth', 2)
192
+
193
+ TkOption.add('*Toolbar.Button.Pad', 2)
194
+
195
+ $ROOT = Tk.root
196
+ $BASE = $ROOT
197
+ Tk.destroy(*($ROOT.winfo_children))
198
+
199
+ $TOOLBARS = []
200
+
201
+ #
202
+ # Toolbar button standard vs. tile comparison:
203
+ #
204
+ def makeToolbars
205
+ #
206
+ # Tile toolbar:
207
+ #
208
+ tb = Tk::Tile::Frame.new($BASE, :class=>'Toolbar')
209
+ $TOOLBARS << tb
210
+ i = 0
211
+ $BUTTONS.each{|icon|
212
+ i += 1
213
+ Tk::Tile::Button.new(tb, :text=>icon, :image=>$ICON[icon],
214
+ :compound=>$V[:COMPOUND],
215
+ :style=>:Toolbutton).grid(:row=>0, :column=>i,
216
+ :sticky=>:news)
217
+ }
218
+ $CHECKBOXES.each{|icon|
219
+ i += 1
220
+ Tk::Tile::Checkbutton.new(tb, :text=>icon, :image=>$ICON[icon],
221
+ :variable=>$V.ref(icon),
222
+ :compound=>$V[:COMPOUND],
223
+ :style=>:Toolbutton).grid(:row=>0, :column=>i,
224
+ :sticky=>:news)
225
+ }
226
+
227
+ mb = Tk::Tile::Menubutton.new(tb, :text=>'toolbar', :image=>$ICON['file'],
228
+ :compound=>$V[:COMPOUND])
229
+ mb.configure(:menu=>makeCompoundMenu(mb))
230
+ i += 1
231
+ mb.grid(:row=>0, :column=>i, :sticky=>:news)
232
+
233
+ i += 1
234
+ tb.grid_columnconfigure(i, :weight=>1)
235
+
236
+ #
237
+ # Standard toolbar:
238
+ #
239
+ tb = TkFrame.new($BASE, :class=>'Toolbar')
240
+ $TOOLBARS << tb
241
+ i = 0
242
+ $BUTTONS.each{|icon|
243
+ i += 1
244
+ TkButton.new(tb, :text=>icon, :image=>$ICON[icon],
245
+ :compound=>$V[:COMPOUND], :relief=>:flat,
246
+ :overrelief=>:raised).grid(:row=>0, :column=>i,
247
+ :sticky=>:news)
248
+ }
249
+ $CHECKBOXES.each{|icon|
250
+ i += 1
251
+ TkCheckbutton.new(tb, :text=>icon, :image=>$ICON[icon],
252
+ :variable=>$V.ref(icon), :compound=>$V[:COMPOUND],
253
+ :indicatoron=>false, :selectcolor=>'', :relief=>:flat,
254
+ :overrelief=>:raised).grid(:row=>0, :column=>i,
255
+ :sticky=>:news)
256
+ }
257
+
258
+ mb = TkMenubutton.new(tb, :text=>'toolbar', :image=>$ICON['file'],
259
+ :compound=>$V[:COMPOUND])
260
+ mb.configure(:menu=>makeCompoundMenu(mb))
261
+ i += 1
262
+ mb.grid(:row=>0, :column=>i, :sticky=>:news)
263
+
264
+ i += 1
265
+ tb.grid_columnconfigure(i, :weight=>1)
266
+ end
267
+
268
+ #
269
+ # Toolbar :compound control:
270
+ #
271
+ def makeCompoundMenu(mb)
272
+ menu = TkMenu.new(mb)
273
+ %w(text image none top bottom left right center).each{|str|
274
+ menu.add(:radiobutton, :label=>Tk.tk_call('string', 'totitle', str),
275
+ :variable=>$V.ref(:COMPOUND), :value=>str,
276
+ :command=>proc{ changeToolbars() })
277
+ }
278
+ menu
279
+ end
280
+
281
+ makeToolbars()
282
+
283
+ ## CONTROLS
284
+ control = Tk::Tile::Frame.new($BASE)
285
+
286
+ #
287
+ # Overall theme control:
288
+ #
289
+ makeThemeControl(control).grid(:sticky=>:news, :padx=>6, :ipadx=>6)
290
+ control.grid_rowconfigure(99, :weight=>1)
291
+
292
+ def changeToolbars
293
+ foreachWidget($TOOLBARS,
294
+ proc{|w|
295
+ begin
296
+ w.compound($V[:COMPOUND])
297
+ rescue
298
+ end
299
+ })
300
+ end
301
+
302
+ def scrolledWidget(parent, klass, themed, *args)
303
+ if themed
304
+ f = Tk::Tile::Frame.new(parent)
305
+ t = klass.new(f, *args)
306
+ vs = Tk::Tile::Scrollbar.new(f)
307
+ hs = Tk::Tile::Scrollbar.new(f)
308
+ else
309
+ f = TkFrame.new(parent)
310
+ t = klass.new(f, *args)
311
+ vs = TkScrollbar.new(f)
312
+ hs = TkScrollbar.new(f)
313
+ end
314
+ t.yscrollbar(vs)
315
+ t.xscrollbar(hs)
316
+
317
+ TkGrid.configure(t, vs, :sticky=>:news)
318
+ TkGrid.configure(hs, 'x', :sticky=>:news)
319
+ TkGrid.rowconfigure(f, 0, :weight=>1)
320
+ TkGrid.columnconfigure(f, 0, :weight=>1)
321
+
322
+ [f, t]
323
+ end
324
+
325
+ #
326
+ # Notebook demonstration:
327
+ #
328
+ def makeNotebook
329
+ nb = Tk::Tile::Notebook.new($BASE, :padding=>6)
330
+ nb.enable_traversal
331
+ client = Tk::Tile::Frame.new(nb)
332
+ nb.add(client, :text=>'Demo', :underline=>0)
333
+ nb.select(client)
334
+
335
+ scales = Tk::Tile::Frame.new(nb)
336
+ nb.add(scales, :text=>'Scales')
337
+ combo = Tk::Tile::Frame.new(nb)
338
+ nb.add(combo, :text=>'Combobox', :underline=>7)
339
+ tree = Tk::Tile::Frame.new(nb)
340
+ nb.add(tree, :text=>'Tree')
341
+ others = Tk::Tile::Frame.new(nb)
342
+ nb.add(others, :text=>'Others', :underline=>4)
343
+
344
+ [nb, client, scales, combo, tree, others]
345
+ end
346
+
347
+ nb, client, scales, combo, tree, others = makeNotebook()
348
+
349
+ #
350
+ # Side-by side check, radio, and menu button comparison:
351
+ #
352
+ def fillMenu(menu)
353
+ %w(above below left right flush).each{|dir|
354
+ menu.add(:command, :label=>Tk.tk_call('string', 'totitle', dir),
355
+ :command=>proc{ menu.winfo_parent.direction(dir) })
356
+ }
357
+ menu.add(:cascade, :label=>'Submenu', :menu=>(submenu = TkMenu.new(menu)))
358
+ submenu.add(:command, :label=>'Subcommand 1')
359
+ submenu.add(:command, :label=>'Subcommand 2')
360
+ submenu.add(:command, :label=>'Subcommand 3')
361
+
362
+ menu.add(:separator)
363
+ menu.add(:command, :label=>'Quit', :command=>proc{Tk.root.destroy})
364
+ end
365
+
366
+ l = Tk::Tile::Labelframe.new(client, :text=>'Themed', :padding=>6)
367
+ r = TkLabelframe.new(client, :text=>'Standard', :padx=>6, :pady=>6)
368
+
369
+ ## Styled frame
370
+ cb = Tk::Tile::Checkbutton.new(l, :text=>'Checkbutton',
371
+ :variable=>$V.ref(:SELECTED), :underline=>2)
372
+ rb1 = Tk::Tile::Radiobutton.new(l, :text=>'One', :variable=>$V.ref(:CHOICE),
373
+ :value=>1, :underline=>0)
374
+ rb2 = Tk::Tile::Radiobutton.new(l, :text=>'Two', :variable=>$V.ref(:CHOICE),
375
+ :value=>2)
376
+ rb3 = Tk::Tile::Radiobutton.new(l, :text=>'Three',
377
+ :variable=>$V.ref(:CHOICE),
378
+ :value=>3, :underline=>0)
379
+ btn = Tk::Tile::Button.new(l, :text=>'Button', :underline=>0)
380
+
381
+ mb = Tk::Tile::Menubutton.new(l, :text=>'Menubutton', :underline=>2)
382
+ m = TkMenu.new(mb)
383
+ mb.menu(m)
384
+ fillMenu(m)
385
+
386
+ $entryText = TkVariable.new('Entry widget')
387
+ e = Tk::Tile::Entry.new(l, :textvariable=>$entryText)
388
+ e.selection_range(6, :end)
389
+
390
+ ltext_f, ltext = scrolledWidget(l, TkText, true,
391
+ :width=>12, :height=>5, :wrap=>:none)
392
+ # NOTE TO MAINTAINERS:
393
+ # The checkbuttons are -sticky ew / -expand x on purpose:
394
+ # it demonstrates one of the differences between TCheckbuttons
395
+ # and standard checkbuttons.
396
+ #
397
+ Tk.grid(cb, :sticky=>:ew)
398
+ Tk.grid(rb1, :sticky=>:ew)
399
+ Tk.grid(rb2, :sticky=>:ew)
400
+ Tk.grid(rb3, :sticky=>:ew)
401
+ Tk.grid(btn, :sticky=>:ew, :padx=>2, :pady=>2)
402
+ Tk.grid(mb, :sticky=>:ew, :padx=>2, :pady=>2)
403
+ Tk.grid(e, :sticky=>:ew, :padx=>2, :pady=>2)
404
+ Tk.grid(ltext_f, :sticky=>:news)
405
+
406
+ TkGrid.columnconfigure(l, 0, :weight=>1)
407
+ TkGrid.rowconfigure(l, 7, :weight=>1) # text widget (grid is a PITA)
408
+
409
+ ## Orig frame
410
+ cb = TkCheckbutton.new(r, :text=>'Checkbutton', :variable=>$V.ref(:SELECTED))
411
+ rb1 = TkRadiobutton.new(r, :text=>'One',
412
+ :variable=>$V.ref(:CHOICE), :value=>1)
413
+ rb2 = TkRadiobutton.new(r, :text=>'Two', :variable=>$V.ref(:CHOICE),
414
+ :value=>2, :underline=>1)
415
+ rb3 = TkRadiobutton.new(r, :text=>'Three',
416
+ :variable=>$V.ref(:CHOICE), :value=>3)
417
+ btn = TkButton.new(r, :text=>'Button')
418
+
419
+ mb = TkMenubutton.new(r, :text=>'Menubutton', :underline=>3, :takefocus=>true)
420
+ m = TkMenu.new(mb)
421
+ mb.menu(m)
422
+ $V[:rmbIndicatoron] = mb.indicatoron
423
+ m.add(:checkbutton, :label=>'Indicator?', #'
424
+ :variable=>$V.ref(:rmbIndicatoron),
425
+ :command=>proc{mb.indicatoron($V[:rmbIndicatoron])})
426
+ m.add(:separator)
427
+ fillMenu(m)
428
+
429
+ e = TkEntry.new(r, :textvariable=>$entryText)
430
+
431
+ rtext_f, rtext = scrolledWidget(r, TkText, false,
432
+ :width=>12, :height=>5, :wrap=>:none)
433
+
434
+ Tk.grid(cb, :sticky=>:ew)
435
+ Tk.grid(rb1, :sticky=>:ew)
436
+ Tk.grid(rb2, :sticky=>:ew)
437
+ Tk.grid(rb3, :sticky=>:ew)
438
+ Tk.grid(btn, :sticky=>:ew, :padx=>2, :pady=>2)
439
+ Tk.grid(mb, :sticky=>:ew, :padx=>2, :pady=>2)
440
+ Tk.grid(e, :sticky=>:ew, :padx=>2, :pady=>2)
441
+ Tk.grid(rtext_f, :sticky=>:news)
442
+
443
+ TkGrid.columnconfigure(l, 0, :weight=>1)
444
+ TkGrid.rowconfigure(l, 7, :weight=>1) # text widget (grid is a PITA)
445
+
446
+ Tk.grid(l, r, :sticky=>:news, :padx=>6, :pady=>6)
447
+ TkGrid.rowconfigure(client, 0, :weight=>1)
448
+ TkGrid.columnconfigure(client, [0, 1], :weight=>1)
449
+
450
+ #
451
+ # Add some text to the text boxes:
452
+ #
453
+ msgs = [
454
+ "The cat crept into the crypt, crapped and crept out again",
455
+ "Peter Piper picked a peck of pickled peppers",
456
+ "How much wood would a woodchuck chuck if a woodchuck could chuck wood",
457
+ "He thrusts his fists against the posts and still insists he sees the ghosts",
458
+ "Who put the bomb in the bom-b-bom-b-bom,",
459
+ "Is this your sister's sixth zither, sir?",
460
+ "Who put the ram in the ramalamadingdong?",
461
+ "I am not the pheasant plucker, I'm the pheasant plucker's mate."
462
+ ]
463
+
464
+ nmsgs = msgs.size
465
+ (0...50).each{|n|
466
+ msg = msgs[n % nmsgs]
467
+ ltext.insert(:end, "#{n}: #{msg}\n")
468
+ rtext.insert(:end, "#{n}: #{msg}\n")
469
+ }
470
+ #
471
+ # Scales and sliders pane:
472
+ #
473
+ l = Tk::Tile::Labelframe.new(scales, :text=>'Themed', :padding=>6)
474
+ r = TkLabelframe.new(scales, :text=>'Standard', :padx=>6, :pady=>6)
475
+
476
+ if version?('0.6')
477
+
478
+ # thremed frame
479
+ scale = Tk::Tile::Scale.new(l, :orient=>:horizontal, :from=>0, :to=>100,
480
+ :variable=>$V.ref(:SCALE))
481
+ vscale = Tk::Tile::Scale.new(l, :orient=>:vertical, :from=>0, :to=>100,
482
+ :variable=>$V.ref(:VSCALE))
483
+ progress = Tk::Tile::Progressbar.new(l, :orient=>:horizontal, :maximum=>100)
484
+ vprogress = Tk::Tile::Progressbar.new(l, :orient=>:vertical, :maximum=>100)
485
+
486
+ if true
487
+ def progress.inverted(w, value)
488
+ if w.mode == 'indeterminate'
489
+ w.value(value)
490
+ else
491
+ w.value(w.maximum - value)
492
+ end
493
+ end
494
+ scale.command {|value| progress.value(value)}
495
+ vscale.command {|value| progress.inverted(vprogress, value) }
496
+ else
497
+ # This would also work, but the Tk scale widgets
498
+ # in the right hand pane cause some interference when
499
+ # in autoincrement/indeterminate mode.
500
+ #
501
+ progress.variable $V.ref(:SCALE)
502
+ vprogress.variable $V.ref(:VSCALE)
503
+ end
504
+
505
+ scale.set(50)
506
+ vscale.set(50)
507
+
508
+ lmode = Tk::Tile::Label.new(l, :text=>'Progress bar mode')
509
+ pbmode0 = Tk::Tile::Radiobutton.new(l, :variable=>$V.ref(:PBMODE),
510
+ :text=>'determinate', :value=>'determinate',
511
+ :command=>proc{pbMode(progress, vprogress)})
512
+ pbmode1 = Tk::Tile::Radiobutton.new(l, :variable=>$V.ref(:PBMODE),
513
+ :text=>'indeterminate', :value=>'indeterminate',
514
+ :command=>proc{pbMode(progress, vprogress)})
515
+ def pbMode(progress, vprogress)
516
+ if vprogress.mode != $V[:PBMODE]
517
+ vprogress.value(vprogress.maximum - vprogress.value)
518
+ end
519
+
520
+ progress.mode $V[:PBMODE]
521
+ vprogress.mode $V[:PBMODE]
522
+ end
523
+
524
+ start = Tk::Tile::Button.new(l, :text=>"Start",
525
+ :command=>proc{pbStart(progress, vprogress)})
526
+ def pbStart(progress, vprogress)
527
+ # $V[:PBMODE] = 'indeterminate'
528
+ pbMode(progress, vprogress)
529
+ progress.start 10
530
+ vprogress.start
531
+ end
532
+
533
+ stop = Tk::Tile::Button.new(l, :text=>'Stop',
534
+ :command=>proc{pbStop(progress, vprogress)})
535
+ def pbStop(progress, vprogress)
536
+ progress.stop
537
+ vprogress.stop
538
+ end
539
+
540
+ Tk.grid(scale, :columnspan=>2, :sticky=>'ew')
541
+ Tk.grid(progress, :columnspan=>2, :sticky=>'ew')
542
+ Tk.grid(vscale, vprogress, :sticky=>'nws')
543
+
544
+ Tk.grid(lmode, :sticky=>'we', :columnspan=>2)
545
+ Tk.grid(pbmode0, :sticky=>'we', :columnspan=>2)
546
+ Tk.grid(pbmode1, :sticky=>'we', :columnspan=>2)
547
+ Tk.grid(start, :sticky=>'we', :columnspan=>2)
548
+ Tk.grid(stop, :sticky=>'we', :columnspan=>2)
549
+
550
+ l.grid_columnconfigure(0, :weight=>1)
551
+ l.grid_columnconfigure(1, :weight=>1)
552
+ l.grid_rowconfigure(99, :weight=>1)
553
+
554
+ # standard frame
555
+ TkScale.new(r, :orient=>:horizontal, :from=>0, :to=>100,
556
+ :variable=>$V.ref(:SCALE)).grid(:sticky=>'news')
557
+ TkScale.new(r, :orient=>:vertical, :from=>0, :to=>100,
558
+ :variable=>$V.ref(:VSCALE)).grid(:sticky=>'nws')
559
+
560
+ r.grid_columnconfigure(0, :weight=>1)
561
+ r.grid_columnconfigure(1, :weight=>1)
562
+ r.grid_rowconfigure(99, :weight=>1)
563
+
564
+ else # tile 0.5 or earlier
565
+
566
+ # themed frame
567
+ scale = Tk::Tile::Scale.new(l, :variable=>$V.ref(:SCALE),
568
+ :orient=>:horizontal, :from=>0, :to=>100)
569
+ vscale = Tk::Tile::Scale.new(l, :variable=>$V.ref(:VSCALE),
570
+ :orient=>:vertical, :from=>-25, :to=>25)
571
+
572
+ progress = Tk::Tile::Progress.new(l,
573
+ :orient=>:horizontal, :from=>0, :to=>100)
574
+ vprogress = Tk::Tile::Progress.new(l,
575
+ :orient=>:vertical, :from=>-25, :to=>25)
576
+
577
+ if true
578
+ scale.command{|value| progress.set(value)}
579
+ vscale.command{|value| vprogress.set(value)}
580
+ else # this would also work. (via TkVariable#trace)
581
+ v1 = scale.variable
582
+ v2 = vscale.variable
583
+ v1.trace('w', proc{ progress.set(v1.value) })
584
+ v2.trace('w', proc{ vprogress.set(v2.value) })
585
+ end
586
+
587
+ Tk.grid(scale, :columnspan=>2, :sticky=>:ew)
588
+ Tk.grid(progress, :columnspan=>2, :sticky=>:ew)
589
+ Tk.grid(vscale, vprogress, :sticky=>:nws)
590
+ TkGrid.columnconfigure(l, 0, :weight=>1)
591
+ TkGrid.columnconfigure(l, 1, :weight=>1)
592
+
593
+ # standard frame
594
+ TkScale.new(r, :variable=>$V.ref(:SCALE),
595
+ :orient=>:horizontal, :from=>0, :to=>100).grid(:sticky=>'news')
596
+ TkScale.new(r, :variable=>$V.ref(:VSCALE),
597
+ :orient=>:vertical, :from=>-25, :to=>25).grid(:sticky=>'nws')
598
+
599
+ TkGrid.columnconfigure(r, 0, :weight=>1)
600
+ TkGrid.columnconfigure(r, 1, :weight=>1)
601
+ end
602
+
603
+ # layout frames
604
+ Tk.grid(l, r, :sticky=>'nwes', :padx=>6, :pady=>6)
605
+ scales.grid_columnconfigure(0, :weight=>1)
606
+ scales.grid_columnconfigure(1, :weight=>1)
607
+ scales.grid_rowconfigure(0, :weight=>1)
608
+
609
+ #
610
+ # Command box:
611
+ #
612
+ cmd = Tk::Tile::Frame.new($BASE)
613
+ b_close = Tk::Tile::Button.new(cmd, :text=>'Close',
614
+ :underline=>0, :default=>:normal,
615
+ :command=>proc{Tk.root.destroy})
616
+ b_help = Tk::Tile::Button.new(cmd, :text=>'Help', :underline=>0,
617
+ :default=>:normal, :command=>proc{showHelp()})
618
+ Tk.grid('x', b_close, b_help, :pady=>[6, 4], :padx=>4)
619
+ TkGrid.columnconfigure(cmd, 0, :weight=>1)
620
+
621
+ #
622
+ # Set up accelerators:
623
+ #
624
+ $ROOT.bind('KeyPress-Escape', proc{Tk.event_generate(b_close, '<Invoke>')})
625
+ $ROOT.bind('<Help>', proc{Tk.event_generate(b_help, '<Invoke>')})
626
+ Tk::Tile::KeyNav.enableMnemonics($ROOT)
627
+ Tk::Tile::KeyNav.defaultButton(b_help)
628
+
629
+ Tk.grid($TOOLBARS[0], '-', :sticky=>:ew)
630
+ Tk.grid($TOOLBARS[1], '-', :sticky=>:ew)
631
+ Tk.grid(control, nb, :sticky=>:news)
632
+ Tk.grid(cmd, '-', :sticky=>:ew)
633
+ TkGrid.columnconfigure($ROOT, 1, :weight=>1)
634
+ TkGrid.rowconfigure($ROOT, 2, :weight=>1)
635
+
636
+ #
637
+ # Add a menu
638
+ #
639
+ menu = TkMenu.new($BASE)
640
+ $ROOT.menu(menu)
641
+ m_file = TkMenu.new(menu, :tearoff=>0)
642
+ menu.add(:cascade, :label=>'File', :underline=>0, :menu=>m_file)
643
+ m_file.add(:command, :label=>'Open', :underline=>0,
644
+ :compound=>:left, :image=>$ICON['open'])
645
+ m_file.add(:command, :label=>'Save', :underline=>0,
646
+ :compound=>:left, :image=>$ICON['save'])
647
+ m_file.add(:separator)
648
+ m_f_test = TkMenu.new(menu, :tearoff=>0)
649
+ m_file.add(:cascade, :label=>'Test submenu', :underline=>0, :menu=>m_f_test)
650
+ m_file.add(:checkbutton, :label=>'Text check', :underline=>5,
651
+ :variable=>$V.ref(:MENUCHECK1))
652
+ m_file.insert(:end, :separator)
653
+
654
+ if Tk.windowingsystem != 'x11'
655
+ TkConsole.create
656
+ m_file.insert(:end, :checkbutton, :label=>'Console', :underline=>5,
657
+ :variable=>$V.ref(:CONSOLE), :command=>proc{toggle_console()})
658
+ def toggle_console
659
+ if TkComm.bool($V[:CONSOLE])
660
+ TkConsole.show
661
+ else
662
+ TkConsole.hide
663
+ end
664
+ end
665
+ end
666
+
667
+ m_file.add(:command, :label=>'Exit', :underline=>1,
668
+ :command=>proc{Tk.event_generate(b_close, '<Invoke>')})
669
+
670
+ %w(One Two Three Four).each{|lbl|
671
+ m_f_test.add(:radiobutton, :label=>lbl, :variable=>$V.ref(:MENURADIO1))
672
+ }
673
+
674
+ # Add Theme menu.
675
+ #
676
+ menu.add(:cascade, :label=>'Theme', :underline=>3,
677
+ :menu=>makeThemeMenu(menu))
678
+
679
+ setTheme($V[:THEME])
680
+
681
+ #
682
+ # Combobox demo pane:
683
+ #
684
+ values = %w(list abc def ghi jkl mno pqr stu vwx yz)
685
+ 2.times {|i|
686
+ cb = Tk::Tile::Combobox.new(
687
+ combo, :values=>values, :textvariable=>$V.ref(:COMBO))
688
+ cb.pack(:side=>:top, :padx=>2, :pady=>2, :expand=>false, :fill=>:x)
689
+ if i == 1
690
+ cb.ttk_state :readonly
691
+ begin
692
+ cb.current = 3 # ignore if unsupported (tile0.4)
693
+ rescue
694
+ end
695
+ end
696
+ }
697
+
698
+ #
699
+ # Treeview widget demo pane:
700
+ #
701
+ if version?('0.5')
702
+
703
+ treeview = nil # avoid 'undefined' error
704
+ scrollbar = Tk::Tile::Scrollbar.new(tree,
705
+ :command=>proc{|*args| treeview.yview(*args)})
706
+ treeview = Tk::Tile::Treeview.new(tree, :columns=>%w(Class), :padding=>4,
707
+ :yscrollcommand=>proc{|*args| scrollbar.set(*args)})
708
+
709
+ Tk.grid(treeview, scrollbar, :sticky=>'news')
710
+ tree.grid_columnconfigure(0, :weight=>1)
711
+ tree.grid_rowconfigure(0, :weight=>1)
712
+ tree.grid_propagate(0)
713
+
714
+ # Add initial tree node:
715
+ # Later nodes will be added in <<TreeviewOpen>> binding.
716
+ treeview.insert('', 0, :id=>'.', :text=>'Main Window', :open=>false,
717
+ :values=>[TkWinfo.classname('.')])
718
+ treeview.headingconfigure('#0', :text=>'Widget')
719
+ treeview.headingconfigure('Class', :text=>'Class')
720
+ treeview.bind('<TreeviewOpen>', proc{fillTree(treeview)})
721
+
722
+ def fillTree(treeview)
723
+ id = treeview.focus_item
724
+ unless TkWinfo.exist?(id)
725
+ treeview.delete(id)
726
+ end
727
+ # Replace tree item children with current list of child windows.
728
+ treeview.delete(treeview.children(id))
729
+ for child in TkWinfo.children(id)
730
+ treeview.insert(id, :end, :id=>child, :text=>TkWinfo.appname(child),
731
+ :open=>false, :values=>[TkWinfo.classname(child)])
732
+ unless TkWinfo.children(child).empty?
733
+ # insert dummy child to show [+] indicator
734
+ treeview.insert(child, :end)
735
+ end
736
+ end
737
+ end
738
+
739
+ else
740
+ Tk::Tile::Label.new(tree,
741
+ :text=>'Treeview is supported on tile 0.5 or later...').pack
742
+ end
743
+
744
+ #
745
+ # Other demos:
746
+ #
747
+ $Timers = {:StateMonitor=>nil, :FocusMonitor=>nil}
748
+
749
+ begin
750
+ msg = Tk::Tile::Label.new(others, :justify=>:left, :wraplength=>300)
751
+ rescue
752
+ msg = TkMessage.new(others, :aspect=>200)
753
+ end
754
+
755
+ $Desc = {}
756
+
757
+ showDescription = TkBindTag.new
758
+ showDescription.bind('Enter', proc{|w| msg.text($Desc[w.path])}, '%W')
759
+ showDescription.bind('Leave', proc{|w| msg.text('')}, '%W')
760
+
761
+ [
762
+ [ :trackStates, "Widget states...",
763
+ "Display/modify widget state bits" ],
764
+
765
+ [ :scrollbarResizeDemo, "Scrollbar resize behavior...",
766
+ "Shows how Tile and standard scrollbars differ when they're sized too large" ],
767
+
768
+ [ :trackFocus, "Track keyboard focus..." ,
769
+ "Display the name of the widget that currently has focus" ],
770
+
771
+ [ :repeatDemo, "Repeating buttons...",
772
+ "Demonstrates custom classes (see demos/repeater.tcl)" ]
773
+
774
+ ].each{|demo_cmd, label, description|
775
+ b = Tk::Tile::Button.new(others, :text=>label,
776
+ :command=>proc{ self.__send__(demo_cmd) })
777
+ $Desc[b.path] = description
778
+ b.bindtags <<= showDescription
779
+
780
+ b.pack(:side=>:top, :expand=>false, :fill=>:x, :padx=>6, :pady=>6)
781
+ }
782
+
783
+ msg.pack(:side=>:bottom, :expand=>true, :fill=>:both)
784
+
785
+
786
+ #
787
+ # Scrollbar resize demo:
788
+ #
789
+ $scrollbars = nil
790
+
791
+ def scrollbarResizeDemo
792
+ if $scrollbars
793
+ begin
794
+ $scrollbars.destroy
795
+ rescue
796
+ end
797
+ end
798
+ $scrollbars = TkToplevel.new(:title=>'Scrollbars', :geometry=>'200x200')
799
+ f = TkFrame.new($scrollbars, :height=>200)
800
+ tsb = Tk::Tile::Scrollbar.new(f, :command=>proc{|*args| sbstub(tsb, *args)})
801
+ sb = TkScrollbar.new(f, :command=>proc{|*args| sbstub(sb, *args)})
802
+ Tk.grid(tsb, sb, :sticky=>:news)
803
+
804
+ sb.set(0, 0.5) # prevent backwards-compatibility mode for old SB
805
+
806
+ f.grid_columnconfigure(0, :weight=>1)
807
+ f.grid_columnconfigure(1, :weight=>1)
808
+ f.grid_rowconfigure(0, :weight=>1)
809
+
810
+ f.pack(:expand=>true, :fill=>:both)
811
+ end
812
+
813
+ #
814
+ # Track focus demo:
815
+ #
816
+ $FocusInf = TkVariable.new_hash
817
+ $focus = nil
818
+
819
+ def trackFocus
820
+ if $focus
821
+ begin
822
+ $focus.destroy
823
+ rescue
824
+ end
825
+ end
826
+ $focus = TkToplevel.new(:title=>'Keyboard focus')
827
+ i = 0
828
+ [
829
+ ["Focus widget:", :Widget],
830
+ ["Class:", :WidgetClass],
831
+ ["Next:", :WidgetNext],
832
+ ["Grab:", :Grab],
833
+ ["Status:", :GrabStatus]
834
+ ].each{|label, var_index|
835
+ Tk.grid(Tk::Tile::Label.new($focus, :text=>label, :anchor=>:e),
836
+ Tk::Tile::Label.new($focus,
837
+ :textvariable=>$FocusInf.ref(var_index),
838
+ :width=>40, :anchor=>:w, :relief=>:groove),
839
+ :sticky=>:ew)
840
+ i += 1
841
+ }
842
+ $focus.grid_columnconfigure(1, :weight=>1)
843
+ $focus.grid_rowconfigure(i, :weight=>1)
844
+
845
+ $focus.bind('Destroy', proc{Tk.after_cancel($Timers[:FocusMonitor])})
846
+ focusMonitor
847
+ end
848
+
849
+ def focusMonitor
850
+ $FocusInf[:Widget] = focus_win = Tk.focus
851
+ if focus_win
852
+ $FocusInf[:WidgetClass] = focus_win.winfo_classname
853
+ $FocusInf[:WidgetNext] = Tk.focus_next(focus_win)
854
+ else
855
+ $FocusInf[:WidgetClass] = $FocusInf[:WidgetNext] = ''
856
+ end
857
+
858
+ $FocusInf[:Grab] = grab_wins = Tk.current_grabs
859
+ unless grab_wins.empty?
860
+ $FocusInf[:GrabStatus] = grab_wins[0].grab_status
861
+ else
862
+ $FocusInf[:GrabStatus] = ''
863
+ end
864
+
865
+ $Timers[:FocusMonitor] = Tk.after(200, proc{ focusMonitor() })
866
+ end
867
+
868
+ #
869
+ # Widget state demo:
870
+ #
871
+ $Widget = TkVariable.new
872
+
873
+ TkBindTag::ALL.bind('Control-Shift-ButtonPress-1',
874
+ proc{|w|
875
+ $Widget.value = w
876
+ updateStates()
877
+ Tk.callback_break
878
+ }, '%W')
879
+ $states_list = %w(active disabled focus pressed selected
880
+ background indeterminate invalid default)
881
+ $states_btns = {}
882
+ $states = nil
883
+
884
+ $State = TkVariable.new_hash
885
+
886
+ def trackStates
887
+ if $states
888
+ begin
889
+ $state.destroy
890
+ rescue
891
+ end
892
+ end
893
+ $states = TkToplevel.new(:title=>'Widget states')
894
+
895
+ l_inf = Tk::Tile::Label.new($states, :text=>"Press Control-Shift-Button-1 on any widget")
896
+
897
+ l_lw = Tk::Tile::Label.new($states, :text=>'Widget:',
898
+ :anchor=>:e, :relief=>:groove)
899
+ l_w = Tk::Tile::Label.new($states, :textvariable=>$Widget,
900
+ :anchor=>:w, :relief=>:groove)
901
+
902
+ Tk.grid(l_inf, '-', :sticky=>:ew, :padx=>6, :pady=>6)
903
+ Tk.grid(l_lw, l_w, :sticky=>:ew)
904
+
905
+ $states_list.each{|st|
906
+ cb = Tk::Tile::Checkbutton.new($states, :text=>st,
907
+ :variable=>$State.ref(st),
908
+ :command=>proc{ changeState(st) })
909
+ $states_btns[st] = cb
910
+ Tk.grid('x', cb, :sticky=>:nsew)
911
+ }
912
+
913
+ $states.grid_columnconfigure(1, :weight=>1)
914
+
915
+ f_cmd = Tk::Tile::Frame.new($states)
916
+ Tk.grid('x', f_cmd, :sticky=>:nse)
917
+
918
+ b_close = Tk::Tile::Button.new(f_cmd, :text=>'Close',
919
+ :command=>proc{ $states.destroy })
920
+ Tk.grid('x', b_close, :padx=>4, :pady=>[6,4])
921
+ f_cmd.grid_columnconfigure(0, :weight=>1)
922
+
923
+ $states.bind('KeyPress-Escape', proc{Tk.event_generate(b_close, '<Invoke>')})
924
+
925
+ $states.bind('Destroy', proc{Tk.after_cancel($Timers[:StateMonitor])})
926
+ stateMonitor()
927
+ end
928
+
929
+ def stateMonitor
930
+ updateStates() if $Widget.value != ''
931
+ $Timers[:StateMonitor] = Tk.after(200, proc{ stateMonitor() })
932
+ end
933
+
934
+ def updateStates
935
+ $states_list.each{|st|
936
+ begin
937
+ $State[st] = $Widget.window.ttk_instate(st)
938
+ rescue
939
+ $states_btns[st].ttk_state('disabled')
940
+ else
941
+ $states_btns[st].ttk_state('!disabled')
942
+ end
943
+ }
944
+ end
945
+
946
+ def changeState(st)
947
+ if $Widget.value != ''
948
+ if $State.bool_element(st)
949
+ $Widget.window.ttk_state(st)
950
+ else
951
+ $Widget.window.ttk_state("!#{st}")
952
+ end
953
+ end
954
+ end
955
+
956
+ #
957
+ # Repeating buttons demo:
958
+ #
959
+ def repeatDemo
960
+ if defined?($repeatDemo) && $repeatDemo.exist?
961
+ $repeatDemo.deiconify; return
962
+ end
963
+ $repeatDemo = TkToplevel.new(:title=>'Repeating button')
964
+
965
+ f = Tk::Tile::Frame.new($repeatDemo)
966
+ b = Tk::Tile::Button.new(f, :class=>'Repeater', :text=>'Press and hold')
967
+ if version?('0.6')
968
+ p = Tk::Tile::Progressbar.new(f, :orient=>:horizontal, :maximum=>10)
969
+ else # progressbar is not supported
970
+ p = Tk::Tile::Progress.new(f, :orient=>:horizontal, :from=>0, :to=>10)
971
+ def p.step
972
+ i = self.get + 1
973
+ i = self.from if i > self.to
974
+ self.set(i)
975
+ end
976
+ end
977
+ b.command {p.step}
978
+
979
+ b.pack(:side=>:left, :expand=>false, :fill=>:none, :padx=>6, :pady=>6)
980
+ p.pack(:side=>:right, :expand=>true, :fill=>:x, :padx=>6, :pady=>6)
981
+ f.pack(:expand=>true, :fill=>:both)
982
+ end
983
+
984
+ Tk.mainloop