Module: Tk::YScrollable

Included in:
Scrollable
Defined in:
lib/tk/scrollable.rb

Instance Method Summary collapse

Instance Method Details

#yscrollbar(bar = nil) ⇒ Object


64
65
66
67
68
69
70
71
72
73
# File 'lib/tk/scrollable.rb', line 64

def yscrollbar(bar=nil)
  if bar
    @yscrollbar = bar
    @yscrollbar.orient 'vertical'
    self.yscrollcommand {|*arg| @yscrollbar.set(*arg)}
    @yscrollbar.command {|*arg| self.yview(*arg)}
    Tk.update  # avoid scrollbar trouble
  end
  @yscrollbar
end

#yscrollcommand(cmd = Proc.new) ⇒ Object


43
44
45
46
47
# File 'lib/tk/scrollable.rb', line 43

def yscrollcommand(cmd=Proc.new)
  configure_cmd 'yscrollcommand', cmd
  # Tk.update  # avoid scrollbar trouble
  self
end

#yview(*index) ⇒ Object


49
50
51
52
53
54
55
56
# File 'lib/tk/scrollable.rb', line 49

def yview(*index)
  if index.size == 0
    list(tk_send_without_enc('yview'))
  else
    tk_send_without_enc('yview', *index)
    self
  end
end

#yview_moveto(*index) ⇒ Object


57
58
59
# File 'lib/tk/scrollable.rb', line 57

def yview_moveto(*index)
  yview('moveto', *index)
end

#yview_scroll(*index) ⇒ Object


60
61
62
# File 'lib/tk/scrollable.rb', line 60

def yview_scroll(*index)
  yview('scroll', *index)
end