Class: ArcadiaLayout
- Inherits:
-
Object
- Object
- ArcadiaLayout
- Defined in:
- lib/a-core.rb
Constant Summary collapse
- HIDDEN_DOMAIN =
'-1.-1'
Instance Attribute Summary collapse
-
#base_frame ⇒ Object
readonly
include Observable ArcadiaPanelInfo = Struct.new( “ArcadiaPanelInfo”, :name, :title, :frame, :ffw ).
Instance Method Summary collapse
- #[](_row, _col) ⇒ Object
- #add_cols(_row, _col, _width, _left_name = nil, _right_name = nil) ⇒ Object
- #add_cols_perc(_row, _col, _width, _left_name = nil, _right_name = nil) ⇒ Object
- #add_cols_runtime(_domain) ⇒ Object
- #add_commons_menu_items(_domain, _menu) ⇒ Object
- #add_float_frame(_args = nil) ⇒ Object
- #add_headers ⇒ Object
- #add_mono_panel(_name = nil) ⇒ Object
- #add_rows(_row, _col, _height, _top_name = nil, _bottom_name = nil) ⇒ Object
- #add_rows_perc(_row, _col, _height, _top_name = nil, _bottom_name = nil) ⇒ Object
- #add_rows_runtime(_domain) ⇒ Object
-
#all_domains(_frame) ⇒ Object
def others_domains(_frame, _vertical=true) if _vertical splitter_adapter_class = AGTkVSplittedFrames else splitter_adapter_class = AGTkOSplittedFrames end splitted_adapter = find_splitted_frame(_frame) consider_it = splitted_adapter.instance_of?(splitter_adapter_class) && splitted_adapter.frame1 == _frame if splitted_adapter && !consider_it && splitted_adapter != _frame rif_frame = splitted_adapter.frame ret = others_domains(rif_frame) elsif splitted_adapter && consider_it ret = domains_on_frame(splitted_adapter.frame2) else ret = Array.new end ret end.
- #all_domains_cols(_frame) ⇒ Object
- #all_domains_rows(_frame) ⇒ Object
- #autotab? ⇒ Boolean
- #build_invert_menu(refresh_commons_items = false) ⇒ Object
- #build_titled_frame(domain) ⇒ Object
- #change_domain(_target_domain, _source_name) ⇒ Object
-
#close_runtime(_domain) ⇒ Object
–.
-
#domain(_domain_name) ⇒ Object
def domain_for_frame(_domain_name, _name) domain(@panels[‘sons’].domain) end.
- #domain_name(_row, _col) ⇒ Object
- #domain_root_frame(_domain_name) ⇒ Object
- #domains ⇒ Object
- #domains_cols(_domains) ⇒ Object
- #domains_on_frame(_frame) ⇒ Object
- #domains_on_frame_cols(_frame) ⇒ Object
- #domains_on_frame_rows(_frame) ⇒ Object
- #domains_on_splitter(_splitter) ⇒ Object
- #domains_on_splitter_cols(_splitter) ⇒ Object
- #domains_on_splitter_rows(_splitter) ⇒ Object
- #domains_rows(_domains) ⇒ Object
- #dump_geometry(_r = 0, _c = 0, _frame = root) ⇒ Object
- #dump_splitter(_splitter) ⇒ Object
- #find_splitted_frame(_start_frame) ⇒ Object
- #frame(_domain_name, _name) ⇒ Object
- #gap_domain_column(_r, _c, _dom) ⇒ Object
- #gap_domain_row(_r, _c, _dom) ⇒ Object
- #get_hinner_frame(_frame) ⇒ Object
- #headed? ⇒ Boolean
- #hide_panel ⇒ Object
-
#initialize(_arcadia, _frame, _autotab = true) ⇒ ArcadiaLayout
constructor
A new instance of ArcadiaLayout.
- #max_col(_domains, _row) ⇒ Object
- #max_row(_domains, _col) ⇒ Object
- #menu_item_add(_menu, _dom, _ffw, _is_plus = false) ⇒ Object
- #menu_item_exist?(_menu, _name) ⇒ Boolean
- #process_frame(_ffw) ⇒ Object
- #raise_panel(_domain, _extension) ⇒ Object
- #raised?(_domain, _name) ⇒ Boolean
- #raised_fixed_frame(_domain) ⇒ Object
- #raised_name(_domain) ⇒ Object
- #registed?(_domain_name, _name) ⇒ Boolean
- #register_panel(_ffw, _adapter = nil) ⇒ Object
- #registered_panel?(_ffw) ⇒ Boolean
- #root ⇒ Object
- #shift_bottom(_row, _col) ⇒ Object
- #shift_domain_column(_r, _c, _dom) ⇒ Object
- #shift_domain_row(_r, _c, _dom) ⇒ Object
- #shift_left(_row, _col) ⇒ Object
- #shift_right(_row, _col) ⇒ Object
- #shift_top(_row, _col) ⇒ Object
-
#sorted_menu_index(_menu, _label) ⇒ Object
def change_domain_old(_dom1, _dom2, _name2) tt1= @panels[‘root’].top_text tt2= @panels[‘root’].top_text if @panels[‘sons’].length ==1 && @panels[‘sons’].length > 0 # change —— ffw1 = raised_fixed_frame(_dom1) ffw2 = @panels[‘sons’].values unregister_panel(ffw1,false,false) if ffw1 unregister_panel(ffw2,false,false) ffw1.domain = _dom2 if ffw1 ffw2.domain = _dom1 register_panel(ffw1, ffw1.hinner_frame) if ffw1 register_panel(ffw2, ffw2.hinner_frame) @panels[‘root’].top_text(tt2) @panels[‘root’].top_text(tt1) elsif @panels[‘sons’].length > 1 ffw2 = @panels[‘sons’] unregister_panel(ffw2, false, false) ffw2.domain = _dom1 register_panel(ffw2, ffw2.hinner_frame) @panels[‘root’].top_text(tt2) @panels[‘root’].top_text(”) end # refresh —– build_invert_menu end.
- #splitter_frame_on_frame(_frame) ⇒ Object
-
#unbuild_titled_frame(domain) ⇒ Object
–.
- #unregister_panel(_ffw, delete_wrapper = true, refresh_menu = true) ⇒ Object
- #view_panel ⇒ Object
Constructor Details
#initialize(_arcadia, _frame, _autotab = true) ⇒ ArcadiaLayout
Returns a new instance of ArcadiaLayout.
2562 2563 2564 2565 2566 2567 2568 2569 2570 2571 2572 2573 2574 2575 2576 2577 2578 2579 2580 2581 2582 2583 2584 2585 2586 2587 2588 2589 |
# File 'lib/a-core.rb', line 2562 def initialize(_arcadia, _frame, _autotab=true) @arcadia = _arcadia @frames = Array.new @frames[0] = Array.new @base_frame = _frame @content_frame = TkFrame.new(_frame).pack('fill'=>'both', :padx=>0, :pady=>0, :expand => 'yes') # @dialog_frame = TkFrame.new(_frame) @frames[0][0] = @content_frame # @domains = Array.new # @domains[0] = Array.new # @domains[0][0] = '_domain_root_' @panels = Hash.new @panels['_domain_root_']= Hash.new @panels['_domain_root_']['root']= @content_frame @panels['_domain_root_']['sons'] = Hash.new @panels['_domain_root_'][:raised_stack] = [] @panels['nil'] = Hash.new @panels['nil']['root'] = TkTitledFrameAdapter.new(self.root) @autotab = _autotab @headed = false @wrappers=Hash.new @splitters=Array.new @tabbed = Arcadia.conf('layout.tabbed')=='true' end |
Instance Attribute Details
#base_frame ⇒ Object (readonly)
include Observable
ArcadiaPanelInfo = Struct.new( "ArcadiaPanelInfo",
:name,
:title,
:frame,
:ffw
)
2560 2561 2562 |
# File 'lib/a-core.rb', line 2560 def base_frame @base_frame end |
Instance Method Details
#[](_row, _col) ⇒ Object
3755 3756 3757 |
# File 'lib/a-core.rb', line 3755 def [](_row, _col) @frames[_row][_col] end |
#add_cols(_row, _col, _width, _left_name = nil, _right_name = nil) ⇒ Object
2909 2910 2911 |
# File 'lib/a-core.rb', line 2909 def add_cols(_row,_col, _width, _left_name=nil, _right_name=nil) _prepare_cols(_row,_col, _width, false, _left_name, _right_name) end |
#add_cols_perc(_row, _col, _width, _left_name = nil, _right_name = nil) ⇒ Object
2913 2914 2915 |
# File 'lib/a-core.rb', line 2913 def add_cols_perc(_row,_col, _width, _left_name=nil, _right_name=nil) _prepare_cols(_row,_col, _width, true, _left_name, _right_name) end |
#add_cols_runtime(_domain) ⇒ Object
2917 2918 2919 2920 2921 2922 2923 2924 2925 2926 2927 2928 2929 2930 2931 2932 2933 2934 2935 2936 2937 2938 2939 2940 2941 2942 2943 |
# File 'lib/a-core.rb', line 2917 def add_cols_runtime(_domain) saved_root_splitted_frames = @panels[_domain]['root_splitted_frames'] _saved = Hash.new _saved.update(@panels[_domain]['sons']) _saved.each_key{|name| @panels['nil']['root'].change_adapters(name, @panels[_domain]['root'].transient_frame_adapter[name]) } geometry = TkWinfo.geometry(@panels[_domain]['root']) width = geometry.split('x')[0].to_i/2 _saved.each{|name,ffw| unregister_panel(ffw, false, false) } unbuild_titled_frame(_domain) _row,_col = _domain.split('.') add_cols(_row.to_i,_col.to_i, width) build_titled_frame(_domain) build_titled_frame(domain_name(_row.to_i,_col.to_i+1)) _saved.each{|name,ffw| ffw.domain = _domain register_panel(ffw, ffw.hinner_frame) @panels[_domain]['root'].change_adapters(name, @panels['nil']['root'].transient_frame_adapter[name]) } if saved_root_splitted_frames @panels[_domain]['root_splitted_frames']=saved_root_splitted_frames end (true) end |
#add_commons_menu_items(_domain, _menu) ⇒ Object
3206 3207 3208 3209 3210 3211 3212 3213 3214 3215 3216 3217 3218 3219 3220 3221 3222 3223 3224 3225 3226 3227 3228 3229 3230 3231 3232 |
# File 'lib/a-core.rb', line 3206 def (_domain, ) .insert('end', :separator) .insert('end', :command, :label=>"add column", :image=>Arcadia.image_res(ADD_GIF), :compound=>'left', :command=>proc{add_cols_runtime(_domain)}, :hidemargin => true ) .insert('end', :command, :label=>"add row", :image=>Arcadia.image_res(ADD_GIF), :compound=>'left', :command=>proc{add_rows_runtime(_domain)}, :hidemargin => true ) if @panels.keys.length > 2 .insert('end', :command, :label=>"close", :image=>Arcadia.image_res(CLOSE_FRAME_GIF), :compound=>'left', :command=>proc{close_runtime(_domain)}, :hidemargin => true ) end end |
#add_float_frame(_args = nil) ⇒ Object
3775 3776 3777 3778 3779 3780 3781 3782 3783 |
# File 'lib/a-core.rb', line 3775 def add_float_frame(_args=nil) if _args.nil? _args = {'x'=>10, 'y'=>10, 'width'=>100, 'height'=>100} end _frame = TkFloatTitledFrame.new(root) _frame.on_close=proc{_frame.hide} _frame.place(_args) return _frame end |
#add_headers ⇒ Object
3291 3292 3293 3294 3295 3296 3297 3298 3299 3300 3301 3302 3303 3304 |
# File 'lib/a-core.rb', line 3291 def add_headers @panels.keys.each{|dom| if dom != '_domain_root_' && @panels[dom] && @panels[dom]['root'] build_titled_frame(dom) end } # @domains.each{|row| # row.each{|domain| # build_titled_frame(domain) # } # } @headed = true end |
#add_mono_panel(_name = nil) ⇒ Object
2716 2717 2718 2719 2720 2721 2722 2723 |
# File 'lib/a-core.rb', line 2716 def add_mono_panel(_name=nil) if (@frames[0][0] != nil) _name = '0.0' if _name.nil? @panels[_name] = Hash.new @panels[_name]['root'] = @frames[0][0] @panels[_name]['sons'] = Hash.new end end |
#add_rows(_row, _col, _height, _top_name = nil, _bottom_name = nil) ⇒ Object
2725 2726 2727 |
# File 'lib/a-core.rb', line 2725 def add_rows(_row,_col, _height, _top_name=nil, _bottom_name=nil) _prepare_rows(_row,_col, _height, false, _top_name, _bottom_name) end |
#add_rows_perc(_row, _col, _height, _top_name = nil, _bottom_name = nil) ⇒ Object
2729 2730 2731 |
# File 'lib/a-core.rb', line 2729 def add_rows_perc(_row,_col, _height, _top_name=nil, _bottom_name=nil) _prepare_rows(_row,_col, _height, true, _top_name, _bottom_name) end |
#add_rows_runtime(_domain) ⇒ Object
2945 2946 2947 2948 2949 2950 2951 2952 2953 2954 2955 2956 2957 2958 2959 2960 2961 2962 2963 2964 2965 2966 2967 2968 2969 2970 2971 |
# File 'lib/a-core.rb', line 2945 def add_rows_runtime(_domain) saved_root_splitted_frames = @panels[_domain]['root_splitted_frames'] _saved = Hash.new _saved.update(@panels[_domain]['sons']) _saved.each_key{|name| @panels['nil']['root'].change_adapters(name, @panels[_domain]['root'].transient_frame_adapter[name]) } geometry = TkWinfo.geometry(@panels[_domain]['root']) height = geometry.split('+')[0].split('x')[1].to_i/2 _saved.each{|name,ffw| unregister_panel(ffw, false, false) } unbuild_titled_frame(_domain) _row,_col = _domain.split('.') add_rows(_row.to_i,_col.to_i, height) build_titled_frame(_domain) build_titled_frame(domain_name(_row.to_i+1,_col.to_i)) _saved.each{|name,ffw| ffw.domain = _domain register_panel(ffw, ffw.hinner_frame) @panels[_domain]['root'].change_adapters(name, @panels['nil']['root'].transient_frame_adapter[name]) } if saved_root_splitted_frames @panels[_domain]['root_splitted_frames']=saved_root_splitted_frames end (true) end |
#all_domains(_frame) ⇒ Object
def others_domains(_frame, _vertical=true)
if _vertical
splitter_adapter_class = AGTkVSplittedFrames
else
splitter_adapter_class = AGTkOSplittedFrames
end
splitted_adapter = find_splitted_frame(_frame)
consider_it = splitted_adapter.instance_of?(splitter_adapter_class) && splitted_adapter.frame1 == _frame
if splitted_adapter && !consider_it && splitted_adapter != _frame
rif_frame = splitted_adapter.frame
ret = others_domains(rif_frame)
elsif splitted_adapter && consider_it
ret = domains_on_frame(splitted_adapter.frame2)
else
ret = Array.new
end
ret
end
2752 2753 2754 2755 2756 2757 2758 2759 2760 2761 |
# File 'lib/a-core.rb', line 2752 def all_domains(_frame) splitted_adapter = find_splitted_frame(_frame) consider_it = splitted_adapter.kind_of?(AGTkSplittedFrames) if consider_it ret = domains_on_frame(splitted_adapter.frame2).concat(domains_on_frame(splitted_adapter.frame1)) else ret = Array.new end ret end |
#all_domains_cols(_frame) ⇒ Object
2763 2764 2765 2766 2767 2768 2769 2770 |
# File 'lib/a-core.rb', line 2763 def all_domains_cols(_frame) ret = Array.new all_domains(_frame).each{|d| v = d.split('.')[1] ret << v if !ret.include?(v) } ret end |
#all_domains_rows(_frame) ⇒ Object
2772 2773 2774 2775 2776 2777 2778 2779 |
# File 'lib/a-core.rb', line 2772 def all_domains_rows(_frame) ret = Array.new all_domains(_frame).each{|d| v = d.split('.')[0] ret << v if !ret.include?(v) } ret end |
#autotab? ⇒ Boolean
3310 3311 3312 |
# File 'lib/a-core.rb', line 3310 def autotab? @autotab end |
#build_invert_menu(refresh_commons_items = false) ⇒ Object
3539 3540 3541 3542 3543 3544 3545 3546 3547 3548 3549 3550 3551 3552 3553 3554 3555 3556 3557 3558 3559 3560 3561 3562 3563 3564 3565 3566 3567 3568 3569 3570 3571 3572 3573 3574 3575 3576 3577 3578 3579 3580 3581 3582 3583 |
# File 'lib/a-core.rb', line 3539 def (refresh_commons_items=false) #p " ***build_invert_menu" @panels.keys.each{|dom| if dom != '_domain_root_' && @panels[dom] && @panels[dom]['root'] titledFrame = @panels[dom]['root'] if titledFrame.instance_of?(TkTitledFrameAdapter) #menu = titledFrame.menu_button('ext').cget('menu') = titledFrame. if refresh_commons_items #@panels[dom]['root'].menu_button('ext').cget('menu').delete('0','end') @panels[dom]['root']..delete('0','end') (dom, ) else index = .index('end').to_i if @tabbed if @panels.keys.length > 2 i=index-4 else i=index-3 end else if @panels.keys.length > 2 i=index-4 else i=index-3 end end if i >= 0 end_index = i.to_s #@panels[dom]['root'].menu_button('ext').cget('menu').delete('0',end_index) @panels[dom]['root']..delete('0',end_index) end end # index = menu.index('end').to_i # @panels[dom]['root'].menu_button('ext').cget('menu').delete('2','end') if index > 1 end end } @wrappers.each{|name,ffw| process_frame(ffw) #if ffw.domain } end |
#build_titled_frame(domain) ⇒ Object
def title_titled_frame(_domain, _text)
mb = @panels[_domain]['root'].menu_button('ext') if @panels[_domain]
if mb
#mb.configure('text'=>_text)
mb.cget('textvariable').value=_text
p "configuro #{_text}"
end
end
3243 3244 3245 3246 3247 3248 3249 3250 3251 3252 3253 3254 3255 3256 3257 3258 3259 3260 3261 3262 3263 3264 3265 3266 3267 3268 3269 3270 3271 3272 3273 3274 3275 3276 3277 3278 3279 |
# File 'lib/a-core.rb', line 3243 def build_titled_frame(domain) if @panels[domain] tframe = TkTitledFrameAdapter.new(@panels[domain]['root']).place('x'=>0, 'y'=>0,'relheight'=>1, 'relwidth'=>1) # mb = tframe.add_fixed_menu_button('ext') # mb = tframe.add_fixed_menu_button( # 'ext', # nil, # 'left', # {'relief'=>:flat, # 'borderwidth'=>1, # 'compound'=> 'left', # 'anchor'=>'w', # 'activebackground'=>Arcadia.conf('titlelabel.background'), # 'foreground' => Arcadia.conf('titlecontext.foreground'), # 'textvariable'=> TkVariable.new('') # }) # add commons item # menu = mb.cget('menu') = tframe. (domain, ) @panels[domain]['root']= tframe #----------------------------------- # class << tframe # def set_domain(_domain) # if @label_domain.nil? # @label_domail = TkLabel.new(self.frame, 'text'=>_domain).pack # else # @label_domain.configure('text'=>_domain) # end # end # end # tframe.set_domain(domain) #----------------------------------- end end |
#change_domain(_target_domain, _source_name) ⇒ Object
3318 3319 3320 3321 3322 3323 3324 3325 3326 3327 3328 3329 3330 3331 3332 3333 3334 3335 3336 3337 3338 3339 3340 3341 3342 3343 3344 3345 3346 3347 3348 3349 3350 3351 3352 3353 3354 3355 3356 3357 3358 |
# File 'lib/a-core.rb', line 3318 def change_domain(_target_domain, _source_name) source_domain = @wrappers[_source_name].domain source_has_domain = !source_domain.nil? if @arcadia.conf('layout.exchange_panel_if_no_tabbed')=='true' && source_has_domain && @panels[source_domain]['sons'].length ==1 && @panels[_target_domain]['sons'].length > 0 # change ------ ffw1 = raised_fixed_frame(_target_domain) ffw2 = @panels[source_domain]['sons'].values[0] unregister_panel(ffw1,false,false) if ffw1 unregister_panel(ffw2,false,false) ffw1.domain = source_domain if ffw1 ffw2.domain = _target_domain register_panel(ffw1, ffw1.hinner_frame) if ffw1 register_panel(ffw2, ffw2.hinner_frame) @panels[_target_domain]['root'].(ffw2.name, @panels[source_domain]['root'].(ffw2.name), @panels[source_domain]['root'].(ffw2.name)) @panels[source_domain]['root'].(ffw1.name, @panels[_target_domain]['root'].(ffw1.name), @panels[_target_domain]['root'].(ffw1.name)) @panels[_target_domain]['root'].(ffw2.name) @panels[source_domain]['root'].(ffw1.name) @panels[_target_domain]['root'].change_adapters(ffw2.name, @panels[source_domain]['root'].forge_transient_adapter(ffw2.name)) @panels[source_domain]['root'].change_adapters(ffw1.name, @panels[_target_domain]['root'].forge_transient_adapter(ffw1.name)) elsif source_has_domain && @panels[source_domain]['sons'].length >= 1 ffw2 = @panels[source_domain]['sons'][_source_name] unregister_panel(ffw2, false, false) ffw2.domain = _target_domain register_panel(ffw2, ffw2.hinner_frame) @panels[_target_domain]['root'].(ffw2.name, @panels[source_domain]['root'].(ffw2.name), @panels[source_domain]['root'].(ffw2.name)) @panels[_target_domain]['root'].(ffw2.name) @panels[_target_domain]['root'].change_adapters(ffw2.name, @panels[source_domain]['root'].forge_transient_adapter(ffw2.name)) elsif !source_has_domain ffw2 = @wrappers[_source_name] ffw2.domain = _target_domain register_panel(ffw2, ffw2.hinner_frame) if @panels['nil']['root'].transient_frame_adapter[ffw2.name] @panels[ffw2.domain]['root'].change_adapters(ffw2.name, @panels['nil']['root'].transient_frame_adapter[ffw2.name]) end #@panels[_target_domain]['root'].top_text('') end # refresh ----- Tk.update LayoutChangedDomainEvent.new(self, 'old_domain'=>source_domain, 'new_domain'=>_target_domain).go! end |
#close_runtime(_domain) ⇒ Object
–
3104 3105 3106 3107 3108 3109 3110 3111 3112 3113 3114 3115 3116 3117 3118 3119 3120 3121 3122 3123 3124 3125 3126 3127 3128 3129 3130 3131 3132 3133 3134 3135 3136 3137 3138 3139 3140 3141 3142 3143 3144 3145 3146 3147 3148 3149 3150 3151 3152 3153 3154 3155 3156 3157 3158 3159 3160 3161 3162 3163 3164 3165 3166 3167 3168 3169 3170 3171 3172 3173 3174 3175 3176 3177 3178 3179 3180 3181 3182 3183 3184 3185 3186 3187 3188 3189 3190 3191 3192 3193 3194 |
# File 'lib/a-core.rb', line 3104 def close_runtime(_domain) splitted_adapter = find_splitted_frame(@panels[_domain]['root']) splitted_adapter_frame = splitted_adapter.frame vertical = splitted_adapter.instance_of?(AGTkVSplittedFrames) _row, _col = _domain.split('.') if @frames[_row.to_i][_col.to_i] == splitted_adapter.frame1 other_ds = domains_on_frame(@panels[_domain]['splitted_frames'].frame2) elsif @frames[_row.to_i][_col.to_i] == splitted_adapter.frame2 other_ds = domains_on_frame(@panels[_domain]['splitted_frames'].frame1) end return if other_ds.nil? if other_ds.length == 1 other_domain = other_ds[0] elsif other_ds.length > 1 max = other_ds.length-1 j = 0 while j <= max if other_domain.nil? other_domain = other_ds[j] else r,c = other_domain.split('.') new_r,new_c = other_ds[j].split('.') if new_r.to_i < r.to_i || new_r.to_i == r.to_i && new_c.to_i < c.to_i other_domain = other_ds[j] end end j = j+1 end end _other_row, _other_col = other_domain.split('.') @panels[_domain]['sons'].each{|name,ffw| unregister_panel(ffw, false, false) } unbuild_titled_frame(_domain) if @panels[other_domain]['splitted_frames'] != @panels[_domain]['splitted_frames'] if @panels[other_domain]['root_splitted_frames'].frame == @panels[_domain]['splitted_frames'].frame1 || @panels[other_domain]['root_splitted_frames'].frame == @panels[_domain]['splitted_frames'].frame2 other_root_splitted_adapter = @panels[other_domain]['root_splitted_frames'] elsif @panels[other_domain]['splitted_frames'] other_root_splitted_adapter = @panels[other_domain]['splitted_frames'] end end @panels.delete(_domain) @frames[_row.to_i][_col.to_i] = nil # @domains[_row.to_i][_col.to_i] = nil if other_root_splitted_adapter if other_root_splitted_adapter != @panels[other_domain]['splitted_frames'] other_ds.each{|d| if @panels[d]['root_splitted_frames'] == splitted_adapter @panels[d]['root_splitted_frames']=other_root_splitted_adapter end } end other_root_splitted_adapter.detach_frame splitted_adapter.detach_frame @splitters.delete(splitted_adapter) splitted_adapter.destroy other_root_splitted_adapter.attach_frame(splitted_adapter_frame) else other_source_save = Hash.new other_source_save.update(@panels[other_domain]['sons']) if @panels[other_domain] other_source_save.each_key{|name| @panels['nil']['root'].change_adapters(name, @panels[other_domain]['root'].transient_frame_adapter[name]) } other_source_save.each{|name,ffw| unregister_panel(ffw, false, false) } splitted_adapter.detach_frame splitted_adapter.destroy @panels[other_domain]['root']=splitted_adapter_frame @frames[_other_row.to_i][_other_col.to_i] = splitted_adapter_frame build_titled_frame(other_domain) other_source_save.each{|name,ffw| ffw.domain = other_domain register_panel(ffw, ffw.hinner_frame) @panels[other_domain]['root'].change_adapters(name, @panels['nil']['root'].transient_frame_adapter[name]) } parent_splitted_adapter = find_splitted_frame(@panels[other_domain]['root']) if parent_splitted_adapter @panels[other_domain]['splitted_frames']=parent_splitted_adapter else @panels[other_domain]['splitted_frames']= nil end end (true) end |
#domain(_domain_name) ⇒ Object
def domain_for_frame(_domain_name, _name)
domain(@panels[_domain_name]['sons'][_name].domain)
end
3767 3768 3769 |
# File 'lib/a-core.rb', line 3767 def domain(_domain_name) @panels[_domain_name] end |
#domain_name(_row, _col) ⇒ Object
2819 2820 2821 |
# File 'lib/a-core.rb', line 2819 def domain_name(_row,_col) _row.to_s+'.'+_col.to_s end |
#domain_root_frame(_domain_name) ⇒ Object
3771 3772 3773 |
# File 'lib/a-core.rb', line 3771 def domain_root_frame(_domain_name) @panels[_domain_name]['root'].frame end |
#domains ⇒ Object
3281 3282 3283 3284 3285 3286 3287 3288 3289 |
# File 'lib/a-core.rb', line 3281 def domains ret = Array.new @panels.keys.each{|dom| if dom != '_domain_root_' && @panels[dom] && @panels[dom]['root'] ret << dom end } ret end |
#domains_cols(_domains) ⇒ Object
3019 3020 3021 3022 3023 3024 3025 3026 |
# File 'lib/a-core.rb', line 3019 def domains_cols(_domains) ret = Array.new _domains.each{|d| v = d.split('.')[1] ret << v if !ret.include?(v) } ret end |
#domains_on_frame(_frame) ⇒ Object
3060 3061 3062 3063 3064 3065 3066 3067 3068 3069 3070 3071 3072 3073 3074 3075 3076 3077 3078 3079 3080 3081 3082 3083 3084 3085 3086 3087 3088 3089 3090 3091 3092 3093 3094 |
# File 'lib/a-core.rb', line 3060 def domains_on_frame(_frame) ret_doms = Array.new frame_found = false @panels.keys.each{|dom| if dom != '_domain_root_' if (@panels[dom]['splitted_frames'] != nil && @panels[dom]['splitted_frames'].frame == _frame) || (@panels[dom]['root_splitted_frames'] != nil && @panels[dom]['root_splitted_frames'].frame == _frame) ret_doms.concat(domains_on_frame(@panels[dom]['splitted_frames'].frame1)) ret_doms.concat(domains_on_frame(@panels[dom]['splitted_frames'].frame2)) frame_found = true break elsif @panels[dom]['notebook'] != nil cfrs = TkWinfo.children(_frame) if cfrs && cfrs.length == 1 && cfrs[0].instance_of?(TkTitledFrameAdapter) && TkWinfo.parent(@panels[dom]['notebook'])== cfrs[0].frame ret_doms << dom frame_found = true end elsif @panels[dom]['root'].instance_of?(TkTitledFrameAdapter) && @panels[dom]['root'].parent == _frame ret_doms << dom frame_found = true end end } if !frame_found cfrs = TkWinfo.children(_frame) if cfrs && cfrs.length == 1 && cfrs[0].instance_of?(TkTitledFrameAdapter) @wrappers.each{|name, ffw| if ffw.hinner_frame.frame == cfrs[0].frame ret_doms << ffw.domain end } end end ret_doms end |
#domains_on_frame_cols(_frame) ⇒ Object
3029 3030 3031 3032 3033 3034 3035 3036 |
# File 'lib/a-core.rb', line 3029 def domains_on_frame_cols(_frame) ret = Array.new domains_on_frame(_frame).each{|d| v = d.split('.')[1] ret << v if !ret.include?(v) } ret end |
#domains_on_frame_rows(_frame) ⇒ Object
2973 2974 2975 2976 2977 2978 2979 2980 |
# File 'lib/a-core.rb', line 2973 def domains_on_frame_rows(_frame) ret = Array.new domains_on_frame(_frame).each{|d| v = d.split('.')[0] ret << v if !ret.include?(v) } ret end |
#domains_on_splitter(_splitter) ⇒ Object
3038 3039 3040 |
# File 'lib/a-core.rb', line 3038 def domains_on_splitter(_splitter) domains_on_frame(_splitter.frame1).concat(domains_on_frame(_splitter.frame2)) end |
#domains_on_splitter_cols(_splitter) ⇒ Object
3042 3043 3044 3045 3046 3047 3048 3049 |
# File 'lib/a-core.rb', line 3042 def domains_on_splitter_cols(_splitter) ret = Array.new domains_on_splitter(_splitter).each{|d| v = d.split('.')[1] ret << v if !ret.include?(v) } ret end |
#domains_on_splitter_rows(_splitter) ⇒ Object
3051 3052 3053 3054 3055 3056 3057 3058 |
# File 'lib/a-core.rb', line 3051 def domains_on_splitter_rows(_splitter) ret = Array.new domains_on_splitter(_splitter).each{|d| v = d.split('.')[0] ret << v if !ret.include?(v) } ret end |
#domains_rows(_domains) ⇒ Object
2982 2983 2984 2985 2986 2987 2988 2989 2990 2991 |
# File 'lib/a-core.rb', line 2982 def domains_rows(_domains) ret = Array.new if _domains _domains.each{|d| v = d.split('.')[0] ret << v if !ret.include?(v) } end ret end |
#dump_geometry(_r = 0, _c = 0, _frame = root) ⇒ Object
3868 3869 3870 3871 3872 3873 3874 3875 3876 3877 3878 3879 3880 3881 3882 3883 3884 3885 3886 3887 3888 3889 3890 3891 3892 3893 3894 3895 3896 3897 3898 |
# File 'lib/a-core.rb', line 3868 def dump_geometry(_r=0,_c=0,_frame=root) spl = Array.new dom = Hash.new ret = [nil,nil,nil,nil] sp = splitter_frame_on_frame(_frame) if sp spl << "#{domain_name(_r,_c)}#{dump_splitter(sp)}" dom[get_hinner_frame(sp.frame1)]=domain_name(_r,_c) sspl,ddom,rr,cc = dump_geometry(_r, _c, sp.frame1) spl.concat(sspl) dom.update(ddom) if sp.instance_of?(AGTkVSplittedFrames) _c=cc+1 _c=gap_domain_column(_r,_c,dom) else _r=rr+1 _r=gap_domain_row(_r,_c,dom) end dom[get_hinner_frame(sp.frame2)]=domain_name(_r,_c) sspl,ddom,rr,cc = dump_geometry(_r, _c, sp.frame2) spl.concat(sspl) dom.update(ddom) elsif _frame==root dom[get_hinner_frame(root)]=domain_name(_r,_c) end ret[0]=spl ret[1]=dom ret[2]=_r ret[3]=_c ret end |
#dump_splitter(_splitter) ⇒ Object
3785 3786 3787 3788 3789 3790 3791 3792 3793 3794 3795 |
# File 'lib/a-core.rb', line 3785 def dump_splitter(_splitter) ret = '' if _splitter.instance_of?(AGTkVSplittedFrames) w = TkWinfo.width(_splitter.frame1) ret = "c#{w}" elsif _splitter.instance_of?(AGTkOSplittedFrames) h = TkWinfo.height(_splitter.frame1) ret = "r#{h}" end ret end |
#find_splitted_frame(_start_frame) ⇒ Object
3096 3097 3098 3099 3100 3101 3102 |
# File 'lib/a-core.rb', line 3096 def find_splitted_frame(_start_frame) splitted_frame = _start_frame while splitted_frame != nil && !splitted_frame.kind_of?(AGTkSplittedFrames) splitted_frame = TkWinfo.parent(splitted_frame) end splitted_frame end |
#frame(_domain_name, _name) ⇒ Object
3759 3760 3761 |
# File 'lib/a-core.rb', line 3759 def frame(_domain_name, _name) @panels[_domain_name]['sons'][_name].frame end |
#gap_domain_column(_r, _c, _dom) ⇒ Object
3845 3846 3847 3848 3849 3850 3851 3852 3853 3854 |
# File 'lib/a-core.rb', line 3845 def gap_domain_column(_r,_c,_dom) ret = _c Hash.new.update(_dom).each{|k,d| dr,dc=d.split('.') if dc.to_i == _c && dr.to_i == _r ret = gap_domain_column(_r,dc.to_i+1,_dom) end } ret end |
#gap_domain_row(_r, _c, _dom) ⇒ Object
3856 3857 3858 3859 3860 3861 3862 3863 3864 3865 |
# File 'lib/a-core.rb', line 3856 def gap_domain_row(_r,_c,_dom) ret = _r Hash.new.update(_dom).each{|k,d| dr,dc=d.split('.') if dr.to_i == _r && dc.to_i == _c ret = gap_domain_row(dr.to_i+1,_c,_dom) end } ret end |
#get_hinner_frame(_frame) ⇒ Object
3808 3809 3810 3811 3812 3813 3814 3815 3816 3817 3818 3819 3820 3821 |
# File 'lib/a-core.rb', line 3808 def get_hinner_frame(_frame) ret = _frame # child = TkWinfo.children(_frame)[0] TkWinfo.children(_frame).each{|child| if child.instance_of?(TkTitledFrameAdapter) ret = child.frame break end } # if child.instance_of?(TkTitledFrame) # ret = child.frame # end ret end |
#headed? ⇒ Boolean
3306 3307 3308 |
# File 'lib/a-core.rb', line 3306 def headed? @headed end |
#hide_panel ⇒ Object
3752 3753 |
# File 'lib/a-core.rb', line 3752 def hide_panel end |
#max_col(_domains, _row) ⇒ Object
2993 2994 2995 2996 2997 2998 2999 3000 3001 3002 3003 3004 |
# File 'lib/a-core.rb', line 2993 def max_col(_domains, _row) ret = 0 if _domains _domains.each{|d| r,c = d.split('.') if r.to_i == _row && c.to_i > ret ret = c.to_i end } end ret end |
#max_row(_domains, _col) ⇒ Object
3006 3007 3008 3009 3010 3011 3012 3013 3014 3015 3016 3017 |
# File 'lib/a-core.rb', line 3006 def max_row(_domains, _col) ret = 0 if _domains _domains.each{|d| r,c = d.split('.') if c.to_i == _col && r.to_i > ret ret = r.to_i end } end ret end |
#menu_item_add(_menu, _dom, _ffw, _is_plus = false) ⇒ Object
3423 3424 3425 3426 3427 3428 3429 3430 3431 3432 3433 3434 3435 3436 3437 3438 3439 3440 3441 3442 3443 3444 3445 3446 3447 3448 3449 3450 3451 3452 3453 3454 3455 3456 3457 3458 3459 3460 3461 3462 3463 3464 3465 3466 3467 3468 3469 3470 3471 3472 3473 3474 3475 3476 3477 3478 3479 |
# File 'lib/a-core.rb', line 3423 def (, _dom, _ffw, _is_plus=false) if !(, _ffw.title) ind = (, _ffw.title) if _is_plus if Arcadia.extension(_ffw.name).main_instance? = _ffw.title else = Arcadia.extension(_ffw.name).main_instance.frame_title end = nil newlabel = "New ..." if (, ) = ArcadiaMainMenu.(, ) end if .nil? = TkMenu.new( :parent=>, :tearoff=>0, :title => ) .extend(TkAutoPostMenu) .configure(Arcadia.style('menu')) .insert(ind, :cascade, :image=>Arcadia.image_res(ARROW_LEFT_GIF), :label=>, :compound=>'left', :menu=>, :hidemargin => false ) .insert('end',:command, :label=>newlabel, :image=>Arcadia.image_res(STAR_EMPTY_GIF), :compound=>'left', :command=>proc{Arcadia.extension(_ffw.name).main_instance.duplicate(nil, _dom)}, :hidemargin => true ) end .insert(newlabel,:command, :label=>_ffw.title, :image=>Arcadia.image_res(ARROW_LEFT_GIF), :compound=>'left', :command=>proc{change_domain(_dom, _ffw.name)}, :hidemargin => true ) else .insert(ind,:command, :label=>_ffw.title, :image=>Arcadia.image_res(ARROW_LEFT_GIF), :compound=>'left', :command=>proc{change_domain(_dom, _ffw.name)}, :hidemargin => true ) end end end |
#menu_item_exist?(_menu, _name) ⇒ Boolean
3405 3406 3407 3408 3409 3410 3411 3412 3413 3414 3415 3416 3417 3418 3419 3420 3421 |
# File 'lib/a-core.rb', line 3405 def (, _name) exist = false i_end = .index('end') if i_end 0.upto(i_end){|j| type = .(j) if type != 'separator' value = .entrycget(j,'label').to_s if value == _name exist = true break end end } end exist end |
#process_frame(_ffw) ⇒ Object
3481 3482 3483 3484 3485 3486 3487 3488 3489 3490 3491 3492 3493 3494 3495 3496 3497 3498 3499 3500 3501 3502 3503 3504 3505 3506 3507 3508 3509 3510 3511 3512 3513 3514 3515 3516 3517 3518 3519 3520 3521 3522 3523 3524 3525 3526 3527 3528 3529 3530 3531 3532 3533 3534 3535 3536 3537 |
# File 'lib/a-core.rb', line 3481 def process_frame(_ffw) #p "processo frame #{_ffw.title}" #------- is_plus = Arcadia.extension(_ffw.name).kind_of?(ArcadiaExtPlus) #------- @panels.keys.each{|dom| if dom != '_domain_root_' && dom != _ffw.domain && @panels[dom] && @panels[dom]['root'] titledFrame = @panels[dom]['root'] if titledFrame.instance_of?(TkTitledFrameAdapter) #menu = @panels[dom]['root'].menu_button('ext').cget('menu') = titledFrame. (, dom, _ffw, is_plus) end end } if @panels[_ffw.domain] titledFrame = @panels[_ffw.domain]['root'] if titledFrame.instance_of?(TkTitledFrameAdapter) #titledFrame.menu_button('ext').text("#{_ffw.title}::") #mymenu = titledFrame.menu_button('ext').cget('menu') = titledFrame. index = .index('end').to_i if @panels.keys.length > 2 i=index-3 else i=index-2 end if i >= 0 index = i.to_s end clabel = "close \"#{_ffw.title}\"" if @tabbed if !(, clabel) .insert(index,:command, :label=> clabel, :image=>Arcadia.image_res(CLOSE_FRAME_GIF), :compound=>'left', :command=>proc{unregister_panel(_ffw, false, true)}, :hidemargin => true ) end else if !(, clabel) .insert(index,:command, :label=> clabel, :image=>Arcadia.image_res(CLOSE_FRAME_GIF), :compound=>'left', :command=>proc{unregister_panel(_ffw, false, true)}, :hidemargin => true ) end (, _ffw.domain, _ffw, is_plus) end end end end |
#raise_panel(_domain, _extension) ⇒ Object
2603 2604 2605 2606 2607 2608 2609 2610 2611 2612 2613 2614 2615 2616 2617 2618 2619 2620 2621 2622 2623 2624 2625 2626 2627 2628 |
# File 'lib/a-core.rb', line 2603 def raise_panel(_domain, _extension) p = @panels[_domain] if p #p[:raised_name]=_extension p[:raised_stack].delete(_extension) p[:raised_stack] << _extension end if @tabbed if p && p['notebook'] != nil p['notebook'].raise(_extension) p['notebook'].see(_extension) end elsif p p['sons'].each{|k,v| if k == _extension v.hinner_frame.raise #title_titled_frame(_domain, v.title) p['root'].title(v.title) p['root'].(k) p['root'].change_adapters_name(k) Arcadia.process_event(LayoutRaisingFrameEvent.new(self,'extension_name'=>k, 'frame_name'=>p['sons'][k].name)) break end } end end |
#raised?(_domain, _name) ⇒ Boolean
def raise_panel(_domain_name, _name)
@panels[_domain_name]['notebook'].raise(_name) if @panels[_domain_name] && @panels[_domain_name]['notebook']
end
2634 2635 2636 2637 2638 2639 2640 2641 2642 2643 2644 2645 2646 |
# File 'lib/a-core.rb', line 2634 def raised?(_domain, _name) ret = true p = @panels[_domain] if @tabbed if p && p['notebook'] != nil ret=p['notebook'].raise == _name end else #ret = @panels[_domain][:raised_name] == _name ret = raised_name(_domain) == _name end ret end |
#raised_fixed_frame(_domain) ⇒ Object
2648 2649 2650 2651 2652 2653 2654 2655 2656 2657 2658 2659 2660 2661 2662 2663 2664 2665 2666 2667 2668 2669 2670 2671 2672 2673 |
# File 'lib/a-core.rb', line 2648 def raised_fixed_frame(_domain) ret = nil p = @panels[_domain] if @tabbed if p && p['notebook'] != nil raised_name=p['notebook'].raise @panels[_domain]['sons'].each{|k,v| if raised_name == k ret = v break end } elsif @panels[_domain]['sons'].length == 1 ret = @panels[_domain]['sons'].values[0] end else p['sons'].each{|k,v| # if k == @panels[_domain][:raised_name] if k == raised_name(_domain) ret = v break end } end ret end |
#raised_name(_domain) ⇒ Object
2595 2596 2597 2598 2599 2600 2601 |
# File 'lib/a-core.rb', line 2595 def raised_name(_domain) ret = nil if @panels[_domain] && @panels[_domain][:raised_stack] && @panels[_domain][:raised_stack].length > 0 ret = @panels[_domain][:raised_stack][-1] end ret end |
#registed?(_domain_name, _name) ⇒ Boolean
3314 3315 3316 |
# File 'lib/a-core.rb', line 3314 def registed?(_domain_name, _name) @panels[_domain_name]['sons'][_name] != nil end |
#register_panel(_ffw, _adapter = nil) ⇒ Object
3589 3590 3591 3592 3593 3594 3595 3596 3597 3598 3599 3600 3601 3602 3603 3604 3605 3606 3607 3608 3609 3610 3611 3612 3613 3614 3615 3616 3617 3618 3619 3620 3621 3622 3623 3624 3625 3626 3627 3628 3629 3630 3631 3632 3633 3634 3635 3636 3637 3638 3639 3640 3641 3642 3643 3644 3645 3646 3647 3648 3649 3650 3651 3652 3653 3654 3655 3656 3657 3658 3659 3660 3661 3662 3663 3664 3665 3666 3667 3668 3669 3670 3671 3672 3673 3674 3675 3676 3677 3678 3679 3680 3681 3682 3683 3684 3685 3686 3687 3688 3689 3690 3691 3692 3693 3694 3695 3696 3697 3698 3699 3700 3701 3702 |
# File 'lib/a-core.rb', line 3589 def register_panel(_ffw, _adapter=nil) #p " > register_panel #{_ffw.title} _adapter #{_adapter}" _domain_name = _ffw.domain _name = _ffw.name _title = _ffw.title pan = @panels[_domain_name] @wrappers[_name]=_ffw if pan!=nil num = pan['sons'].length if @headed root_frame = pan['root'].frame #title_titled_frame(_domain_name, _title) pan['root'].title(_title) pan['root'].(_name) pan['root'].change_adapters_name(_name) if !root_frame.instance_of?(TkFrameAdapter) && num==0 if _adapter adapter = _adapter else adapter = TkFrameAdapter.new(self.root) end adapter.attach_frame(root_frame) adapter.raise end else root_frame = pan['root'] end #@panels[_domain_name][:raised_name]=_name @panels[_domain_name][:raised_stack] = [] if @panels[_domain_name][:raised_stack].nil? @panels[_domain_name][:raised_stack] << _name if @tabbed if (num == 0 && @autotab) pan['sons'][_name] = _ffw process_frame(_ffw) return adapter else if num == 1 && @autotab && pan['notebook'] == nil pan['notebook'] = Tk::BWidget::NoteBook.new(root_frame, Arcadia.style('titletabpanel')){ tabbevelsize 0 internalborderwidth 0 pack('fill'=>'both', :padx=>0, :pady=>0, :expand => 'yes') } api = pan['sons'].values[0] api_tab_frame = pan['notebook'].insert('end', api.name, 'text'=>api.title, 'raisecmd'=>proc{ #title_titled_frame(_domain_name, api.title) pan['root'].title(api.title) pan['root'].(api.name) pan['root'].change_adapters_name(api.name) Arcadia.process_event(LayoutRaisingFrameEvent.new(self,'extension_name'=>pan['sons'][api.name].extension_name, 'frame_name'=>pan['sons'][api.name].name)) } ) adapter = api.hinner_frame adapter.detach_frame adapter.attach_frame(api_tab_frame) api.hinner_frame.raise elsif (num==0 && !@autotab) pan['notebook'] = Tk::BWidget::NoteBook.new(root_frame, Arcadia.style('titletabpanel')){ tabbevelsize 0 internalborderwidth 0 pack('fill'=>'both', :padx=>0, :pady=>0, :expand => 'yes') } end _panel = pan['notebook'].insert('end',_name , 'text'=>_title, 'raisecmd'=>proc{ #title_titled_frame(_domain_name, _title) pan['root'].title(_title) pan['root'].(_name) pan['root'].change_adapters_name(_name) Arcadia.process_event(LayoutRaisingFrameEvent.new(self,'extension_name'=>_ffw.extension_name, 'frame_name'=>_ffw.name)) } ) if _adapter adapter = _adapter else adapter = TkFrameAdapter.new(self.root) end adapter.attach_frame(_panel) adapter.raise _panel=adapter pan['sons'][_name] = _ffw pan['notebook'].raise(_name) process_frame(_ffw) return _panel end else # not tabbed pan['sons'][_name] = _ffw process_frame(_ffw) if adapter.nil? if _adapter adapter = _adapter else adapter = TkFrameAdapter.new(self.root) end end adapter.attach_frame(root_frame) adapter.raise # pan['sons'].each{|k,v| # if k != _name # unregister_panel(v,false) # end # } return adapter end else _ffw.domain = nil process_frame(_ffw) return TkFrameAdapter.new(self.root) end end |
#registered_panel?(_ffw) ⇒ Boolean
3585 3586 3587 |
# File 'lib/a-core.rb', line 3585 def registered_panel?(_ffw) _ffw.domain.nil? || _ffw.domain.length == 0 ?false:registed?(_ffw.domain, _ffw.name) end |
#root ⇒ Object
2591 2592 2593 |
# File 'lib/a-core.rb', line 2591 def root @panels['_domain_root_']['root'] end |
#shift_bottom(_row, _col) ⇒ Object
2885 2886 2887 2888 2889 2890 2891 2892 2893 2894 2895 2896 2897 2898 2899 2900 2901 2902 2903 2904 2905 2906 2907 |
# File 'lib/a-core.rb', line 2885 def shift_bottom(_row, _col) d = domain_name(_row+1, _col) dj = domain_name(_row, _col) if @panels[d] !=nil shift_bottom(_row+1,_col) end @panels[d] = @panels[dj] #------------------------------- #@panels[d]['root'].set_domain(d) #------------------------------- @panels[d]['sons'].each{|name,ffw| ffw.domain=d} if @frames[_row + 1] == nil @frames[_row + 1] = Array.new # @domains[_row + 1] = Array.new end @frames[_row+1][_col] = @frames[_row][_col] # @domains[_row+1][_col] = @domains[_row][_col] @panels.delete(dj) #@panels[dj] = nil @frames[_row][_col] = nil # @domains[_row][_col] = nil end |
#shift_domain_column(_r, _c, _dom) ⇒ Object
3823 3824 3825 3826 3827 3828 3829 3830 3831 3832 |
# File 'lib/a-core.rb', line 3823 def shift_domain_column(_r,_c,_dom) Hash.new.update(_dom).each{|k,d| dr,dc=d.split('.') if dc.to_i >= _c && dr.to_i == _r #shift_domain_column(_r,dc.to_i+1,_dom) #p "== #{d} --> #{domain_name(_r,dc.to_i+1)}" _dom[k]= domain_name(_r,dc.to_i+1) end } end |
#shift_domain_row(_r, _c, _dom) ⇒ Object
3834 3835 3836 3837 3838 3839 3840 3841 3842 3843 |
# File 'lib/a-core.rb', line 3834 def shift_domain_row(_r,_c,_dom) Hash.new.update(_dom).each{|k,d| dr,dc=d.split('.') if dr.to_i >= _r && dc.to_i == _c #shift_domain_row(dr.to_i+1,_c,_dom) #p "shift_domain_row == #{d} --> #{domain_name(dr.to_i+1,_c)}" _dom[k]=domain_name(dr.to_i+1,_c) end } end |
#shift_left(_row, _col) ⇒ Object
2843 2844 2845 2846 2847 2848 2849 2850 2851 2852 2853 2854 2855 2856 2857 2858 2859 2860 2861 |
# File 'lib/a-core.rb', line 2843 def shift_left(_row,_col) d = domain_name(_row, _col) dj = domain_name(_row, _col+1) if @panels[dj] !=nil @panels[d] = @panels[dj] #------------------------------- #@panels[d]['root'].set_domain(d) #------------------------------- @panels[d]['sons'].each{|name,ffw| ffw.domain=d} @frames[_row][_col] = @frames[_row][_col+1] # @domains[_row][_col] = @domains[_row][_col+1] @panels.delete(dj) # = nil @frames[_row][_col+1] = nil # @domains[_row][_col+1] = nil shift_left(_row,_col+1) end end |
#shift_right(_row, _col) ⇒ Object
2823 2824 2825 2826 2827 2828 2829 2830 2831 2832 2833 2834 2835 2836 2837 2838 2839 2840 2841 |
# File 'lib/a-core.rb', line 2823 def shift_right(_row,_col) d = domain_name(_row, _col+1) dj = domain_name(_row, _col) if @panels[d] !=nil shift_right(_row,_col+1) end @panels[d] = @panels[dj] #------------------------------- #@panels[d]['root'].set_domain(d) #------------------------------- @panels[d]['sons'].each{|name,ffw| ffw.domain=d} @frames[_row][_col+1] = @frames[_row][_col] # @domains[_row][_col+1] = @domains[_row][_col] @panels.delete(dj) #@panels[dj] = nil @frames[_row][_col] = nil # @domains[_row][_col] = nil end |
#shift_top(_row, _col) ⇒ Object
2863 2864 2865 2866 2867 2868 2869 2870 2871 2872 2873 2874 2875 2876 2877 2878 2879 2880 2881 2882 |
# File 'lib/a-core.rb', line 2863 def shift_top(_row,_col) d = domain_name(_row, _col) dj = domain_name(_row+1, _col) if @panels[dj] !=nil @panels[d] = @panels[dj] #------------------------------- #@panels[d]['root'].set_domain(d) #------------------------------- @panels[d]['sons'].each{|name,ffw| ffw.domain=d} @frames[_row][_col] = @frames[_row+1][_col] # @domains[_row][_col] = @domains[_row+1][_col] @panels.delete(dj) # = nil @frames[_row+1][_col] = nil # @domains[_row+1][_col] = nil shift_top(_row+1,_col) end end |
#sorted_menu_index(_menu, _label) ⇒ Object
def change_domain_old(_dom1, _dom2, _name2)
tt1= @panels[_dom1]['root'].top_text
tt2= @panels[_dom2]['root'].top_text
if @panels[_dom2]['sons'].length ==1 && @panels[_dom1]['sons'].length > 0
# change ------
ffw1 = raised_fixed_frame(_dom1)
ffw2 = @panels[_dom2]['sons'].values[0]
unregister_panel(ffw1,false,false) if ffw1
unregister_panel(ffw2,false,false)
ffw1.domain = _dom2 if ffw1
ffw2.domain = _dom1
register_panel(ffw1, ffw1.hinner_frame) if ffw1
register_panel(ffw2, ffw2.hinner_frame)
@panels[_dom1]['root'].top_text(tt2)
@panels[_dom2]['root'].top_text(tt1)
elsif @panels[_dom2]['sons'].length > 1
ffw2 = @panels[_dom2]['sons'][_name2]
unregister_panel(ffw2, false, false)
ffw2.domain = _dom1
register_panel(ffw2, ffw2.hinner_frame)
@panels[_dom1]['root'].top_text(tt2)
@panels[_dom2]['root'].top_text('')
end
# refresh -----
build_invert_menu
end
3387 3388 3389 3390 3391 3392 3393 3394 3395 3396 3397 3398 3399 3400 3401 3402 3403 |
# File 'lib/a-core.rb', line 3387 def (, _label) index = '0' i_end = .index('end').to_i - 4 if i_end && i_end > 0 0.upto(i_end){|j| type = .(j) if type != 'separator' value = .entrycget(j,'label').to_s if value > _label index=j break end end } end index end |
#splitter_frame_on_frame(_frame) ⇒ Object
3797 3798 3799 3800 3801 3802 3803 3804 3805 3806 |
# File 'lib/a-core.rb', line 3797 def splitter_frame_on_frame(_frame) ret=nil @splitters.each{|sp| if sp.frame == _frame ret = sp break end } ret end |
#unbuild_titled_frame(domain) ⇒ Object
–
3198 3199 3200 3201 3202 3203 3204 |
# File 'lib/a-core.rb', line 3198 def unbuild_titled_frame(domain) if @panels[domain] parent = @panels[domain]['root'].parent @panels[domain]['root'].destroy @panels[domain]['root']=parent end end |
#unregister_panel(_ffw, delete_wrapper = true, refresh_menu = true) ⇒ Object
3705 3706 3707 3708 3709 3710 3711 3712 3713 3714 3715 3716 3717 3718 3719 3720 3721 3722 3723 3724 3725 3726 3727 3728 3729 3730 3731 3732 3733 3734 3735 3736 3737 3738 3739 3740 3741 3742 3743 3744 3745 3746 3747 |
# File 'lib/a-core.rb', line 3705 def unregister_panel(_ffw, delete_wrapper=true, =true) _domain_name = _ffw.domain _name = _ffw.name @panels[_domain_name]['sons'][_name].hinner_frame.detach_frame if delete_wrapper @wrappers[_name].root.clear_transient_adapters(_name) @wrappers.delete(_name).hinner_frame.destroy else @wrappers[_name].domain=nil end @panels[_domain_name]['sons'].delete(_name) @panels[_domain_name][:raised_stack].delete(_name) #p "unregister #{_name} ------> 2" if @panels[_domain_name]['sons'].length >= 1 n = @panels[_domain_name][:raised_stack][-1] w = @panels[_domain_name]['sons'][n].hinner_frame t = @panels[_domain_name]['sons'][n].title #title_titled_frame(_domain_name, t) @panels[_domain_name]['root'].title(t) @panels[_domain_name]['root'].(n) @panels[_domain_name]['root'].shift_on if !@panels[_domain_name]['sons'][n].kind_of?(ArcadiaExtPlus) @panels[_domain_name]['root'].change_adapters_name(n) if !@tabbed || @panels[_domain_name]['sons'].length == 1 w.detach_frame w.attach_frame(@panels[_domain_name]['root'].frame) end if @tabbed if @panels[_domain_name]['sons'].length == 1 @panels[_domain_name]['notebook'].destroy @panels[_domain_name]['notebook']=nil else @panels[_domain_name]['notebook'].delete(_name) if @panels[_domain_name]['notebook'].index(_name) > 0 new_raise_key = @panels[_domain_name]['sons'].keys[@panels[_domain_name]['sons'].length-1] @panels[_domain_name]['notebook'].raise(new_raise_key) end end elsif @panels[_domain_name]['sons'].length == 0 #title_titled_frame(_domain_name, '') @panels[_domain_name]['root'].title('') @panels[_domain_name]['root'].top_text_clear end if end |
#view_panel ⇒ Object
3749 3750 |
# File 'lib/a-core.rb', line 3749 def view_panel end |