Your IP : 216.73.216.85
B
� f� � @ s< d Z ddlT ddlZG dd� d�Zdd� Zedkr8e� dS ) zDBasic regular expression demonstration facility (Perl style syntax).� )�*Nc @ s8 e Zd Zdd� Zdd� Zdd� Zd dd �Zd
d
d �ZdS )�ReDemoc C s || _ t| j tdd�| _| jjttd� t| j �| _| jjtd� | j� � | �
� t| j dtd�| _ | j jttd� t| j tdd�| _ | j jtd� | j jtd� t
|�| _| jjttd� t|�| _| j�d � t| jd
| jd | jd �| _| jjtd � t| jd
| jd| jd �| _| jjtd � t| j ddd�| _| jjtdd� | jjddd� t| j dtd�| _| jjtd� t | j �| _ | j jdtd� | j� d| j� | j� d| j � d | _ | �� | j�!� }| j�!|dd � |d d� � | j�!� }| j�!|dd � |d d� � d S )Nz&Enter a Perl-style regular expression:)�anchor�text)�side�fill)r � )r r zEnter a string to search:)r r �firstzHighlight first match)r �variable�value�command)r zHighlight all matches�all�< � )�widthZheight� )r �expand�hit�yellow)�
backgroundzGroups:)r r z<Key>)"�masterZLabel�W�
promptdisplay�packZTOP�XZEntry� regexdisplayZ focus_set�
addoptions�
statusdisplayZ labeldisplay�FrameZ showframeZ StringVar�showvar�setZ Radiobutton� recompileZshowfirstradio�LEFTZ showallradioZText�
stringdisplayZBOTH�
tag_configureZ
grouplabelZListbox� grouplistZbind�
reevaluate�compiledZbindtags)�selfr Zbtags� r) �6/opt/alt/python37/lib64/python3.7/Tools/demo/redemo.py�__init__
sZ
zReDemo.__init__c C s� g | _ g | _g | _x�dD ]�}t| j�d dkrPt| j�}|jtd� | j �|� t t
|�j }t � }t
|||d|| jd�}|jtd� | j�|� | j�|� qW d S )N)�
IGNORECASE� MULTILINE�DOTALL�VERBOSE� r )r )r
r ZoffvalueZonvaluer )r )ZframesZboxes�vars�lenr r r r �append�getattr�rer ZIntVarZ Checkbuttonr! r" )r( �name�frame�val�varZboxr) r) r* r I s"
zReDemo.addoptionsc C s( d}x| j D ]}||�� B }q W |}|S )Nr )r1 �get)r( �flagsr9 r) r) r* �getflags_ s
zReDemo.getflagsNc
C s� y6t �| j�� | �� �| _| jd }| jjd|d� W nB t j k
rx } z"d | _| jjdt
|� dd� W d d }~X Y nX | � � d S )Nr r )r r z re.error: %sZred) r5 �compiler r: r< r' r r �config�error�strr& )r( �eventZbg�msgr) r) r* r! f s
zReDemo.recompilec
C s� y| j �ddt� W n tk
r( Y nX y| j �ddt� W n tk
rR Y nX | j�dt� | jsld S | j jddd� | j jddd� | j �dt�}d}d}x�|t |�k�r�| j�
||�}|d kr�P |� � \}}||kr�|d }d}nd}d | }d | } | j � ||| � |dk�rx| j �
|� t|�� �}
|
�d|�� � x4tt |
��D ]$} d
| |
| f } | j�t| � �qPW |d }| j�� d kr�P q�W |dk�r�| jjd dd
� n| jjdd� d S )Nr z1.0Zhit0r r )r Zoranger z1.0 + %d charsz%2d: %rr z
(no match))r r r )r )r# Z
tag_removeZENDZTclErrorr% �deleter' r$ r: r2 �search�spanZtag_addZyview_pickplace�list�groups�insert�group�ranger r r> )
r( rA r ZlastZnmatches�mr �tagZpfirstZplastrG �i�gr) r) r* r& s sT
zReDemo.reevaluate)N)N)�__name__�
__module__� __qualname__r+ r r< r! r& r) r) r) r* r s
?
r c C s( t � } t| �}| �d| j� | �� d S )NZWM_DELETE_WINDOW)ZTkr Zprotocol�quitZmainloop)�rootZdemor) r) r* �main� s rT �__main__)�__doc__Ztkinterr5 r rT rO r) r) r) r* �<module> s