Contents

#
#   tk/mngfocus.rb : methods for Tcl/Tk standard library 'focus.tcl'
#                           by Hidetoshi Nagai <[e-mail]>
#
require 'tk'

module TkManageFocus
  extend Tk

  TkCommandNames = [
    'tk_focusFollowMouse'.freeze,
    'tk_focusNext'.freeze,
    'tk_focusPrev'.freeze
  ].freeze

  def TkManageFocus.followsMouse
    tk_call_without_enc('tk_focusFollowsMouse')
  end

  def TkManageFocus.next(win)
    tk_tcl2ruby(tk_call('tk_focusNext', win))
  end
  def focusNext
    TkManageFocus.next(self)
  end

  def TkManageFocus.prev(win)
    tk_tcl2ruby(tk_call('tk_focusPrev', win))
  end
  def focusPrev
    TkManageFocus.prev(self)
  end
end

Version data entries

3 entries across 3 versions & 1 rubygems

Version	Path
tk-win-0.2.2-x86-mingw32	lib/tk/mngfocus.rb
tk-win-0.2.1-x86-mingw32	lib/tk/mngfocus.rb
tk-win-0.2.0-x86-mingw32	lib/tk/mngfocus.rb