class TkLabelTitledFrame

Public Instance Methods

__create_left_label(_frame) click to toggle source
# File lib/a-tkcommons.rb, line 1577
def __create_left_label(_frame)
  @title.nil??_text_title ='':_text_title = @title+' :: '
  _img=@img
  TkLabel.new(_frame, Arcadia.style('titlelabel')){
    text _text_title
    anchor  'w'
    compound 'left'
    image  TkAllPhotoImage.new('file' => _img) if _img
    pack('side'=> 'left','anchor'=> 'e')
  }
end
create_left_title() click to toggle source
# File lib/a-tkcommons.rb, line 1572
def create_left_title
  @left_label = __create_left_label(@top)
  @left_label.bind_append("Double-Button-1", proc{resize})
end
shift_off() click to toggle source
# File lib/a-tkcommons.rb, line 1594
def shift_off
  @left_label.state='disable'
  #@left_label.foreground(Arcadia.conf('titlelabel.disabledforeground'))
end
shift_on() click to toggle source
# File lib/a-tkcommons.rb, line 1589
def shift_on
  @left_label.state='normal'
  #@left_label.foreground(Arcadia.conf('titlelabel.foreground'))
end
title(_text=nil) click to toggle source
# File lib/a-tkcommons.rb, line 1599
def title(_text=nil)
  if _text.nil?
    return @title
  else
    @title=_text
    if _text.strip.length == 0
      @left_label.text('')
    else
      @left_label.text(_text+'::')
    end
  end
end