Class: TkApplication

Inherits:
Application show all
Defined in:
lib/a-tkcommons.rb

Direct Known Subclasses

Arcadia

Instance Attribute Summary collapse

Instance Method Summary collapse

Methods inherited from Application

#[], #[]=, conf, conf_group, #create, instance, #load_local_config, #load_theme, #local_dir, #objects, #prepare, #publish

Methods included from EventBus

#attach_listener, #broadcast_event, #detach_listener, #process_event

Methods included from Persistable

#append_persistent_property, #override_persistent

Methods included from Configurable

#properties_file2hash, properties_group, #resolve_link, #resolve_properties_link

Constructor Details

#initialize(_application_params) ⇒ TkApplication

Returns a new instance of TkApplication.



11
12
13
14
# File 'lib/a-tkcommons.rb', line 11

def initialize(_application_params)
  super(_application_params)
  @tcltk_info = TclTkInfo.new
end

Instance Attribute Details

#tcltk_infoObject (readonly)

Returns the value of attribute tcltk_info.



10
11
12
# File 'lib/a-tkcommons.rb', line 10

def tcltk_info
  @tcltk_info
end

Instance Method Details

#runObject



20
21
22
23
# File 'lib/a-tkcommons.rb', line 20

def run
  Tk.appname(self['applicationParams'].name)
  Tk.mainloop
end

#sys_infoObject



16
17
18
# File 'lib/a-tkcommons.rb', line 16

def sys_info
 "#{super} [TclTk version = #{tcltk_info.level}]"
end