Class: ATkTileStyle
Defined Under Namespace
Classes: TkTileStyle
Instance Attribute Summary
Attributes inherited from AGINTk
Attributes inherited from AG
#ag_parent, #i_ag, #i_name, #obj, #obj_class, #persistent, #props, #props_def, #props_kinds, #renderer, #sniffer, #sons
Class Method Summary collapse
Instance Method Summary collapse
Methods inherited from AGINTk
#initialize, #new_graphic_rappresentation, #new_object, #object_inspector_select, #update
Methods inherited from AG
#activate, active, #add_require, #build_sons, class_renderer, class_sniffer, #defaults, #defaults_values, #del_require, #delete, #fill_defaults_value_from_agobj, #getControlClassName, #getFileName, #getInstanceClass, #getObjClass, #getViewClassName, #get_implementation_block, #get_implementation_code, #get_implementation_new, #get_path_i_name, #has_sons, #initialize, near_class_wrapped, near_class_wrapper, #new_id, #new_object, #passed_object, #publish, #publish_def, #publish_del, #publish_mod, publish_property, #register, #retrive_values, #select, #start_properties, #update_property
Constructor Details
This class inherits a constructor from AGINTk
Class Method Details
.class_wrapped ⇒ Object
136 137 138 |
# File 'ext/ae-rad/lib/tkext/al-tile.rb', line 136 def ATkTileStyle.class_wrapped TkTileStyle end |
Instance Method Details
#properties ⇒ Object
139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 |
# File 'ext/ae-rad/lib/tkext/al-tile.rb', line 139 def properties super publish('property','name'=>'theme', 'get'=> proc{}, 'set'=> proc{|j| @obj.style.theme_use(j)}, 'def'=> "", 'type'=> EnumType.new(@obj.style.theme_names) ) publish('property','name'=>'foreground', 'get'=> proc{}, 'set'=> proc{|foreground| @obj.style.configure('foreground'=>foreground)}, 'def'=> '', 'type'=> TkType::TkagColor ) end |