lib/ruby-1.9.1-rc1/ext/tk/lib/tkextlib/iwidgets/scrolledhtml.rb

   1 #
   2 #  tkextlib/iwidgets/scrolledhtml.rb
   3 #                               by Hidetoshi NAGAI (nagai@ai.kyutech.ac.jp)
   4 #
   5
   6 require 'tk'
   7 require 'tkextlib/iwidgets.rb'
   8
   9 module Tk
  10   module Iwidgets
  11     class Scrolledhtml < Tk::Iwidgets::Scrolledtext
  12     end
  13   end
  14 end
  15
  16 class Tk::Iwidgets::Scrolledhtml
  17   TkCommandNames = ['::iwidgets::scrolledhtml'.freeze].freeze
  18   WidgetClassName = 'Scrolledhtml'.freeze
  19   WidgetClassNames[WidgetClassName] = self
  20
  21   def __boolval_optkeys
  22     super() << 'update'
  23   end
  24   private :__boolval_optkeys
  25
  26   def __strval_optkeys
  27     super() << 'fontname' << 'link' << 'alink' << 'textbackground'
  28   end
  29   private :__strval_optkeys
  30
  31   def __font_optkeys
  32     super() << 'fixedfont'
  33   end
  34   private :__font_optkeys
  35
  36   def import(href)
  37     tk_call(@path, 'import', href)
  38     self
  39   end
  40
  41   def import_link(href)
  42     tk_call(@path, 'import', '-link', href)
  43     self
  44   end
  45
  46   def pwd
  47     tk_call(@path, 'pwd')
  48   end
  49
  50   def render(htmltext, workdir=None)
  51     tk_call(@path, 'render', htmltext, workdir)
  52     self
  53   end
  54
  55   def title
  56     tk_call(@path, 'title')
  57   end
  58 end