blob: 0f0da8c7e930d953f906e380e4296d437c60ecfb [file] [log] [blame]
Steven M. Gavaedb60a72002-01-12 09:48:02 +00001"""
Kurt B. Kaiser2303b1c2003-11-24 05:26:16 +00002Dialog for building Tkinter accelerator key bindings
Steven M. Gavaedb60a72002-01-12 09:48:02 +00003"""
Georg Brandl14fc4272008-05-17 18:39:55 +00004from tkinter import *
5import tkinter.messagebox as tkMessageBox
Christian Heimes05e8be12008-02-23 18:30:17 +00006import string
Ronald Oussoren827822e2009-02-12 15:01:44 +00007from idlelib import macosxSupport
Steven M. Gavaedb60a72002-01-12 09:48:02 +00008
Steven M. Gavafacfc092002-01-19 00:29:54 +00009class GetKeysDialog(Toplevel):
Steven M. Gava68d73362002-01-19 01:30:56 +000010 def __init__(self,parent,title,action,currentKeySequences):
11 """
12 action - string, the name of the virtual event these keys will be
13 mapped to
14 currentKeys - list, a list of all key sequence lists currently mapped
Kurt B. Kaiser6655e4b2002-12-31 16:03:23 +000015 to virtual events, for overlap checking
Steven M. Gava68d73362002-01-19 01:30:56 +000016 """
Steven M. Gavaedb60a72002-01-12 09:48:02 +000017 Toplevel.__init__(self, parent)
18 self.configure(borderwidth=5)
19 self.resizable(height=FALSE,width=FALSE)
20 self.title(title)
21 self.transient(parent)
22 self.grab_set()
23 self.protocol("WM_DELETE_WINDOW", self.Cancel)
24 self.parent = parent
25 self.action=action
Steven M. Gava68d73362002-01-19 01:30:56 +000026 self.currentKeySequences=currentKeySequences
Steven M. Gavafacfc092002-01-19 00:29:54 +000027 self.result=''
Steven M. Gavaedb60a72002-01-12 09:48:02 +000028 self.keyString=StringVar(self)
29 self.keyString.set('')
Kurt B. Kaiser5c6e0a12005-11-22 21:09:37 +000030 self.SetModifiersForPlatform() # set self.modifiers, self.modifier_label
Tony Lowndsaf7a3022002-09-29 00:23:08 +000031 self.modifier_vars = []
32 for modifier in self.modifiers:
33 variable = StringVar(self)
34 variable.set('')
35 self.modifier_vars.append(variable)
Kurt B. Kaiser5c6e0a12005-11-22 21:09:37 +000036 self.advanced = False
Steven M. Gavaedb60a72002-01-12 09:48:02 +000037 self.CreateWidgets()
38 self.LoadFinalKeyList()
Steven M. Gavaedb60a72002-01-12 09:48:02 +000039 self.withdraw() #hide while setting geometry
40 self.update_idletasks()
Kurt B. Kaiser6655e4b2002-12-31 16:03:23 +000041 self.geometry("+%d+%d" %
Steven M. Gavaedb60a72002-01-12 09:48:02 +000042 ((parent.winfo_rootx()+((parent.winfo_width()/2)
43 -(self.winfo_reqwidth()/2)),
44 parent.winfo_rooty()+((parent.winfo_height()/2)
45 -(self.winfo_reqheight()/2)) )) ) #centre dialog over parent
46 self.deiconify() #geometry set, unhide
47 self.wait_window()
Kurt B. Kaiser6655e4b2002-12-31 16:03:23 +000048
Steven M. Gavaedb60a72002-01-12 09:48:02 +000049 def CreateWidgets(self):
50 frameMain = Frame(self,borderwidth=2,relief=SUNKEN)
51 frameMain.pack(side=TOP,expand=TRUE,fill=BOTH)
52 frameButtons=Frame(self)
53 frameButtons.pack(side=BOTTOM,fill=X)
Kurt B. Kaiser2303b1c2003-11-24 05:26:16 +000054 self.buttonOK = Button(frameButtons,text='OK',
55 width=8,command=self.OK)
56 self.buttonOK.grid(row=0,column=0,padx=5,pady=5)
Steven M. Gavaedb60a72002-01-12 09:48:02 +000057 self.buttonCancel = Button(frameButtons,text='Cancel',
58 width=8,command=self.Cancel)
59 self.buttonCancel.grid(row=0,column=1,padx=5,pady=5)
60 self.frameKeySeqBasic = Frame(frameMain)
61 self.frameKeySeqAdvanced = Frame(frameMain)
62 self.frameControlsBasic = Frame(frameMain)
63 self.frameHelpAdvanced = Frame(frameMain)
64 self.frameKeySeqAdvanced.grid(row=0,column=0,sticky=NSEW,padx=5,pady=5)
65 self.frameKeySeqBasic.grid(row=0,column=0,sticky=NSEW,padx=5,pady=5)
66 self.frameKeySeqBasic.lift()
67 self.frameHelpAdvanced.grid(row=1,column=0,sticky=NSEW,padx=5)
68 self.frameControlsBasic.grid(row=1,column=0,sticky=NSEW,padx=5)
69 self.frameControlsBasic.lift()
70 self.buttonLevel = Button(frameMain,command=self.ToggleLevel,
71 text='Advanced Key Binding Entry >>')
72 self.buttonLevel.grid(row=2,column=0,stick=EW,padx=5,pady=5)
73 labelTitleBasic = Label(self.frameKeySeqBasic,
74 text="New keys for '"+self.action+"' :")
75 labelTitleBasic.pack(anchor=W)
76 labelKeysBasic = Label(self.frameKeySeqBasic,justify=LEFT,
77 textvariable=self.keyString,relief=GROOVE,borderwidth=2)
78 labelKeysBasic.pack(ipadx=5,ipady=5,fill=X)
Tony Lowndsaf7a3022002-09-29 00:23:08 +000079 self.modifier_checkbuttons = {}
80 column = 0
81 for modifier, variable in zip(self.modifiers, self.modifier_vars):
82 label = self.modifier_label.get(modifier, modifier)
83 check=Checkbutton(self.frameControlsBasic,
Steven M. Gavaedb60a72002-01-12 09:48:02 +000084 command=self.BuildKeyString,
Tony Lowndsaf7a3022002-09-29 00:23:08 +000085 text=label,variable=variable,onvalue=modifier,offvalue='')
86 check.grid(row=0,column=column,padx=2,sticky=W)
87 self.modifier_checkbuttons[modifier] = check
88 column += 1
Steven M. Gavaedb60a72002-01-12 09:48:02 +000089 labelFnAdvice=Label(self.frameControlsBasic,justify=LEFT,
Kurt B. Kaiser2303b1c2003-11-24 05:26:16 +000090 text=\
91 "Select the desired modifier keys\n"+
92 "above, and the final key from the\n"+
93 "list on the right.\n\n" +
94 "Use upper case Symbols when using\n" +
95 "the Shift modifier. (Letters will be\n" +
96 "converted automatically.)")
Steven M. Gavaedb60a72002-01-12 09:48:02 +000097 labelFnAdvice.grid(row=1,column=0,columnspan=4,padx=2,sticky=W)
98 self.listKeysFinal=Listbox(self.frameControlsBasic,width=15,height=10,
99 selectmode=SINGLE)
Steven M. Gavaedb60a72002-01-12 09:48:02 +0000100 self.listKeysFinal.bind('<ButtonRelease-1>',self.FinalKeySelected)
101 self.listKeysFinal.grid(row=0,column=4,rowspan=4,sticky=NS)
102 scrollKeysFinal=Scrollbar(self.frameControlsBasic,orient=VERTICAL,
103 command=self.listKeysFinal.yview)
104 self.listKeysFinal.config(yscrollcommand=scrollKeysFinal.set)
105 scrollKeysFinal.grid(row=0,column=5,rowspan=4,sticky=NS)
Steven M. Gavafacfc092002-01-19 00:29:54 +0000106 self.buttonClear=Button(self.frameControlsBasic,
107 text='Clear Keys',command=self.ClearKeySeq)
108 self.buttonClear.grid(row=2,column=0,columnspan=4)
Steven M. Gavaedb60a72002-01-12 09:48:02 +0000109 labelTitleAdvanced = Label(self.frameKeySeqAdvanced,justify=LEFT,
110 text="Enter new binding(s) for '"+self.action+"' :\n"+
Kurt B. Kaiser2303b1c2003-11-24 05:26:16 +0000111 "(These bindings will not be checked for validity!)")
Steven M. Gavaedb60a72002-01-12 09:48:02 +0000112 labelTitleAdvanced.pack(anchor=W)
113 self.entryKeysAdvanced=Entry(self.frameKeySeqAdvanced,
114 textvariable=self.keyString)
115 self.entryKeysAdvanced.pack(fill=X)
116 labelHelpAdvanced=Label(self.frameHelpAdvanced,justify=LEFT,
Kurt B. Kaiser2303b1c2003-11-24 05:26:16 +0000117 text="Key bindings are specified using Tkinter keysyms as\n"+
Steven M. Gavaedb60a72002-01-12 09:48:02 +0000118 "in these samples: <Control-f>, <Shift-F2>, <F12>,\n"
Kurt B. Kaiser2303b1c2003-11-24 05:26:16 +0000119 "<Control-space>, <Meta-less>, <Control-Alt-Shift-X>.\n"
120 "Upper case is used when the Shift modifier is present!\n\n" +
121 "'Emacs style' multi-keystroke bindings are specified as\n" +
122 "follows: <Control-x><Control-y>, where the first key\n" +
123 "is the 'do-nothing' keybinding.\n\n" +
Steven M. Gavaedb60a72002-01-12 09:48:02 +0000124 "Multiple separate bindings for one action should be\n"+
125 "separated by a space, eg., <Alt-v> <Meta-v>." )
126 labelHelpAdvanced.grid(row=0,column=0,sticky=NSEW)
127
Tony Lowndsaf7a3022002-09-29 00:23:08 +0000128 def SetModifiersForPlatform(self):
129 """Determine list of names of key modifiers for this platform.
130
131 The names are used to build Tk bindings -- it doesn't matter if the
132 keyboard has these keys, it matters if Tk understands them. The
133 order is also important: key binding equality depends on it, so
134 config-keys.def must use the same ordering.
135 """
136 import sys
Ronald Oussoren827822e2009-02-12 15:01:44 +0000137 if macosxSupport.runningAsOSXApp():
Tony Lowndsaf7a3022002-09-29 00:23:08 +0000138 self.modifiers = ['Shift', 'Control', 'Option', 'Command']
139 else:
140 self.modifiers = ['Control', 'Alt', 'Shift']
Kurt B. Kaiser5c6e0a12005-11-22 21:09:37 +0000141 self.modifier_label = {'Control': 'Ctrl'} # short name
Tony Lowndsaf7a3022002-09-29 00:23:08 +0000142
Steven M. Gavaedb60a72002-01-12 09:48:02 +0000143 def ToggleLevel(self):
144 if self.buttonLevel.cget('text')[:8]=='Advanced':
Steven M. Gavafacfc092002-01-19 00:29:54 +0000145 self.ClearKeySeq()
Steven M. Gavaedb60a72002-01-12 09:48:02 +0000146 self.buttonLevel.config(text='<< Basic Key Binding Entry')
147 self.frameKeySeqAdvanced.lift()
148 self.frameHelpAdvanced.lift()
149 self.entryKeysAdvanced.focus_set()
Kurt B. Kaiser5c6e0a12005-11-22 21:09:37 +0000150 self.advanced = True
Steven M. Gavaedb60a72002-01-12 09:48:02 +0000151 else:
Steven M. Gavafacfc092002-01-19 00:29:54 +0000152 self.ClearKeySeq()
Steven M. Gavaedb60a72002-01-12 09:48:02 +0000153 self.buttonLevel.config(text='Advanced Key Binding Entry >>')
154 self.frameKeySeqBasic.lift()
Kurt B. Kaiser6655e4b2002-12-31 16:03:23 +0000155 self.frameControlsBasic.lift()
Kurt B. Kaiser5c6e0a12005-11-22 21:09:37 +0000156 self.advanced = False
Kurt B. Kaiser6655e4b2002-12-31 16:03:23 +0000157
Steven M. Gavaedb60a72002-01-12 09:48:02 +0000158 def FinalKeySelected(self,event):
159 self.BuildKeyString()
Kurt B. Kaiser6655e4b2002-12-31 16:03:23 +0000160
Steven M. Gavaedb60a72002-01-12 09:48:02 +0000161 def BuildKeyString(self):
Kurt B. Kaiser2303b1c2003-11-24 05:26:16 +0000162 keyList = modifiers = self.GetModifiers()
163 finalKey = self.listKeysFinal.get(ANCHOR)
Kurt B. Kaiser6655e4b2002-12-31 16:03:23 +0000164 if finalKey:
Kurt B. Kaiser2303b1c2003-11-24 05:26:16 +0000165 finalKey = self.TranslateKey(finalKey, modifiers)
166 keyList.append(finalKey)
Neal Norwitz9d72bb42007-04-17 08:48:32 +0000167 self.keyString.set('<' + '-'.join(keyList) + '>')
Kurt B. Kaiser6655e4b2002-12-31 16:03:23 +0000168
Steven M. Gavafacfc092002-01-19 00:29:54 +0000169 def GetModifiers(self):
Tony Lowndsaf7a3022002-09-29 00:23:08 +0000170 modList = [variable.get() for variable in self.modifier_vars]
Kurt B. Kaiser5c32f672009-04-27 05:36:55 +0000171 return [mod for mod in modList if mod]
Steven M. Gavaedb60a72002-01-12 09:48:02 +0000172
Steven M. Gavafacfc092002-01-19 00:29:54 +0000173 def ClearKeySeq(self):
174 self.listKeysFinal.select_clear(0,END)
175 self.listKeysFinal.yview(MOVETO, '0.0')
Tony Lowndsaf7a3022002-09-29 00:23:08 +0000176 for variable in self.modifier_vars:
177 variable.set('')
178 self.keyString.set('')
Kurt B. Kaiser6655e4b2002-12-31 16:03:23 +0000179
Steven M. Gavaedb60a72002-01-12 09:48:02 +0000180 def LoadFinalKeyList(self):
Steven M. Gavafacfc092002-01-19 00:29:54 +0000181 #these tuples are also available for use in validity checks
Steven M. Gavaedb60a72002-01-12 09:48:02 +0000182 self.functionKeys=('F1','F2','F2','F4','F5','F6','F7','F8','F9',
183 'F10','F11','F12')
Steven M. Gavafacfc092002-01-19 00:29:54 +0000184 self.alphanumKeys=tuple(string.ascii_lowercase+string.digits)
Steven M. Gavac628a062002-01-19 10:33:21 +0000185 self.punctuationKeys=tuple('~!@#%^&*()_-+={}[]|;:,.<>/?')
186 self.whitespaceKeys=('Tab','Space','Return')
187 self.editKeys=('BackSpace','Delete','Insert')
188 self.moveKeys=('Home','End','Page Up','Page Down','Left Arrow',
189 'Right Arrow','Up Arrow','Down Arrow')
Steven M. Gavafacfc092002-01-19 00:29:54 +0000190 #make a tuple of most of the useful common 'final' keys
Steven M. Gavac628a062002-01-19 10:33:21 +0000191 keys=(self.alphanumKeys+self.punctuationKeys+self.functionKeys+
192 self.whitespaceKeys+self.editKeys+self.moveKeys)
Raymond Hettinger931237e2003-07-09 18:48:24 +0000193 self.listKeysFinal.insert(END, *keys)
Kurt B. Kaiser6655e4b2002-12-31 16:03:23 +0000194
Kurt B. Kaiser2303b1c2003-11-24 05:26:16 +0000195 def TranslateKey(self, key, modifiers):
196 "Translate from keycap symbol to the Tkinter keysym"
197 translateDict = {'Space':'space',
198 '~':'asciitilde','!':'exclam','@':'at','#':'numbersign',
Steven M. Gavac628a062002-01-19 10:33:21 +0000199 '%':'percent','^':'asciicircum','&':'ampersand','*':'asterisk',
200 '(':'parenleft',')':'parenright','_':'underscore','-':'minus',
201 '+':'plus','=':'equal','{':'braceleft','}':'braceright',
202 '[':'bracketleft',']':'bracketright','|':'bar',';':'semicolon',
203 ':':'colon',',':'comma','.':'period','<':'less','>':'greater',
204 '/':'slash','?':'question','Page Up':'Prior','Page Down':'Next',
205 'Left Arrow':'Left','Right Arrow':'Right','Up Arrow':'Up',
Thomas Wouters0e3f5912006-08-11 14:57:12 +0000206 'Down Arrow': 'Down', 'Tab':'Tab'}
Kurt B. Kaisere0712772007-08-23 05:25:55 +0000207 if key in translateDict:
Kurt B. Kaiser2303b1c2003-11-24 05:26:16 +0000208 key = translateDict[key]
209 if 'Shift' in modifiers and key in string.ascii_lowercase:
210 key = key.upper()
211 key = 'Key-' + key
Steven M. Gavac628a062002-01-19 10:33:21 +0000212 return key
Kurt B. Kaiser6655e4b2002-12-31 16:03:23 +0000213
Kurt B. Kaiser2303b1c2003-11-24 05:26:16 +0000214 def OK(self, event=None):
Kurt B. Kaiser5c6e0a12005-11-22 21:09:37 +0000215 if self.advanced or self.KeysOK(): # doesn't check advanced string yet
Steven M. Gavafacfc092002-01-19 00:29:54 +0000216 self.result=self.keyString.get()
Steven M. Gavaedb60a72002-01-12 09:48:02 +0000217 self.destroy()
Kurt B. Kaiser6655e4b2002-12-31 16:03:23 +0000218
Steven M. Gavaedb60a72002-01-12 09:48:02 +0000219 def Cancel(self, event=None):
Steven M. Gavafacfc092002-01-19 00:29:54 +0000220 self.result=''
Steven M. Gavaedb60a72002-01-12 09:48:02 +0000221 self.destroy()
Kurt B. Kaiser6655e4b2002-12-31 16:03:23 +0000222
Kurt B. Kaiser2303b1c2003-11-24 05:26:16 +0000223 def KeysOK(self):
Kurt B. Kaiser5c6e0a12005-11-22 21:09:37 +0000224 '''Validity check on user's 'basic' keybinding selection.
225
226 Doesn't check the string produced by the advanced dialog because
227 'modifiers' isn't set.
228
229 '''
Kurt B. Kaiser2303b1c2003-11-24 05:26:16 +0000230 keys = self.keyString.get()
Steven M. Gava68d73362002-01-19 01:30:56 +0000231 keys.strip()
Kurt B. Kaiser2303b1c2003-11-24 05:26:16 +0000232 finalKey = self.listKeysFinal.get(ANCHOR)
233 modifiers = self.GetModifiers()
234 # create a key sequence list for overlap check:
235 keySequence = keys.split()
236 keysOK = False
237 title = 'Key Sequence Error'
238 if not keys:
239 tkMessageBox.showerror(title=title, parent=self,
240 message='No keys specified.')
241 elif not keys.endswith('>'):
242 tkMessageBox.showerror(title=title, parent=self,
243 message='Missing the final Key')
Kurt B. Kaiser5c6e0a12005-11-22 21:09:37 +0000244 elif (not modifiers
245 and finalKey not in self.functionKeys + self.moveKeys):
Kurt B. Kaiser2303b1c2003-11-24 05:26:16 +0000246 tkMessageBox.showerror(title=title, parent=self,
247 message='No modifier key(s) specified.')
248 elif (modifiers == ['Shift']) \
249 and (finalKey not in
Kurt B. Kaiser5c6e0a12005-11-22 21:09:37 +0000250 self.functionKeys + self.moveKeys + ('Tab', 'Space')):
251 msg = 'The shift modifier by itself may not be used with'\
252 ' this key symbol.'
253 tkMessageBox.showerror(title=title, parent=self, message=msg)
Kurt B. Kaiser2303b1c2003-11-24 05:26:16 +0000254 elif keySequence in self.currentKeySequences:
255 msg = 'This key combination is already in use.'
Kurt B. Kaiser5c6e0a12005-11-22 21:09:37 +0000256 tkMessageBox.showerror(title=title, parent=self, message=msg)
Kurt B. Kaiser2303b1c2003-11-24 05:26:16 +0000257 else:
258 keysOK = True
259 return keysOK
Kurt B. Kaiser6655e4b2002-12-31 16:03:23 +0000260
Steven M. Gavaedb60a72002-01-12 09:48:02 +0000261if __name__ == '__main__':
262 #test the dialog
263 root=Tk()
264 def run():
Steven M. Gavaedb60a72002-01-12 09:48:02 +0000265 keySeq=''
Steven M. Gava68d73362002-01-19 01:30:56 +0000266 dlg=GetKeysDialog(root,'Get Keys','find-again',[])
Guido van Rossumbe19ed72007-02-09 05:37:30 +0000267 print(dlg.result)
Steven M. Gavaedb60a72002-01-12 09:48:02 +0000268 Button(root,text='Dialog',command=run).pack()
269 root.mainloop()