3
2a`4 @ sz d dl T d dlmZ d dl mZ d dlZd dlZG dd deZedkrvd dl m
Z
e
d d
d d d d
l m Z e e dS ) )*) Scrollbar)
messageboxNc @ s e Zd ZdZdddddZdd Zdd Zd
d Zd d
Zdd Z dd Z
dd Z dd Z dd Z
dd Zd#dd Zd$d d Zd d Zd!d" ZdS )%
GetKeysDialogzKey Sequence ErrorF)_htest_utestc C sN t j| | | j | jdd | jttd | j| | j| | j | j d| j
|| _ || _ || _
d| _t| | _| jjd | j g | _x,| jD ]"}t| }|jd | jj| qW d| _| j | j | j | jd|j |j d | j d |j |s(|j d | j d nd f |sJ| j! | j" d S )
N ) borderwidth)heightwidthZWM_DELETE_WINDOW Fz+%d+%d )#Toplevel__init__ZwithdrawZ configureZ resizableZFALSEtitleZ transientZgrab_setZprotocolCancelparentactioncurrentKeySequencesresultZ StringVar keyStringsetSetModifiersForPlatform
modifier_vars modifiersappendadvanced
CreateWidgetsLoadFinalKeyListZupdate_idletasksZgeometryZ winfo_rootxZ winfo_widthZwinfo_reqwidthZ winfo_rootyZ winfo_heightZwinfo_reqheightZ deiconifyZ wait_window) selfr r r r r r modifiervariable r# //opt/alt/python36/lib64/python3.6/config_key.pyr sB
*zGetKeysDialog.__init__c O s t j|| d S )N)r showerror)r argskwargsr# r# r$ r% > s zGetKeysDialog.showerrorc C s t | dtd}|jtttd t | }|jttd t|dd| j d| _
| j
j ddd d d
t|d d| j d| _
| j
j dd d d d
t || _t || _t || _t || _| jj ddtd d d
| jj ddtd d d
| jj | jj d dtd d | jj d dtd d | jj t|| jdd| _| jj ddtd d d t| jd| j d d}|jtd t| jt| jt dd}|jd d td i | _ d}xft | j | j D ]T\}}| j!j"||}t#| j| j$|||dd} | j d|dtd | | j |< |d 7 }qW t| jtd?d!}
|
j d dd"dtd# t%| jd$d%t&d&| _'| j'j(d'| j) | j'j dd"d"t*d( t+| jt,| j'j-d)} | j'j.| j/d* | j dd d"t*d( t| jd+| j0d,| _1| j1j ddd"d- t| jtd.| j d/ d0 d!} | jtd t2| j| jd1| _3| j3jtd2 t| jtdEd!}
|
j ddtd: d S )FNr
)r relief)sideexpandfill)r) r+ OK )textr commandr r )rowcolumnpadxpadyr )r0 r1 stickyr2 r3 )r0 r1 r5 r2 z Advanced Key Binding Entry >>)r/ r. )r0 r1 Zstickr2 r3 zNew keys for 'z' :)r. )Zanchor)justify textvariabler( r )ZipadxZipadyr+ r )r/ r. r" ZonvalueZoffvalue)r0 r1 r2 r5 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.))r6 r. )r0 r1
columnspanr2 r5
)r r
Z
selectmodez)r0 r1 Zrowspanr5 )Zorientr/ )Zyscrollcommandz
Clear Keys)r. r/ )r0 r1 r9 zEnter new binding(s) for 'z' :
z2(These bindings will not be checked for validity!))r7 )r+ z4Key bindings are specified using Tkinter keysyms as
zin these samples: , , ,
, , .
Upper case is used when the Shift modifier is present!
z8'Emacs style' multi-keystroke bindings are specified as
z5follows: , where the first key
z!is the 'do-nothing' keybinding.
z4Multiple separate bindings for one action should be
z,separated by a space, eg., .)r0 r1 r5 zCSelect the desired modifier keys
above, and the final key from the
zWSelect the desired modifier keys
above, and the final key from the
list on the right.
zySelect the desired modifier keys
above, and the final key from the
list on the right.
Use upper case Symbols when using
zSelect the desired modifier keys
above, and the final key from the
list on the right.
Use upper case Symbols when using
the Shift modifier. (Letters will be
zSelect the desired modifier keys
above, and the final key from the
list on the right.
Use upper case Symbols when using
the Shift modifier. (Letters will be
converted automatically.)zKey bindings are specified using Tkinter keysyms as
in these samples: , , ,
, , .
Upper case is used when the Shift modifier is present!
a Key bindings are specified using Tkinter keysyms as
in these samples: , , ,
, , .
Upper case is used when the Shift modifier is present!
'Emacs style' multi-keystroke bindings are specified as
a@ Key bindings are specified using Tkinter keysyms as
in these samples: , , ,
, , .
Upper case is used when the Shift modifier is present!
'Emacs style' multi-keystroke bindings are specified as
follows: , where the first key
aa Key bindings are specified using Tkinter keysyms as
in these samples: , , ,
, , .
Upper case is used when the Shift modifier is present!
'Emacs style' multi-keystroke bindings are specified as
follows: , where the first key
is the 'do-nothing' keybinding.
a Key bindings are specified using Tkinter keysyms as
in these samples: , , ,
, , .
Upper case is used when the Shift modifier is present!
'Emacs style' multi-keystroke bindings are specified as
follows: , where the first key
is the 'do-nothing' keybinding.
Multiple separate bindings for one action should be
a Key bindings are specified using Tkinter keysyms as
in these samples: , , ,
, , .
Upper case is used when the Shift modifier is present!
'Emacs style' multi-keystroke bindings are specified as
follows: , where the first key
is the 'do-nothing' keybinding.
Multiple separate bindings for one action should be
separated by a space, eg., .)4ZFrameZSUNKENpackZTOPZTRUEZBOTHZBOTTOMXZButtonr, ZbuttonOKZgridr Z buttonCancelframeKeySeqBasicframeKeySeqAdvancedframeControlsBasicframeHelpAdvancedZNSEWlift ToggleLevel buttonLevelZEWZLabelr WZLEFTr ZGROOVEZmodifier_checkbuttonszipr r modifier_labelgetZ CheckbuttonBuildKeyStringZListboxZSINGLE
listKeysFinalbindFinalKeySelectedZNSr ZVERTICALyviewconfigr ClearKeySeqZ buttonClearZEntryentryKeysAdvanced)r Z frameMainZ frameButtonsZlabelTitleBasicZlabelKeysBasicr1 r! r" ZlabelZcheckZ
labelFnAdviceZscrollKeysFinalZlabelTitleAdvancedZlabelHelpAdvancedr# r# r$ r B s
zGetKeysDialog.CreateWidgetsc C s4 t jdkrddddg| _n dddg| _ddi| _d S )NdarwinShiftZControlZOptionZCommandZAltZCtrl)sysplatformr rG )r r# r# r$ r s
z%GetKeysDialog.SetModifiersForPlatformc C s | j jdd d dkrT| j | j jdd | jj | jj | jj d| _ n0| j | j jdd | j
j | j j d| _ d S ) Nr. r- ZAdvancedz<< Basic Key Binding Entry)r. Tz Advanced Key Binding Entry >>F) rD ZcgetrO rN r? rB rA rP Z focus_setr r> r@ )r r# r# r$ rC s
zGetKeysDialog.ToggleLevelc C s | j d S )N)rI )r eventr# r# r$ rL s z GetKeysDialog.FinalKeySelectedc C sP | j }}| jjt}|r2| j||}|j| | jjddj| d d S )N<->) GetModifiersrJ rH ANCHOR TranslateKeyr r r join)r ZkeyListr finalKeyr# r# r$ rI s
z GetKeysDialog.BuildKeyStringc C s dd | j D }dd |D S )Nc S s g | ] }|j qS r# )rH ).0r" r# r# r$
s z.GetKeysDialog.GetModifiers..c S s g | ] }|r|qS r# r# )r^ modr# r# r$ r_ s )r )r ZmodListr# r# r$ rY s zGetKeysDialog.GetModifiersc C sF | j jdt | j jtd x| jD ]}|jd q$W | jjd d S )Nr z0.0r )rJ Z select_clearENDrM ZMOVETOr r r )r r" r# r# r$ rO s
zGetKeysDialog.ClearKeySeqc C sn d | _ ttjtj | _td
| _d | _d | _d | _ | j| j | j | j | j | j }| j
j t f| d S ) NF1F2F3F4F5F6F7F8F9F10F11F12z~!@#%^&*()_-+={}[]|;:,.<>/?TabSpaceReturn BackSpaceDeleteInsertHomeEndPage Up Page Down
Left Arrow Right ArrowUp Arrow
Down Arrow) rb rc rd re rf rg rh ri rj rk rl rm )rn ro rp )rq rr rs )rt ru rv rw rx ry rz r{ )
functionKeystuplestringascii_lowercasedigitsZ alphanumKeysZpunctuationKeysZwhitespaceKeysZeditKeysmoveKeysrJ insertra )r keysr# r# r$ r s
$z GetKeysDialog.LoadFinalKeyListc $ C s ddddddddd d
d d d
ddddddddddddddd d d d d d!d"d#d$#}||kr\|| }d%|krv|t jkrv|j }d&| }|S )'NZspaceZ
asciitildeZexclamZatZ
numbersignpercentZ asciicircumZ ampersandZasteriskZ parenleftZ
parenrightZ
underscoreZminusZplusZequalZ braceleftZ
bracerightZ bracketleftZ bracketrightZbarZ semicolonZcolonZcommaZperiodZlessZgreaterZslashZquestionZPriorZNextZLeftZRightZUpZDownrn )#ro ~!@#%^&r ()_rW +={}[]|;:,.rV rX /?zPage Upz Page Downz
Left Arrowz Right ArrowzUp Arrowz
Down Arrowrn rR zKey-)r~ r upper)r keyr Z
translateDictr# r# r$ r[ s
zGetKeysDialog.TranslateKeyNc C s\ | j j j }|s(| j| j| dd d S | js8| j|rH| j|rH|| _| j | j
d S )NzNo key specified.)r r message) r rH stripr% keyerror_titler KeysOKbind_okr grab_releasedestroy)r rU r r# r# r$ r, s
zGetKeysDialog.OKc C s d| _ | j | j d S )Nr )r r r )r rU r# r# r$ r s zGetKeysDialog.Cancelc C s | j jt}| j }d}| j}dd | jD }|jdsJ| j|| dd n~| rr|| j| j krr| j|| dd nV|d gkr|| j| j d krd }| j|| |d n"||krd
}| j|| |d nd}|S )NFc S s g | ]}|D ]}|q qS r# r# )r^ Zkeylistr r# r# r$ r_ s z(GetKeysDialog.KeysOK..rX zMissing the final Key)r r z No modifier key(s) specified.)r r r rR rn ro zBThe shift modifier by itself may not be used with this key symbol.z'This key combination is already in use.T)rn ro )
rJ rH rZ rY r r endswithr% r| r )r r r] r ZkeysOKr Z
key_sequencesmsgr# r# r$ r s,
zGetKeysDialog.KeysOKc C sb y| j |dd }W n8 tk
rL } z | j| j| d| d dS d }~X nX | j|| dS d S )Nc S s d S )Nr# r# r# r# r$ s z'GetKeysDialog.bind_ok..z2The entered key sequence is not accepted.
Error: )r r r FT)rK ZTclErrorr% r Zunbind)r r Zbindingerrr# r# r$ r s zGetKeysDialog.bind_ok)N)N)__name__
__module__ __qualname__r r r% r r rC rL rI rY rO r r[ r, r r r r# r# r# r$ r s -O
!r __main__)mainz!idlelib.idle_test.test_config_keyr
F) verbosityexit)run)
ZtkinterZ tkinter.ttkr r r~ rS r r r Zunittestr Zidlelib.idle_test.htestr r# r# r# r$ s