Support for the "event" command, new in Tk 4.2.

By Case Roole.
This commit is contained in:
Guido van Rossum 1997-12-02 19:51:39 +00:00
parent 2888a12eed
commit 80f8be8901
1 changed files with 24 additions and 0 deletions

View File

@ -699,6 +699,30 @@ class Misc:
apply(self.tk.call, apply(self.tk.call,
('grid', 'slaves', self._w) + args))) ('grid', 'slaves', self._w) + args)))
# Support for the "event" command, new in Tk 4.2.
# By Case Roole.
def event_add(self,virtual, *sequences):
args = ('event', 'add', virtual) + sequences
apply( _default_root.tk.call, args )
def event_delete(self,virtual,*sequences):
args = ('event', 'delete', virtual) + sequences
apply( _default_root.tk.call, args )
def event_generate(self, sequence, **kw):
args = ('event', 'generate', self._w, sequence)
for k,v in kw.items():
args = args + ('-%s' % k,str(v))
apply( _default_root.tk.call, args )
def event_info(self,virtual=None):
args = ('event', 'info')
if virtual is not None: args = args + (virtual,)
s = apply( _default_root.tk.call, args )
return _string.split(s)
class CallWrapper: class CallWrapper:
def __init__(self, func, subst, widget): def __init__(self, func, subst, widget):
self.func = func self.func = func