Module | TkPalette |
In: |
tk/lib/tk/palette.rb
|
TkCommandNames | = | [ 'tk_setPalette'.freeze, 'tk_bisque'.freeze, 'tkDarken'.freeze |
# File tk/lib/tk/palette.rb, line 29 def TkPalette.darken(color, percent) tk_call('tkDarken', color, percent) end
# File tk/lib/tk/palette.rb, line 33 def TkPalette.recolorTree(win, colors) if not colors.kind_of?(Hash) fail "2nd arg need to be Hash" end tk_call('global', "tkPalette") colors.each{|key, value| begin if win.cget(key) == tk_call('set', "tkPalette(#{key})") win[key] = colors[key] end rescue # ignore end } TkWinfo.children(win).each{|w| TkPalette.recolorTree(w, colors)} end
# File tk/lib/tk/palette.rb, line 17 def TkPalette.set(*args) args = args.to_a.flatten if args.kind_of? Hash tk_call('tk_setPalette', *args) end