Module: Tk::YScrollable

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

Instance Method Summary collapse

Instance Method Details

#yscrollbar(bar = nil) ⇒ Object 



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

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 



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

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

#yview(*index) ⇒ Object 



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

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 



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

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

#yview_scroll(*index) ⇒ Object 



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

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