관리-도구
편집 파일: config_key.cpython-37.opt-1.pyc
B � f�8 � @ s� d Z ddlmZmZmZmZ ddlmZmZm Z m Z m Z m Z ddlm Z ddlZddlZdZeejej �Zed�ZdZd Zd Zee e e e e Zd d � ZG d d� de�Ze dkr�ddl m Z e dddd� ddl m Z e e� dS )z6 Dialog for building Tkinter accelerator key bindings � )�Toplevel�Listbox� StringVar�TclError)�Frame�Button� Checkbutton�Entry�Label� Scrollbar)� messageboxN) ZF1ZF2ZF3ZF4ZF5ZF6ZF7ZF8ZF9ZF10ZF11ZF12z~!@#%^&*()_-+={}[]|;:,.<>/?)�Tab�SpaceZReturn)Z BackSpaceZDeleteZInsert)ZHomeZEndzPage Upz Page Downz Left Arrowz Right ArrowzUp Arrowz Down Arrowc $ C s| ddddddddd d d d d ddddddddddddddd d d d d d!d"d#d$�#}|� | | �} d%|krr| tjkrr| �� } d&| � �S )'z3Translate from keycap symbol to the Tkinter keysym.ZspaceZ asciitildeZexclamZatZ numbersignZpercentZ asciicircumZ ampersandZasteriskZ parenleftZ parenrightZ underscoreZminusZplusZequalZ braceleftZ bracerightZ bracketleftZ bracketrightZbarZ semicolonZcolonZcommaZperiodZlessZgreaterZslashZquestionZPriorZNextZLeftZRightZUpZDownr )#r �~�!�@�#�%�^�&�*�(�)�_�-�+�=�{�}�[�]�|�;�:�,�.�<�>�/�?zPage Upz Page Downz Left Arrowz Right ArrowzUp Arrowz Down Arrowr �ShiftzKey-)�get�string�ascii_lowercase�upper)�key� modifiers�mapping� r2 �7/opt/alt/python37/lib64/python3.7/idlelib/config_key.py� translate_key s r4 c @ s� e Zd ZdZddd�dd�Zdd� Zdd � Zd d � Zd d � Zd dd�Z dd� Z dd� Z dd� Z d dd�Z d!dd�Zdd � Zd d � ZdS )"� GetKeysDialogzKey Sequence ErrorF)�_htest�_utestc C sF t �| |� | �� | jdd� | jddd� | �|� | �|� | �� | �d| j � || _ || _ || _ d| _ t| �| _| j�d� | �� g | _x,| jD ]"}t| �}|�d� | j�|� q�W d| _| �� | �� | �d|�� |�� d | �� d |� � |�s |� � d | � � d nd f � |�sB| � � | � � d S ) a� parent - parent of this dialog title - string which is the title of the popup dialog action - string, the name of the virtual event these keys will be mapped to current_key_sequences - list, a list of all key sequence lists currently mapped to virtual events, for overlap checking _htest - bool, change box location when running htest _utest - bool, do not wait when running unittest � )� borderwidthF)�height�widthZWM_DELETE_WINDOW� z+%d+%d� � N)!r �__init__ZwithdrawZ configureZ resizable�titleZ transientZgrab_setZprotocol�cancel�parent�action�current_key_sequences�resultr � key_string�set�set_modifiers_for_platform� modifier_varsr0 �append�advanced�create_widgetsZupdate_idletasksZgeometryZ winfo_rootxZ winfo_widthZwinfo_reqwidthZ winfo_rootyZ winfo_heightZwinfo_reqheightZ deiconifyZ wait_window) �selfrB r@ rC rD r6 r7 �modifier�variabler2 r2 r3 r? 0 s@ *zGetKeysDialog.__init__c O s t j||� d S )N)r � showerror)rM �args�kwargsr2 r2 r3 rP ` s zGetKeysDialog.showerrorc C s0 t | ddd� | _}|jdddd� t | �}|jdd d � t|d d | jd �| _| jjddddd� t|dd | jd �| _| jjddddd� t |dd�| _ | j jdddddd� t | j d| j � d�d�}|jdd� t | j d | j d dd �}|jddd d � t |�| _ | j jddddd � i | _d}xft| j| j�D ]T\}}| j�||�}t| j | j|||d!d"�} | jd|ddd#� | | j|< |d7 }�q0W t | j d d$d%�} | jddd&ddd'� t| j d(d)d*d+�| _| jjdBt�� | j�d-| j� | jjdd&d&d.d/� t | j d0| jj d1�} | jj | j d2� | jddd&d.d/� t| j d3| j d4�| _!| j!jddd&d5� t |d6d�| _"| j"jdddddd� t | j"d d7| j � d8�d9 d%�} | jdd� t#| j"| j d:�| _$| j$jd d;� t |�| _%| j%jddddd � t | j%d d<d%�} | jdddd=� t|| j&d>d?�| _'| j'jddd@dddA� | �&� d S )CNr= Zsunken)r9 �relief�topTZboth)�side�expand�fillZbottom�x)rU rW ZOK� )�textr; �commandr r8 )�row�column�padx�padyZCancel� Z keyseq_basic)�nameZnsew)r\ r] �stickyr^ r_ zNew keys for 'z' :)rZ �w)�anchor�leftZgroove)�justify� textvariablerS r9 )ZipadxZipadyrW )r\ r] rb r^ r< )r[ rZ rO ZonvalueZoffvalue)r\ r] r^ rb z�Select 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.))rf rZ � )r\ r] � columnspanr^ rb � � Zsingle)r; r: Z selectmode�endz<ButtonRelease-1>�ns)r\ r] Zrowspanrb Zvertical)Zorientr[ )Zyscrollcommandz Clear Keys)rZ r[ )r\ r] ri Zkeyseq_advancedzEnter new binding(s) for 'z' : z2(These bindings will not be checked for validity!))rg )rW a� Key bindings are specified using Tkinter keysyms as 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! 'Emacs style' multi-keystroke bindings are specified as follows: <Control-x><Control-y>, where the first key is the 'do-nothing' keybinding. Multiple separate bindings for one action should be separated by a space, eg., <Alt-v> <Meta-v>.)r\ r] rb z<< Basic Key Binding Entry)r[ rZ Zew)r\ r] Zstickr^ r_ )rl )(r �frameZpackr �okZ button_okZgridrA Z button_cancel�frame_keyseq_basicr rC rF �frame_controls_basicZmodifier_checkbuttons�zipr0 rI �modifier_labelr+ r �build_key_stringr �list_keys_final�insert�AVAILABLE_KEYS�bind�final_key_selectedr �yview�configrG � clear_key_seqZ button_clear�frame_keyseq_advancedr � advanced_keys�frame_help_advanced� toggle_level� button_level)rM rn Z frame_buttonsZ basic_titleZ basic_keysr] rN rO ZlabelZcheckZ help_basicZscroll_keys_finalZadvanced_titleZ help_advancedr2 r2 r3 rL d s� z GetKeysDialog.create_widgetsc C s4 t jdkrddddg| _n dddg| _ddi| _dS ) aV 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. �darwinr* ZControlZOptionZCommandZAltZCtrlN)�sys�platformr0 rs )rM r2 r2 r3 rH � s z(GetKeysDialog.set_modifiers_for_platformc C s� | j �d��d�rN| �� | j jdd� | j�� | j�� | j� � d| _ n0| �� | j jdd� | j �� | j �� d| _ dS ) z'Toggle between basic and advanced keys.rZ ZAdvancedz<< Basic Key Binding Entry)rZ Tz Advanced Key Binding Entry >>FN) r� Zcget� startswithr| r{ r} Zliftr r~ Z focus_setrK rp rq )rM r2 r2 r3 r� � s zGetKeysDialog.toggle_levelNc C s | � � dS )z3Handler for clicking on key in basic settings list.N)rt )rM �eventr2 r2 r3 ry � s z GetKeysDialog.final_key_selectedc C sN | � � }}| j�d�}|r0t||�}|�|� | j�dd�|�� d�� dS )z2Create formatted string of modifiers plus the key.rd r& r r' N)� get_modifiersru r+ r4 rJ rF rG �join)rM �keylistr0 � final_keyr2 r2 r3 rt � s z GetKeysDialog.build_key_stringc C s dd� | j D �}dd� |D �S )z9Return ordered list of modifiers that have been selected.c S s g | ] }|� � �qS r2 )r+ )�.0rO r2 r2 r3 � <listcomp>� s z/GetKeysDialog.get_modifiers.<locals>.<listcomp>c S s g | ] }|r|�qS r2 r2 )r� �modr2 r2 r3 r� � s )rI )rM Zmod_listr2 r2 r3 r� � s zGetKeysDialog.get_modifiersc C sF | j �dd� | j �dd� x| jD ]}|�d� q$W | j�d� dS )z#Clear modifiers and keys selection.r rl Zmovetoz0.0r< N)ru Z select_clearrz rI rG rF )rM rO r2 r2 r3 r| � s zGetKeysDialog.clear_key_seqc C s\ | j �� �� }|s(| j| j| dd� d S | js8| �|�rH| �|�rH|| _| � � | � � d S )NzNo key specified.)r@ rB �message) rF r+ �striprP �keyerror_titlerK �keys_ok�bind_okrE � grab_release�destroy)rM r� �keysr2 r2 r3 ro s zGetKeysDialog.okc C s d| _ | �� | �� d S )Nr< )rE r� r� )rM r� r2 r2 r3 rA s zGetKeysDialog.cancelc C s� | j �d�}| �� }| j}dd� | jD �}|�d�sF| j|| dd� nt|sh|tt krh| j|| dd� nR|d gkr�|tt d kr�d }| j|| |d� n"||kr�d }| j|| |d� nd S dS )z�Validity check on user's 'basic' keybinding selection. Doesn't check the string produced by the advanced dialog because 'modifiers' isn't set. rd c S s g | ]}|D ]}|�q qS r2 r2 )r� r� r/ r2 r2 r3 r� s z)GetKeysDialog.keys_ok.<locals>.<listcomp>r' zMissing the final Key)rB r� z No modifier key(s) specified.)r@ rB r� r* )r r zBThe shift modifier by itself may not be used with this key symbol.z'This key combination is already in use.TF) ru r+ r� r� rD �endswithrP � FUNCTION_KEYS� MOVE_KEYS)rM r� r� r0 r@ Z key_sequences�msgr2 r2 r3 r� s* zGetKeysDialog.keys_okc C sd y| � |dd� �}W n: tk rN } z | j| j| d|� �d� dS d}~X Y nX | �||� dS dS )z:Return True if Tcl accepts the new keys else show message.c S s d S )Nr2 r2 r2 r2 r3 �<lambda>4 � z'GetKeysDialog.bind_ok.<locals>.<lambda>z2The entered key sequence is not accepted. Error: )r@ rB r� FNT)rx r rP r� Zunbind)rM r� Zbinding�errr2 r2 r3 r� 1 s zGetKeysDialog.bind_ok)N)N)N)�__name__� __module__� __qualname__r� r? rP rL rH r� ry rt r� r| ro rA r� r� r2 r2 r2 r3 r5 + s /f r5 �__main__)�mainz!idlelib.idle_test.test_config_keyr= F)� verbosity�exit)�run)!�__doc__Ztkinterr r r r Z tkinter.ttkr r r r r r r r, r� r� �tupler- ZdigitsZ ALPHANUM_KEYSZPUNCTUATION_KEYSZWHITESPACE_KEYSZ EDIT_KEYSr� rw r4 r5 r� Zunittestr� Zidlelib.idle_test.htestr� r2 r2 r2 r3 �<module> s*