B
ý¤§ÇÙ:¬Vã @ s0 d dl Z d dlT d dlmZmZ d dlmZ d dlmZ dZ ye j
e j
e
¡e ¡ZW n ek
rn e ZY nX e j
e¡r‚eZ ne j
e ¡sœede f ƒ‚e fdd „Zd d
d „ZG d d
„ d
ƒZG dd„ dƒZG dd„ deƒZG dd„ dƒZdd„ Zedkr,d dlmZ edddd d d l m Z e eƒ dS ) é N)Ú*)ÚFrameÚ Scrollbar)ÚidleConf)Ú
zoomheightZIconsz can't find icon directory (%r)c C sÔ t ƒ }ddl}| tj | d¡¡}| ¡ g }d }}x’|D ]Š}tj tj |¡¡d }t||d} | | ¡ t
|| ddd}
|
j ||d t
||d }
|
j |d |d |d }|d
kr<|d }d}q 1 if one scrolls fast. Flicking the wheel
generates up to maybe 20 events with n up to 10 or more 1.
Macs use wheel down (delta = 1*n) to scroll up, so positive
delta means to scroll up on both systems.
X-11 sends Control-Button-4,5 events instead.
The widget parameter is needed so browser label bindings can pass
the underlying canvas.
This function depends on widget.yview to not be overridden by
a subclass.
r é éûÿÿÿé NZunitsÚbreak) Z EventTypeZ
MouseWheelZdeltaZ ButtonPressZnumÚtypeÚwidgetÚyviewZSCROLL)Úeventr) ZupÚlinesr! r! r" Ú wheel_event; s r- c @ s¾ e Zd Zdd„ Zdd„ Zdd„ Zd*dd „Zd+d
d „Zd d
„ Zdd„ Z d,dd„Z
d-dd„Z d.dd„Z dd„ Z
dd„ Zdd„ Zd d „ Zd d „ Zd d!„ Zd/d"d#„Zd0d$d%„Zd1d&d'„Zd2d(d)„ZdS )3ÚTreeNodec C s: || _ || _|| _d| _d| _g | _d | _| _i | _d S )NÚ collapsedF) ÚcanvasÚparentÚitemÚstateÚselectedÚchildrenÚxÚyÚ
iconimages)Úselfr0 r1 r2 r! r! r" Ú__init__V s zTreeNode.__init__c C s6 x*| j d d … D ]}| j |¡ | ¡ qW d | _d S )N)r5 ÚremoveÚdestroyr1 )r9 Úcr! r! r" r< ` s zTreeNode.destroyc C sf y
| j | S tk
r Y nX tj |¡\}}|p6d}tj t|| ¡}t| j|d}|| j |< |S )Nz.gif)r r ) r8 ÚKeyErrorr r r r ÚICONDIRr r0 )r9 r r ZextÚfullnamer
r! r! r" Ú geticonimagef s
zTreeNode.geticonimageNc C s: | j r
d S | ¡ d| _ | j | j¡ | ¡ | ¡ d S )NT)r4 Ú deselectallr0 ÚdeleteÚimage_idÚdrawiconÚdrawtext)r9 r+ r! r! r" Úselectr s zTreeNode.selectc C s2 | j s
d S d| _ | j | j¡ | ¡ | ¡ d S )NF)r4 r0 rC rD rE rF )r9 r+ r! r! r" Údeselect{ s zTreeNode.deselectc C s | j r| j ¡ n| ¡ d S )N)r1 rB Ú deselecttree)r9 r! r! r" rB ƒ s zTreeNode.deselectallc C s* | j r| ¡ x| jD ] }| ¡ qW d S )N)r4 rH r5 rI )r9 Úchildr! r! r" rI ‰ s zTreeNode.deselecttreec C s* | j dkr| ¡ n| ¡ | j ¡ dS )NÚexpandedr' )r3 ÚcollapseÚexpandr2 Ú
OnDoubleClick)r9 r+ r! r! r" Úflip s
z
TreeNode.flipc C s2 | j ¡ sd S | jdkr.d| _| ¡ | ¡ d S )NrK )r2 Ú
_IsExpandabler3 ÚupdateÚview)r9 r+ r! r! r" rM — s
zTreeNode.expandc C s | j dkrd| _ | ¡ d S )Nr/ )r3 rQ )r9 r+ r! r! r" rL Ÿ s
zTreeNode.collapsec C s® | j d }| ¡ j d }|| }| j d¡}| j ¡ }| j |¡}||krV||krVd S | j | jd ¡\}}} }
||krŽ||krŽ|| | } n|} t| ƒ|
} | j | ¡ d S )Nr é r Ú scrollregion)r7 Úlastvisiblechildr0 ZcanvasyZ winfo_heightZ_getintsÚfloatZ yview_moveto) r9 ÚtopZbottomZheightZ visible_topZvisible_heightZvisible_bottomÚx0Úy0Úx1Úy1Zfractionr! r! r" rR ¤ s
z
TreeNode.viewc C s& | j r | jdkr | j d ¡ S | S d S )NrK éÿÿÿÿ)r5 r3 rU )r9 r! r! r" rU µ s zTreeNode.lastvisiblechildc C s€ | j r| j ¡ nj| jd }d| jd< | j ¡ | j t¡ | dd¡ | j t¡\}}}}| jjdd||fd || jd< d S )NZcursorZwatché r r )rT )r1 rQ r0 rC ZALLÚdrawÚbboxÚ configure)r9 Z oldcursorrX rY rZ r[ r! r! r" rQ » s
zTreeNode.updatec C sx d}|| | _ | _| ¡ | ¡ | jdkr4|| S | jsz| j ¡ }|sP|d S x(|D ] }| | j | |¡}| j
|¡ qVW |d }|| }d} x²| jD ]¨}|} | j j |d |d ||d dd | ||¡}|j
¡ r–|jdkrìd }
|j} n
d
}
|j} | |
¡} | j j|d | d | d }
| j |
d | ¡ | j |
d
dd„ ¡ q–W | j j |d |d |d | d dd}
| j |
¡ |S )Né rK rS r é r] Zgray50)ÚfillZ minusnodeZplusnode)r
z<1>z
c S s d S )Nr! )r6 r! r! r" Úë ó z TreeNode.draw..r )r6 r7 rE rF r3 r5 r2 Ú _GetSubListÚ __class__r0 r Z create_liner^ rP rL rM rA Ú create_imageÚtag_bindZ tag_lower)r9 r6 r7 ZdyÚsublistr2 rJ ZcxZcyZcylastZiconnameÚcallbackr
Úidr! r! r" r^ È sD
"
z
TreeNode.drawc C s~ | j r | j ¡ p | j ¡ p d}n| j ¡ p,d}| |¡}| jj| j| jd|d}|| _ | j
|d| j ¡ | j
|d| j ¡ d S )NZ
openfolderZfolderÚnw)Úanchorr
z<1>z
)
r4 r2 ÚGetSelectedIconNameÚ GetIconNamerA r0 rh r6 r7 rD ri rG rO )r9 Z imagenamer
rl r! r! r" rE ò s
zTreeNode.drawiconc
s¨ ˆ j d d }ˆ jd }ˆ j ¡ }|r€ˆ jj||d|d}ˆ j |dˆ j¡ ˆ j |dˆ j¡ ˆ j |¡\}}}}t
|dƒd }ˆ j ¡ pŒd
} y
ˆ j W n t
k
r¬ Y n
X ˆ ¡ y
ˆ j W n* t
k
rê tˆ j| d d d d
ˆ _Y nX t ¡ }
ˆ jrˆ j t |
d¡¡ nˆ j t |
d¡¡ ˆ jj||dˆ jd}ˆ j dˆ j¡ ˆ j dˆ j¡ ˆ j d‡ fdd„¡ ˆ j d‡ fdd„¡ ˆ j d‡ fdd„¡ |ˆ _d S )Nra r r$ rm )rn r z<1>z
éÈ r z r r )r r ZpadxZpadyZhiliteZnormal)rn Zwindowz c s t | ˆ jƒS )N)r- r0 )Úe)r9 r! r" rd re z#TreeNode.drawtext..z
c s t | ˆ jƒS )N)r- r0 )rr )r9 r! r" rd re z
c s t | ˆ jƒS )N)r- r0 )rr )r9 r! r" rd ! re )r6 r7 r2 Ú GetLabelTextr0 Z create_textri rG rO r_ ÚmaxÚGetTextÚentryÚAttributeErrorÚ edit_finishr r r Z CurrentThemer4 r` Z GetHighlightZ
create_windowÚbindÚselect_or_editZtext_id) r9 ZtextxZtextyZ labeltextrl rX rY rZ r[ r Zthemer! )r9 r" rF ÿ s@
zTreeNode.drawtextc C s* | j r | j ¡ r | |¡ n
| |¡ d S )N)r4 r2 Ú
IsEditableÚeditrG )r9 r+ r! r! r" rz $ s zTreeNode.select_or_editc C sr t | jdddd| _| j d| jd ¡ | j dt¡ | jjdd | j ¡ | j d| j ¡ | j d| j
¡ d S ) Nr r )r ÚhighlightthicknessÚwidthr r& )Zipadxzz) ZEntryr rv ÚinsertZselection_rangeZENDÚpackÚ focus_setry rx Ú edit_cancel)r9 r+ r! r! r" r| * s
z
TreeNode.editc C s| y| j }| ` W n tk
r" d S X | ¡ }| ¡ |rR|| j ¡ krR| j |¡ | j ¡ }|| jd< | ¡ | j
¡ d S )Nr ) rv rw Úgetr< r2 ru ÚSetTextr rF r0 r )r9 r+ rv r r! r! r" rx 3 s
zTreeNode.edit_finishc C sB y| j }| ` W n tk
r" d S X | ¡ | ¡ | j ¡ d S )N)rv rw r< rF r0 r )r9 r+ rv r! r! r" r‚ B s zTreeNode.edit_cancel)N)N)N)N)N)N)N)N)N)Ú__name__Ú
__module__Ú __qualname__r: r< rA rG rH rB rI rO rM rL rR rU rQ r^ rE rF rz r| rx r‚ r! r! r! r" r. T s(
*
%
r. c @ st e Zd ZdZdd„ Zdd„ Zdd„ ZdZd d
„ Zd d „ Z d
d„ Z
dd„ Z dd„ Z dd„ Z
dd„ Zdd„ Zdd„ ZdS )ÚTreeItemz‚Abstract class representing tree items.
Methods should typically be overridden, otherwise a default action
is used.
c C s dS )z)Constructor. Do whatever you need to do.Nr! )r9 r! r! r" r: V s zTreeItem.__init__c C s dS )z Return text string to display.Nr! )r9 r! r! r" ru Y s zTreeItem.GetTextc C s dS )z>Return label text string to display in front of text (if any).Nr! )r9 r! r! r" rs \ s zTreeItem.GetLabelTextNc C s | j dkr| ¡ | _ | j S )z%Do not override! Called by TreeNode.N)Ú
expandableÚ IsExpandable)r9 r! r! r" rP a s
zTreeItem._IsExpandablec C s dS )z"Return whether there are subitems.r r! )r9 r! r! r" rŠ g s zTreeItem.IsExpandablec C s" | ¡ s g S | ¡ }|s d| _|S )z%Do not override! Called by TreeNode.r )rŠ Ú
GetSubListr‰ )r9 rj r! r! r" rf k s zTreeItem._GetSubListc C s dS )z-Return whether the item's text may be edited.Nr! )r9 r! r! r" r{ t s zTreeItem.IsEditablec C s dS )z+Change the item's text (if it is editable).Nr! )r9 r r! r! r" r„ w s zTreeItem.SetTextc C s dS )z-Return name of icon to be displayed normally.Nr! )r9 r! r! r" rp z s zTreeItem.GetIconNamec C s dS )z2Return name of icon to be displayed when selected.Nr! )r9 r! r! r" ro } s z TreeItem.GetSelectedIconNamec C s dS )z%Return list of items forming sublist.Nr! )r9 r! r! r" r‹ € s zTreeItem.GetSubListc C s dS )z%Called on a double-click on the item.Nr! )r9 r! r! r" rN ƒ s zTreeItem.OnDoubleClick)r… r† r‡ Ú__doc__r: ru rs r‰ rP rŠ rf r{ r„ rp ro r‹ rN r! r! r! r" rˆ M s rˆ c @ sH e Zd ZdZdd„ Zdd„ Zdd„ Zdd „ Zd
d „ Zd d
„ Z dd„ Z
dS )Ú FileTreeItemz4Example TreeItem subclass -- browse the file system.c C s
|| _ d S )N)r )r9 r r! r! r" r: s zFileTreeItem.__init__c C s t j | j¡p| jS )N)r r r )r9 r! r! r" ru s zFileTreeItem.GetTextc C s t j | j¡dkS )NÚ )r r r )r9 r! r! r" r{ “ s zFileTreeItem.IsEditablec C sl t j | j¡}t j ||¡}t j |¡t j | j¡kr:d S yt | j|¡ || _W n tk
rf Y nX d S )N)r r Údirnamer ÚrenameÚOSError)r9 r Únewpathr! r! r" r„ – s
zFileTreeItem.SetTextc C s | ¡ s dS d S )NÚpython)rŠ )r9 r! r! r" rp ¡ s zFileTreeItem.GetIconNamec C s t j | j¡S )N)r r Úisdir)r9 r! r! r" rŠ ¥ s zFileTreeItem.IsExpandablec C sj yt | j¡}W n tk
r$ g S X |jt jjd g }x*|D ]"}tt j | j|¡ƒ}| |¡ q@W |S )N)Úkey) r Úlistdirr r‘ r Únormcaser r r )r9 Únamesrj r r2 r! r! r" r‹ ¨ s
zFileTreeItem.GetSubListN) r… r† r‡ rŒ r: ru r{ r„ rp rŠ r‹ r! r! r! r" r ‰ s r c @ s< e Zd Zdd„ Zdd„ Zdd„ Zdd„ Zd d
„ Zd d „ Zd
S )ÚScrolledCanvasc K sh d|krd|d< || _ t|ƒ| _| jjddd | jjddd t| jf|Ž| _| jjdddd t| jdd | _ | j jddd
d t| jd d d
| _
| j
jdddd | j j | jd< | jj | j d< | j
j | jd< | jj
| j
d< | j d| j¡ | j d| j¡ | j d| j¡ | j d| j¡ | j dt¡ | j dt¡ | j dt¡ | j d| j¡ | j ¡ d S )NZyscrollincrementrS r r )ZweightZnsew)r r
ZstickyÚvbar)r ZnseÚhbarZ
horizontal)r ZorientZewsZyscrollcommandZcommandZxscrollcommandz z
zz
z z
z
z )r r ÚframeZ rowconfigureZcolumnconfigureZCanvasr0 r r rš r› Úsetr* Zxviewry Úpage_upÚ page_downÚunit_upÚ unit_downr- Ú zoom_heightr )r9 r Zoptsr! r! r" r: ¹ s2
zScrolledCanvas.__init__c C s | j dd¡ dS )Nr\ Úpager' )r0 Ú yview_scroll)r9 r+ r! r! r" rž Ô s zScrolledCanvas.page_upc C s | j dd¡ dS )Nr r£ r' )r0 r¤ )r9 r+ r! r! r" rŸ × s zScrolledCanvas.page_downc C s | j dd¡ dS )Nr\ Úunitr' )r0 r¤ )r9 r+ r! r! r" r Ú s zScrolledCanvas.unit_upc C s | j dd¡ dS )Nr r¥ r' )r0 r¤ )r9 r+ r! r! r" r¡ Ý s zScrolledCanvas.unit_downc C s t | j¡ dS )Nr' )r r¢ r )r9 r+ r! r! r" r¢ à s zScrolledCanvas.zoom_heightN) r… r† r‡ r: rž rŸ r r¡ r¢ r! r! r! r" r™ · s r™ c C s† t | ƒ}tt| ¡ d¡dd … ƒ\}}| d|d |d f ¡ t|dddd}|jjdd td
t t
ƒ}t |j d |ƒ}|
¡ d S ) Nú+r z+%d+%dé2 é¯ Zwhiter )Zbgr} Z takefocusZboth)rM rc Zside)ZToplevelÚmapÚintZgeometryÚsplitr™ rœ r€ ZLEFTr r? r. r0 rM )r1 rW r6 r7 Zscr2 Znoder! r! r" Ú _tree_widgetå s r¬ Ú__main__)Úmainzidlelib.idle_test.test_treer F)Ú verbosityÚexit)Úrun)N) r ZtkinterZ tkinter.ttkr r Zidlelib.configr Zidlelibr r? r r r Ú__file__Z_icondirÚ NameErrorr” Ú RuntimeErrorr# r- r. rˆ r r™ r¬ r… Zunittestr® Zidlelib.idle_test.htestr± r! r! r! r" Ú s4
z<..