Your IP : 18.227.52.111
��Yf�0 � @ sw d Z d d l Td d l j Z d d l Z d d l Z Gd d � d e � Z e d k rs d d l
m Z e e � d S)z6
Dialog for building Tkinter accelerator key bindings
� )�*Nc @ s� e Z d Z d d d � Z d d � Z d d � Z d d � Z d
d � Z d d
� Z d d � Z d d � Z
d d � Z d d � Z d d d � Z
d d d � Z d d � Z d S) �
GetKeysDialogFc C s� t j | | � | j d d � | j d t d t � | j | � | j | � | j � | j d | j � | | _
| | _ | | _ d | _
t | � | _ | j j d � | j � g | _ x: | j D]/ } t | � } | j d � | j j | � q� Wd | _ | j � | j � | j � | j � | j d | j � | j � d | j � d | j � | s�| j � d | j � d n d
f � | j! � | j" � d S) a3
action - string, the name of the virtual event these keys will be
mapped to
currentKeys - list, a list of all key sequence lists currently mapped
to virtual events, for overlap checking
_htest - bool, change box location when running htest
� borderwidth� �height�widthZWM_DELETE_WINDOW� Fz+%d+%d� � N)#�Toplevel�__init__Z configureZ resizableZFALSE�titleZ transientZgrab_setZprotocol�Cancel�parent�action�currentKeySequences�resultZ StringVar� keyString�set�SetModifiersForPlatform�
modifier_vars� modifiers�append�advanced�
CreateWidgets�LoadFinalKeyListZwithdrawZupdate_idletasksZgeometryZ winfo_rootxZ winfo_widthZwinfo_reqwidthZ winfo_rootyZ winfo_heightZwinfo_reqheightZ deiconifyZ wait_window)�selfr r
r r Z_htest�modifier�variable� r �=/opt/alt/python35/lib64/python3.5/idlelib/keybindingDialog.pyr
s@
0
zGetKeysDialog.__init__c
C sZ t | d d d t �} | j d t d t d t � t | � } | j d t d t � t | d d d d
d | j �| _
| j
j d d
d d
d d d d � t | d d d d
d | j �| _
| j
j d d
d d d d d d � t | � | _ t | � | _ t | � | _ t | � | _ | j j d d
d d
d t d d d d � | j j d d
d d
d t d d d d � | j j � | j j d d d d
d t d d � | j j d d d d
d t d d � | j j � t | d | j d d �| _ | j j d d d d
d t d d d d � t | j d d | j d �} | j d t � t | j d t d | j d t d d �} | j d d d d d t � i | _ d
} x� t | j | j � D]� \ } } | j! j" | | � } t# | j d | j$ d | d | d | d d! �} | j d d
d | d d d t � | | j | <| d 7} q�Wt | j d t d d" d# d$ d% d& d' �}
|
j d d d d
d( d) d d d t � t% | j d d* d+ d, d- t& �| _' | j' j( d. | j) � | j' j d d
d d) d/ d) d t* � t+ | j d0 t, d | j' j- �} | j' j. d1 | j/ � | j d d
d d d/ d) d t* � t | j d d2 d | j0 �| _1 | j1 j d d d d
d( d) � t | j d t d d3 | j d4 d5 �} | j d t � t2 | j d | j �| _3 | j3 j d t � t | j d t d d6 d7 d8 d9 d: d; d< �}
|
j d d
d d
d t � d S)=Nr r ZreliefZside�expandZfill�text�OKr � Zcommand�rowr �columnZpadxr Zpadyr � Zstickyz Advanced Key Binding Entry >>ZstickzNew keys for 'z' :ZanchorZjustifyZ textvariableZipadxZipadyr ZonvalueZoffvaluer z!Select the desired modifier keys
z"above, and the final key from the
zlist on the right.
z"Use upper case Symbols when using
z&the Shift modifier. (Letters will be
zconverted automatically.)Z
columnspan� � r �
Z
selectmodez<ButtonRelease-1>ZrowspanZorientZyscrollcommandz
Clear KeyszEnter new binding(s) for 'z' :
z2(These bindings will not be checked for validity!)z4Key bindings are specified using Tkinter keysyms as
z�in these samples: <Control-f>, <Shift-F2>, <F12>,
<Control-space>, <Meta-less>, <Control-Alt-Shift-X>.
Upper case is used when the Shift modifier is present!
z8'Emacs style' multi-keystroke bindings are specified as
z5follows: <Control-x><Control-y>, where the first key
z!is the 'do-nothing' keybinding.
z4Multiple separate bindings for one action should be
z,separated by a space, eg., <Alt-v> <Meta-v>.)4ZFrameZSUNKENZpackZTOPZTRUEZBOTHZBOTTOM�XZButtonr# ZbuttonOKZgridr Z buttonCancel�frameKeySeqBasic�frameKeySeqAdvanced�frameControlsBasic�frameHelpAdvancedZNSEW�lift� ToggleLevel� buttonLevelZEWZLabelr �WZLEFTr ZGROOVEZmodifier_checkbuttons�zipr r �modifier_label�getZ Checkbutton�BuildKeyStringZListboxZSINGLE�
listKeysFinalZbind�FinalKeySelectedZNSZ ScrollbarZVERTICAL�yview�configr � ClearKeySeqZ buttonClearZEntry�entryKeysAdvanced)r Z frameMainZ frameButtonsZlabelTitleBasicZlabelKeysBasicr& r r ZlabelZcheckZ
labelFnAdviceZscrollKeysFinalZlabelTitleAdvancedZlabelHelpAdvancedr r r r 5 s� %%++
%%
+ " "
( %"
zGetKeysDialog.CreateWidgetsc C sL t j d k r' d d d d g | _ n d d d g | _ d d i | _ d S) aU Determine list of names of key modifiers for this platform.
The names are used to build Tk bindings -- it doesn't matter if the
keyboard has these keys, it matters if Tk understands them. The
order is also important: key binding equality depends on it, so
config-keys.def must use the same ordering.
�darwin�ShiftZControlZOptionZCommandZAltZCtrlN)�sys�platformr r5 )r r r r r � s z%GetKeysDialog.SetModifiersForPlatformc C s� | j j d � d d � d k rr | j � | j j d d � | j j � | j j � | j j � d | _ n@ | j � | j j d d � | j
j � | j j � d | _ d S)Nr" r$ ZAdvancedz<< Basic Key Binding EntryTz Advanced Key Binding Entry >>F) r2 Zcgetr< r; r- r0 r/ r= Z focus_setr r, r. )r r r r r1 � s "
zGetKeysDialog.ToggleLevelc C s | j � d S)N)r7 )r �eventr r r r9 � s z GetKeysDialog.FinalKeySelectedc C sl | j � } } | j j t � } | rG | j | | � } | j | � | j j d d j | � d � d S)N�<�-�>) � GetModifiersr8 r6 �ANCHOR� TranslateKeyr r r �join)r ZkeyListr �finalKeyr r r r7 � s
z GetKeysDialog.BuildKeyStringc C s' d d � | j D� } d d � | D� S)Nc S s g | ] } | j � � q Sr )r6 )�.0r r r r �
<listcomp>� s z.GetKeysDialog.GetModifiers.<locals>.<listcomp>c S s g | ] } | r | � q Sr r )rK �modr r r rL � s )r )r ZmodListr r r rF � s zGetKeysDialog.GetModifiersc C s[ | j j d t � | j j t d � x | j D] } | j d � q0 W| j j d � d S)Nr z0.0r )r8 Z select_clear�ENDr: ZMOVETOr r r )r r r r r r< � s
zGetKeysDialog.ClearKeySeqc C s� d | _ t t j t j � | _ t d � | _ d | _ d | _ d | _ | j | j | j | j | j | j } | j
j t | � d S) N�F1�F2�F4�F5�F6�F7�F8�F9�F10�F11�F12z~!@#%^&*()_-+={}[]|;:,.<>/?�Tab�Space�Return� BackSpace�Delete�Insert�Home�End�Page Up� Page Down�
Left Arrow� Right Arrow�Up Arrow�
Down Arrow) rO rP rP rQ rR rS rT rU rV rW rX rY )rZ r[ r\ )r] r^ r_ )r` ra rb rc rd re rf rg )
� functionKeys�tuple�string�ascii_lowercaseZdigitsZ alphanumKeysZpunctuationKeysZwhitespaceKeysZeditKeys�moveKeysr8 �insertrN )r �keysr r r r � s ,z GetKeysDialog.LoadFinalKeyListc F C s# d d d d d d d d d d
d d d
d d d d d d d d d d d d d d d d d d d d! d" d# d$ d% d& d' d( d) d* d+ d, d- d. d/ d0 d1 d2 d3 d4 d5 d6 d7 d8 d9 d: d; d< d= d> d? d@ dA dB dC dD dE dE i# } | | k r� | | } dF | k r| t j k r| j � } dG | } | S)Hz2Translate from keycap symbol to the Tkinter keysymr[ Zspace�~Z
asciitilde�!Zexclam�@Zat�#Z
numbersign�%Zpercent�^Z asciicircum�&Z ampersandr Zasterisk�(Z parenleft�)Z
parenright�_Z
underscorerD Zminus�+Zplus�=Zequal�{Z braceleft�}Z
braceright�[Z bracketleft�]Z bracketright�|Zbar�;Z semicolon�:Zcolon�,Zcomma�.ZperiodrC ZlessrE Zgreater�/Zslash�?ZquestionzPage UpZPriorz Page DownZNextz
Left ArrowZLeftz Right ArrowZRightzUp ArrowZUpz
Down ArrowZDownrZ r? zKey-)rj rk �upper)r �keyr Z
translateDictr r r rH � s
zGetKeysDialog.TranslateKeyNc C s5 | j s | j � r1 | j j � | _ | j � d S)N)r �KeysOKr r6 r �destroy)r rB r r r r# � s zGetKeysDialog.OKc C s d | _ | j � d S)Nr )r r� )r rB r r r r � s zGetKeysDialog.Cancelc C sj | j j � } | j � | j j t � } | j � } | j � } d } d } | st t j d | d | d d � n� | j d � s� t j d | d | d d � n� | r� | | j
| j k r� t j d | d | d d � n� | d
g k r,| | j
| j d k r,d
} t j d | d | d | � n: | | j k r`d } t j d | d | d | � n d } | S)z�Validity check on user's 'basic' keybinding selection.
Doesn't check the string produced by the advanced dialog because
'modifiers' isn't set.
FzKey Sequence Errorr
r �messagezNo keys specified.rE zMissing the final Keyz No modifier key(s) specified.r? rZ r[ zBThe shift modifier by itself may not be used with this key symbol.z'This key combination is already in use.T)rZ r[ )
r r6 �stripr8 rG rF �split� tkMessageBoxZ showerror�endswithrh rl r )r rn rJ r Z keySequenceZkeysOKr
�msgr r r r� � s6
zGetKeysDialog.KeysOK)�__name__�
__module__� __qualname__r r r r1 r9 r7 rF r< r rH r# r r� r r r r r s + O r �__main__)�run) �__doc__ZtkinterZtkinter.messageboxZ
messageboxr� rj r@ r r r� Zidlelib.idle_test.htestr� r r r r �<module> s
�