Your IP : 18.223.239.65
3
� f�0 � @ s� d Z ddlZddlZddlmZmZ ddlmZmZm Z m
Z
m Z ddl m
Z
mZmZmZ ddlmZ ddlmZ G dd � d e�ZG d
d � d e�ZG d d
� d
e�ZG dd� de�Zedkr�ddlmZ edddd� ddlm Z e ee� dS )a�
Dialogs that query users and verify the answer before accepting.
Use ttk widgets, limiting use to tcl/tk 8.5+, as in IDLE 3.6+.
Query is the generic base class for a popup dialog.
The user must either enter a valid answer or close the dialog.
Entries are validated when <Return> is entered or [Ok] is clicked.
Entries are ignored when [Cancel] or [X] are clicked.
The 'return value' is .result set to either a valid answer or None.
Subclass SectionName gets a name for a new config file section.
Configdialog uses it for new highlight theme and keybinding set names.
Subclass ModuleName gets a name for File => Open Module.
Subclass HelpSource gets menu item and path for additions to Help menu.
� N)�
executable�platform)�Toplevel� StringVar�W�E�S)�Frame�Button�Entry�Label)�
filedialog)�Fontc sb e Zd ZdZdi ddd�dd�Zdd� Zdd
d �Zd d
� Zddd�Zddd�Z � fdd�Z
� Z S )�QueryzoBase class for getting verified answer from a user.
For this base class, accept any non-blank string.
� F)�text0�
used_names�_htest�_utestc
C sX t j| |� | j� || _| j|� || _|| _|| _| j|� | j � | j
j dd�}|dkr�y| j
j dd| j dd� W n Y nX | j
d| j� | j
d | j� | jd
| j� | j
d | j� | j
d | j� | jd
d
d� | j� | j� | jd|j� |j� d | j� d |j� |�s2|j� d | j� d nd f � |�sT| j� | j � dS )a� Create popup, do not return until tk widget destroyed.
Additional subclass init must be done before calling this
unless _utest=True is passed to suppress wait_window().
title - string, title of popup dialog
message - string, informational message to display
text0 - initial value for entry
used_names - names already in use
_htest - bool, change box location when running htest
_utest - bool, leave window hidden and not modal
�tk�windowingsystemZaquaz!::tk::unsupported::MacWindowStyleZstyleZ
moveableModalr z <Command-.>z <Key-Escape>ZWM_DELETE_WINDOWz <Key-Return>z
<KP_Enter>F)Zheight�widthz+%d+%d� � N) r �__init__Zwithdraw�parent�title�messager r Z transientZgrab_setr ZcallZ_wZbind�cancelZprotocol�okZ resizable�create_widgetsZupdate_idletasksZgeometryZ winfo_rootxZ winfo_widthZwinfo_reqwidthZ winfo_rootyZ winfo_heightZwinfo_reqheightZ deiconifyZ wait_window) �selfr r r r r r r r � r" �2/opt/alt/python36/lib64/python3.6/idlelib/query.pyr % sB
*zQuery.__init__c C s. t | dd� | _}|jdddd� |jddd� t|dd | jd
�}t| | j�| _t |d | jd �| _
| j
j � t d
d| j
d�| _t|dd| jd�| _t|dd| jd�| _t|d| jd�| _|jddddtd� | j
jddddtt ddgd� | jjdd ddtt d� | jjdd dd � | jjd d dd � d S ) N�
)Zpaddingr Znews)�column�row�sticky� )Zweight�w�left)�anchor�justify�text� )r � textvariableZ
TkCaptionFontT)�name�exists�root� �red)r- �
foreground�fontZOKZactive)r- �default�commandZCancel)r- r8 � � )r% r& �
columnspan�padxr' )r% r& r; r< r' �padyr �c )r% r& r< )r �frame�gridZgrid_columnconfigurer r r r Zentryvarr �entry� focus_setr r �
error_font� entry_errorr
r Z button_okr Z
button_cancelr r )r! r? Z
entrylabelr" r" r# r W s.
zQuery.create_widgetsNc C s d| |p| j d< d S )NzERROR: r- )rD )r! r Zwidgetr" r" r# � showerrors s zQuery.showerrorc C s. d| j d< | jj� j� }|s*| jd� dS |S )z Return non-blank entry or None.r r- z blank line.N)rD rA �get�striprE )r! rA r" r" r# �entry_okw s
zQuery.entry_okc C s. | j � }|dk r || _| j� n
| jj� dS )z�If entry is valid, bind it to 'result' and destroy tk widget.
Otherwise leave dialog open for user to correct entry or cancel.
N)rH �result�destroyrA rB )r! �eventrA r" r" r# r � s
zQuery.okc C s d| _ | j� dS )z0Set dialog result to None and destroy tk widget.N)rI rJ )r! rK r" r" r# r � s z Query.cancelc s | j � t� j� d S )N)Z grab_release�superrJ )r! )� __class__r" r# rJ � s z
Query.destroy)N)N)N) �__name__�
__module__� __qualname__�__doc__r r rE rH r r rJ �
__classcell__r" r" )rM r# r s 1
r c s0 e Zd ZdZddd�� fdd�
Zdd� Z� ZS )� SectionNamez*Get a name for a config file section name.F)r r c s t � j||||||d� d S )N)r r r )rL r )r! r r r r r r )rM r" r# r � s zSectionName.__init__c C s` d| j d< | jj� j� }|s*| jd� dS t|�dkrD| jd� dS || jkr\| jd� dS |S )z2Return sensible ConfigParser section name or None.r r- zno name specified.Nr. z"name is longer than 30 characters.zname is already in use.)rD rA rF rG rE �lenr )r! r0 r" r" r# rH � s
zSectionName.entry_ok)rN rO rP rQ r rH rR r" r" )rM r# rS � s rS c s0 e Zd ZdZddd�� fdd�
Zdd� Z� ZS )�
ModuleNamez-Get a module name for Open Module menu entry.F)r r c s t � j||||||d� d S )N)r r r )rL r )r! r r r r r r )rM r" r# r � s zModuleName.__init__c C s� d| j d< | jj� j� }|s*| jd� dS ytjj|�}W n2 tt fk
rl } z| jt
|�� dS d}~X nX |dkr�| jd� dS t |j tj
j�s�| jd� dS y|j j|�}W n" tk
r� | jd| d� dS X |S ) z0Return entered module name as file path or None.r r- zno name specified.Nzmodule not foundznot a source-based modulez$loader does not support get_filename)r )rD rA rF rG rE � importlib�util� find_spec�
ValueError� ImportError�str�
isinstance�loader�abc� SourceLoader� get_filename�AttributeError)r! r0 �spec�msgZ file_pathr" r" r# rH � s.
zModuleName.entry_ok)rN rO rP rQ r rH rR r" r" )rM r# rU � s rU c s` e Zd ZdZddi ddd�� fdd�
Z� fdd�Zd d
� Zd d � Zej Z
d
d� Z dd� Z � Z S )�
HelpSourcez,Get menu name and help source for Help menu.r F)�menuitem�filepathr r r c s( || _ d}t� j|||||||d� dS )z�Get menu entry and url/local file for Additional Help.
User enters a name for the Help resource and a web url or file
name. The user can browse for the file.
zName for item on Help menu:)r r r r N)rf rL r ) r! r r re rf r r r r )rM r" r# r � s
zHelpSource.__init__c s� t � j� | j}t|dddd�}t| | j�| _t|| jdd�| _t |dd| j
d �}t|d
d | j d �| _ |j
d
ddddd
gtd� | jj
d
dddtt dd
gd� |j
dddtt d� | j j
d
dddtt d� d S )Nr) r* z,Help File Path: Enter URL or browse for file)r+ r, r- �( )r/ r ZBrowse� )r- r r8 r3 r4 )r- r5 r6 r r$ r9 r: )r% r& r; r< r= r' � r )r% r& r; r< r' r= )r% r& r< r' � )r% r& r; r< r' )rL r r? r r rf �pathvarr �pathr
� browse_filerC �
path_errorr@ r r r )r! r? Z pathlabelZbrowse)rM r" r# r � s"
zHelpSource.create_widgetsc C s t j| |d�j||d�S )N)r � filetypes)Z
initialdirZ initialfile)r
ZOpenZshow)r! ro ZinitdirZinitfiler" r" r# � askfilename� s zHelpSource.askfilenamec C s� dddddg}| j j� }|r.tjj|�\}}nHd }td d � d
krntjjtjjt�d�}tjj |�svtj
� }ntj
� }| j |||�}|r�| j j |� d S )N�
HTML Files� *.htm *.html�TEXT� PDF Files�*.pdf�Windows Help Files�*.chm�
Text Files�*.txt� All Files�*r9 �winZDoc)rq rr rs )rt ru rs )rv rw )rx ry rs )rz r{ )
rk rF �osrl �splitr �join�dirnamer �isdir�getcwdrp �set)r! ro rl �dir�base�filer" r" r# rm s"
zHelpSource.browse_filec C s| | j j� j� }|s$| jd| j� dS |jd
�sx|dd� dkrJ|dd� }tj j|�sh| jd| j� dS tdkrxd | }|S ) z(Simple validity check for menu file pathz no help file path specified.N�www.�httpr: zfile:z help file path does not exist.�darwinzfile://)r� r� ) rl rF rG rE rn �
startswithr} r1 r )r! rl r" r" r# �path_ok s
zHelpSource.path_okc C s@ d| j d< d| jd< | j� }| j� }|dks4|dkr8dS ||fS )z,Return apparently valid (name, path) or Noner r- N)rD rn �item_okr� )r! r0 rl r" r" r# rH * s
zHelpSource.entry_ok)
rN rO rP rQ r r rp rm rS rH r� r� rR r" r" )rM r# rd � s rd �__main__)�mainz idlelib.idle_test.test_queryr F)� verbosity�exit)�run) rQ rV r} �sysr r Ztkinterr r r r r Z tkinter.ttkr r
r r r
Z tkinter.fontr r rS rU rd rN Zunittestr� Zidlelib.idle_test.htestr� r" r" r" r# �<module> s w%^