��Yf�G � @ s� d Z d d l TGd d � d e � Z Gd d � d e � Z Gd d � d e � Z Gd d
� d
e � Z d d � Z e d
k r� d d l
m Z e e � d S)a An implementation of tabbed pages using only standard Tkinter.
Originally developed for use in IDLE. Based on tabpage.py.
Classes exported:
TabbedPageSet -- A Tkinter implementation of a tabbed-page widget.
TabSet -- A widget containing tabs (buttons) in one or more rows.
� )�*c @ s e Z d Z d S)�InvalidNameErrorN)�__name__�
__module__� __qualname__� r r �8/opt/alt/python35/lib64/python3.5/idlelib/tabbedpages.pyr s r c @ s e Z d Z d S)�AlreadyExistsErrorN)r r r r r r r r
s r c @ s� e Z d Z d Z d d d d d d � Z d d � Z d
d � Z d d
� Z d d � Z d d � Z d d � Z
Gd d � d e � Z d S)�TabSetzjA widget containing tabs (buttons) in one or more rows.
Only one tab may be selected at a time.
N� � Fc K s� t j | | | � | | _ | | _ | | _ | | _ | | _ i | _ i | _ | rj t | � | _
n g | _
d | _ g | _ t | d d d d d t
d | j d � �| _ | j j d t d t d
d � | j � d S) a Constructor arguments:
select_command -- A callable which will be called when a tab is
selected. It is called with the name of the selected tab as an
argument.
tabs -- A list of strings, the names of the tabs. Should be specified in
the desired tab order. The first tab will be the default and first
active tab. If tabs is None or empty, the TabSet will be initialized
empty.
n_rows -- Number of rows of tabs to be shown. If n_rows <= 0 or is
None, then the number of rows will be decided by TabSet. See
_arrange_tabs() for details.
max_tabs_per_row -- Used for deciding how many rows of tabs are needed,
when the number of rows is not constant. See _arrange_tabs() for
details.
N�height� � borderwidthr �relief�
background�side�fill�expandF)�Frame�__init__�select_command�n_rows�max_tabs_per_row� expand_tabs�page_set�_tabs�_tab2row�list�
_tab_names�
_selected_tab� _tab_rows�FLAT�cgetZ
padding_frame�pack�TOP�X�
_arrange_tabs)�selfr r Ztabsr r r �kwr r r r s$ zTabSet.__init__c C sS | s t d | � � | | j k r5 t d | � � | j j | � | j � d S)z.Add a new tab with the name given in tab_name.zInvalid Tab name: '%s'z Tab named '%s' already existsN)r r r �appendr' )r( �tab_namer r r �add_tabD s zTabSet.add_tabc C s= | | j k r t d | � � | j j | � | j � d S)z Remove the tab named <tab_name>zNo such Tab: '%sN)r �KeyError�remover' )r( r+ r r r �
remove_tabN s zTabSet.remove_tabc C s� | | j k r d S| d k r> | | j k r> t d | � � | j d k ra | j | j j � d | _ | d k r� | | _ | j | } | j � | j | } | j � | j d t d t d d � d S)z1Show the tab named <tab_name> as the selected oneNzNo such Tab: '%sr r r r )
r r r- �
set_normal� set_selectedr � pack_forgetr$ r% r& )r( r+ �tab�tab_rowr r r �set_selected_tabV s
zTabSet.set_selected_tabc C s� | s
d St | � } | j d t d t d d � | j j | � xx | D]p } t j | | j | | � } | r� | j d t d t d d � n | j d t � | | j
| <| | j | <qI Wd | _ d S)Nr r r r T)
r r$ r% r& r! r* r
� TabButtonr �LEFTr r �is_last_in_row)r( � tab_namesr r4 r+ r3 r r r � _add_tab_rowl s
zTabSet._add_tab_rowc C s6 x& | j r( | j j � } | j � q Wi | _ d S)N)r! �pop�destroyr )r( r4 r r r �_reset_tab_rows� s zTabSet._reset_tab_rowsc C sB x$ | j r& | j j � d j � q W| j � | j s> d S| j d k rh | j d k rh | j } n t | j � d | j d } | j p� | d k } d } xh t | � D]Z } t | j � | d | | d } | j | | | � } | | 7} | j
| | � q� W| j } | j d � | | j k r>| j | � d S)aW
Arrange the tabs in rows, in the order in which they were added.
If n_rows >= 1, this will be the number of rows used. Otherwise the
number of rows will be calculated according to the number of tabs and
max_tabs_per_row. In this case, the number of rows may change when
adding/removing tabs.
r Nr )
r �popitemr< r= r r �lenr r �ranger: r r5 )r( r r �iZ row_indexZn_tabsr9 �selectedr r r r' � s&
#
zTabSet._arrange_tabsc @ sg e Z d Z d Z d Z d d � Z d d � Z d d � Z d d
� Z d d � Z d
d d � Z
d S)zTabSet.TabButtonzA simple tab-like widget.r c C s� t j | | d | j d t �| | _ | | _ | | _ d | _ t | d | d | j d d d d d
t
d t
d d
d d d d
� | _ | j j d t
d t d d � | j � | j � d S)z�Constructor arguments:
name -- The tab's name, which will appear in its button.
select_command -- The command to be called upon selection of the
tab. It is called with the tab's name as an argument.
r r F�text�command�padxr �padyr Z takefocusZ indicatoronZhighlightthicknessr Z selectcolor� r r r TN)r r �bw�RAISED�namer �tab_setr8 Z Radiobutton�
_select_eventZFALSEZbuttonr$ r7 r& � _init_masksr0 )r( rJ r r4 rK r r r r � s
zTabSet.TabButton.__init__c G s | j | j � d S)as Event handler for tab selection.
With TabbedPageSet, this calls TabbedPageSet.change_page, so that
selecting a tab changes the page.
Note that this does -not- call set_selected -- it will be called by
TabSet.set_selected_tab, which should be called when whatever the
tabs are related to changes.
N)r rJ )r( �argsr r r rL � s z TabSet.TabButton._select_eventc C s | j d d � d S)zAssume selected lookrB TN)� _place_masks)r( r r r r1 � s z TabSet.TabButton.set_selectedc C s | j d d � d S)zAssume normal lookrB FN)rO )r( r r r r0 � s zTabSet.TabButton.set_normalc
C s | j j } | j j d � } t | d d d t d | �| _ t | d d d t d | �| _ t | j d | j d t �| j _
| j j
j d d d | j d d | j d | j d
� t | d d d t d | �| _ t | j d | j d t �| j _
d S) Nr r r r �x�y�widthr r
� )rK r � pages_framer# r r" �mask�msklrH rI Zml�place�mskr�mr)r( r r r r r rM � s z TabSet.TabButton._init_masksFc C s� | j } | r | | j 7} | j j d | d d d d d d d d d d d
d d d d | � | j j d | d d d | j d d d d d d d
| j d d d | � | j j } | r� | j s� | j � | j � | j � | j � k r� | | j 8} | j j d | d d d d d d d d d d d
| j d d d | � | j j
j d | j d | j d
d
| j d | | j d
� | j j � d S)NZin_Zrelxg rP r Zrelyg �?rQ ZrelwidthrR Z relheightr
r ) rH rU rW rV rK r r8 Z winfo_rootxZ winfo_widthrX rY �lower)r( rB r
r r r r rO � s4
# z TabSet.TabButton._place_masksN) r r r �__doc__rH r rL r1 r0 rM rO r r r r r6 � s r6 )
r r r r[ r r, r/ r5 r: r= r' r r6 r r r r r
s ,
(r
c @ s� e Z d Z d Z Gd d � d e � Z Gd d � d e � Z Gd d � d e � Z Gd d � d e � Z d
e d d d
d d � Z d d � Z
d d � Z d d � Z d
S)�
TabbedPageSetaj A Tkinter tabbed-pane widget.
Constains set of 'pages' (or 'panes') with tabs above for selecting which
page is displayed. Only one page will be displayed at a time.
Pages may be accessed through the 'pages' attribute, which is a dictionary
of pages, using the name given as the key. A page is an instance of a
subclass of Tk's Frame widget.
The page widgets will be created (and destroyed when required) by the
TabbedPageSet. Do not call the page's pack/place/grid/destroy methods.
Pages may be added or removed at any time using the add_page() and
remove_page() methods.
c @ s@ e Z d Z d Z d Z d d � Z d d � Z d d � Z d S)
zTabbedPageSet.Pagez{Abstract base class for TabbedPageSet's pages.
Subclasses must override the _show() and _hide() methods.
Fc C s t | d d d t �| _ d S)Nr r r )r rI �frame)r( r r r r r 9 s zTabbedPageSet.Page.__init__c C s
t � d S)N)�NotImplementedError)r( r r r �_show< s zTabbedPageSet.Page._showc C s
t � d S)N)r^ )r( r r r �_hide? s zTabbedPageSet.Page._hideN)r r r r[ � uses_gridr r_ r` r r r r �Page1 s
rb c @ s4 e Z d Z d Z d Z d d � Z d d � Z d S)zTabbedPageSet.PageRemovezAPage class using the grid placement manager's "remove" mechanism.Tc C s# | j j d d d d d t � d S)N�rowr �column�sticky)r] �grid�NSEW)r( r r r r_ F s z TabbedPageSet.PageRemove._showc C s | j j � d S)N)r] Z grid_remove)r( r r r r` I s z TabbedPageSet.PageRemove._hideN)r r r r[ ra r_ r` r r r r �
PageRemoveB s rh c sF e Z d Z d Z d Z � f d d � Z d d � Z d d � Z � S) zTabbedPageSet.PageLiftz?Page class using the grid placement manager's "lift" mechanism.Tc sI t t j | � j | � | j j d d d d d t � | j j � d S)Nrc r rd re )�superr\ �PageLiftr r] rf rg rZ )r( r )� __class__r r r P s z TabbedPageSet.PageLift.__init__c C s | j j � d S)N)r] Zlift)r( r r r r_ U s z TabbedPageSet.PageLift._showc C s | j j � d S)N)r] rZ )r( r r r r` X s z TabbedPageSet.PageLift._hide)r r r r[ ra r r_ r` r r )rk r rj L s
rj c @ s. e Z d Z d Z d d � Z d d � Z d S)z TabbedPageSet.PagePackForgetzAPage class using the pack placement manager's "forget" mechanism.c C s | j j d t d d � d S)Nr r T)r] r$ �BOTH)r( r r r r_ ] s z"TabbedPageSet.PagePackForget._showc C s | j j � d S)N)r] r2 )r( r r r r` ` s z"TabbedPageSet.PagePackForget._hideN)r r r r[ r_ r` r r r r �PagePackForget[ s rm Nr r Fc K sJ t j | | | � | | _ i | _ g | _ d | _ d | _ | j d d d �| j d d d �t | � | _ | j j
d d d d d t � | j j r� | j j d d d �| j j d d d �t
| | j d | d | d
| �| _ | rx | D] } | j | � q W| j j
d d d d d t � | j | j � d S) a� Constructor arguments:
page_names -- A list of strings, each will be the dictionary key to a
page's widget, and the name displayed on the page's tab. Should be
specified in the desired page order. The first page will be the default
and first active page. If page_names is None or empty, the
TabbedPageSet will be initialized empty.
n_rows, max_tabs_per_row -- Parameters for the TabSet which will
manage the tabs. See TabSet's docs for details.
page_class -- Pages can be shown/hidden using three mechanisms:
* PageLift - All pages will be rendered one on top of the other. When
a page is selected, it will be brought to the top, thus hiding all
other pages. Using this method, the TabbedPageSet will not be resized
when pages are switched. (It may still be resized when pages are
added/removed.)
* PageRemove - When a page is selected, the currently showing page is
hidden, and the new page shown in its place. Using this method, the
TabbedPageSet may resize when pages are changed.
* PagePackForget - This mechanism uses the pack placement manager.
When a page is shown it is packed, and when it is hidden it is
unpacked (i.e. pack_forget). This mechanism may also cause the
TabbedPageSet to resize when the page is changed.
Nr Zweightr rc rd re r r r )r r �
page_class�pages� _pages_order�
_current_page�
_default_pageZcolumnconfigureZ rowconfigurerT rf rg ra r
� change_page�_tab_set�add_page) r( �parent�
page_namesrn r r r r) rJ r r r r c s*
zTabbedPageSet.__init__c C s� | s t d | � � | | j k r5 t d | � � | j | j � | j | <| j j | � | j j | � t | j � d k r� | | _
| j | � d S)z0Add a new page with the name given in page_name.zInvalid TabPage name: '%s'z!TabPage named '%s' already existsr N) r ro r rn rT rp r* rt r, r? rr rs )r( � page_namer r r ru � s
zTabbedPageSet.add_pagec C s� | | j k r t d | � � | j j | � t | j � d k rf | | j k ro | j d | _ n d | _ | | j k r� | j | j � | j j | � | j j
| � } | j j � d S)z2Destroy the page whose name is given in page_name.zNo such TabPage: '%sr N)
ro r- rp r. r? rr rq rs rt r/ r; r] r< )r( rx Zpager r r � remove_page� s zTabbedPageSet.remove_pagec C s� | j | k r d S| d k r> | | j k r> t d | � � | j d k ra | j | j j � d | _ | d k r� | | _ | j | j � | j j | � d S)z/Show the page whose name is given in page_name.NzNo such TabPage: '%s')rq ro r- r` r_ rt r5 )r( rx r r r rs � s zTabbedPageSet.change_page)
r r r r[ �objectrb rh rj rm r ru ry rs r r r r r\ s
; r\ c s� t � } t t t t j d | j � � � � \ } } } } | j d | | d f � | j d � t | d d d g d d d
d �� � j d t
d
t d t � t
� j d j d d d d �j � t
� j d j d d d d �j � t
� j d j d d �j � t | � � t | d d d � � f d d � �} t | d d d � � f d d � �} t
| d d �} | j d d d d � | j d d d d � | j d d � � j d d � | j � d S) Nz[x+]z+%d+%d� zTest tabbed pagesrw ZFoobarZBazr r r Fr r r rC ZFoorF � ZBarzAdd PagerD c s � j � j � � S)N)ru �getr )� entryPgName�tabPager r �<lambda>� s z _tabbed_pages.<locals>.<lambda>z Remove Pagec s � j � j � � S)N)ry r} r )r~ r r r r� � s zname of page to add/remove:rE r )ZTkr �map�int�re�splitZgeometry�titler\ r$ r% ZTRUErl ZLabelro r] ZEntryZButtonZmainloop) rv �rootrR r
rP rQ Z buttonAddZ buttonRemoveZ labelPgNamer )r~ r r �
_tabbed_pages� s* 3
&& r� �__main__)�runN) r[ Ztkinter� Exceptionr r r r
r\ r� r Zidlelib.idle_test.htestr� r r r r �<module> s
� �