Method: TkMultiListFrame#titlefont

Defined in:
sample/tkmultilistframe.rb

#titlefont(font) ⇒ Object

set title font



395
396
397
398
399
400
401
402
403
404
405
406
407
 
# File 'sample/tkmultilistframe.rb', line 395

def titlefont(font)
  @title_list.each{|label| label['font'] = font}
  title_height = 0
  @title_list.each{|w| 
    h = w.winfo_reqheight
    title_height = h if title_height < h
  }
  @f_title.height title_height
  bbox = @w_title.bbox
  @c_title.height(bbox[3])
  @c_title.scrollregion(bbox)
  self
end