Module: TkInputThrow

Defined in:
lib/a-tkcommons.rb

Class Method Summary collapse

Instance Method Summary collapse

Class Method Details

.extended(_widget) ⇒ Object 



1679
1680
1681
 
# File 'lib/a-tkcommons.rb', line 1679

def self.extended(_widget)
  _widget.__initialize_throw(_widget)
end

.included(_widget) ⇒ Object 



1683
1684
1685
 
# File 'lib/a-tkcommons.rb', line 1683

def self.included(_widget)
  _widget.__initialize_throw(_widget)
end

Instance Method Details

#__initialize_throw(_widget) ⇒ Object 



1687
1688
1689
1690
1691
1692
1693
1694
1695
 
# File 'lib/a-tkcommons.rb', line 1687

def __initialize_throw(_widget)
  #_widget.bind_append("Enter", proc{p "Enter on #{_widget}";Arcadia.process_event(InputEnterEvent.new(self,'receiver'=>_widget))})
  _widget.bind_append("<Copy>"){Arcadia.process_event(CopyTextEvent.new(_widget));break}
  _widget.bind_append("<Cut>"){Arcadia.process_event(CutTextEvent.new(_widget));break}
  _widget.bind_append("<Paste>"){Arcadia.process_event(PasteTextEvent.new(_widget));break}
  _widget.bind_append("<Undo>"){Arcadia.process_event(UndoTextEvent.new(_widget));break}
  _widget.bind_append("<Redo>"){Arcadia.process_event(RedoTextEvent.new(_widget));break}
  _widget.bind_append("1", proc{Arcadia.process_event(InputEnterEvent.new(self,'receiver'=>_widget))})
end

#select_throw ⇒ Object 



1697
1698
1699
 
# File 'lib/a-tkcommons.rb', line 1697

def select_throw
  InputEnterEvent.new(self,'receiver'=>self).go!
end