%PDF-
%PDF-
Mini Shell
Mini Shell
U
n©ßaù8 ã @ s d Z ddlT ddlmZ ddlmZ ddlmZ ddlZddlZi Z G dd„ dƒZ
G d d
„ d
e
ƒZ G d d „ d e
ƒZ G d
d„ dejƒZ
G dd„ de
ƒZG dd„ de
ƒZG dd„ dejƒZdd„ Zdd„ Zdd„ Zd(d d „Zd)d d „Zd*d!d"„Zd#d$„ Zd%d&„ Zed'kr eƒ dS )+aU File selection dialog classes.
Classes:
- FileDialog
- LoadFileDialog
- SaveFileDialog
This module also presents tk common file dialogues, it provides interfaces
to the native file dialogues available in Tk 4.2 and newer, and the
directory dialogue available in Tk 8.3 and newer.
These interfaces were written by Fredrik Lundh, May 1997.
é )Ú*)ÚDialog)Ú commondialog)Ú
_setup_dialogNc @ s e Zd ZdZdZd$dd„Zejdddfdd „Zd%d
d „Z d d
„ Z
dd„ Z dd„ Z dd„ Z
dd„ Zdd„ Zd&dd„Zdd„ Zd d „ Zd'd d „Zd d!„ Zd"d#„ ZdS )(Ú
FileDialogaë Standard file selection dialog -- no checks on selected file.
Usage:
d = FileDialog(master)
fname = d.go(dir_or_file, pattern, default, key)
if fname is None: ...canceled...
else: ...open file...
All arguments to go() are optional.
The 'key' argument specifies a key in the global dictionary
'dialogstates', which keeps track of the values for the directory
and pattern arguments, overriding the values passed in (it does
not keep track of the default argument!). If no key is specified,
the dialog keeps no memory of previous state. Note that memory is
kept even when the dialog is canceled. (All this emulates the
behavior of the Macintosh file selection dialogs.)
zFile Selection DialogNc C sº |d kr| j }|| _d | _t|ƒ| _| j |¡ | j |¡ t| jƒ t| jƒ| _| jj t
t d t | jƒ| _
| j
j t
t d | j
d| j¡ t | jƒ| _| jj tt d | j d| j¡ t| jƒ| _| jj ttd t| jƒ| _| jj ttd t| jd| jdfd| _| jj tttd | j ¡ }| j |dd … |d d… ¡ | j d | j ¡ | j d
| j ¡ | jj | jd fd t| jƒ| _ | j j t!td t| jd| j dfd| _"| j"j t!ttd | j j | j"d fd | j" ¡ }| j" |dd … |d d… ¡ | j" d | j#¡ | j" d
| j$¡ t%| jd
| j&d| _'| j'j t!d t%| jd| jd| _(| j(j t!td t%| jd| j)d| _*| j*j td | j +d| j)¡ | j d| j)¡ | j d| j)¡ d S )N)ÚsideÚfillz<Return>)Úexpandr r Úset)ZexportselectionZyscrollcommand)r r r é z<ButtonRelease-1>z<Double-ButtonRelease-1>Zyview)ÚcommandZOK)Útextr )r ÚFilter)r r ÚCancelZWM_DELETE_WINDOWz<Alt-w>z<Alt-W>),ÚtitleÚmasterÚ directoryZToplevelÚtopZiconnamer ZFrameZbotframeÚpackZBOTTOMÚXZEntryÚ selectionÚbindÚok_eventÚfilterZTOPÚfilter_commandZmidframeZYESZBOTHZ ScrollbarZfilesbarZRIGHTÚYZListboxÚfilesZbindtagsÚfiles_select_eventÚfiles_double_eventZconfigZdirsbarZLEFTÚdirsÚdirs_select_eventÚdirs_double_eventZButtonÚ
ok_commandZ ok_buttonZ
filter_buttonÚcancel_commandZ
cancel_buttonÚprotocol)Úselfr r Zbtags© r& ú./usr/local/lib/python3.8/tkinter/filedialog.pyÚ__init__4 st
ÿ
ÿ
þþþzFileDialog.__init__r Ú c C sÜ |r |t kr t | \| _}n2tj |¡}tj |¡r<|| _ntj |¡\| _}| | j|¡ | |¡ | ¡ | j
¡ | j
¡ | j ¡ d | _| j ¡ |rÌ| ¡ \}}| jrÀtj | j¡}||ft |< | j ¡ | jS ©N)Ú dialogstatesr ÚosÚpathÚ
expanduserÚisdirÚsplitÚ
set_filterÚ
set_selectionr r Z focus_setr Zwait_visibilityZgrab_setÚhowr ZmainloopÚ
get_filterÚdirnameZdestroy)r% Z dir_or_fileÚpatternÚdefaultÚkeyr r& r& r' Úgot s*
z
FileDialog.goc C s || _ | j ¡ d S r* )r3 r Úquit)r% r3 r& r& r' r: s zFileDialog.quitc C s | ¡ d S r* )r ©r% Úeventr& r& r' r! ‘ s z FileDialog.dirs_double_eventc C s@ | ¡ \}}| j d¡}tj tj | j|¡¡}| ||¡ d S ©NZactive) r4 r Úgetr, r- ÚnormpathÚjoinr r1 )r% r< ÚdirÚpatZsubdirr& r& r' r ” s z FileDialog.dirs_select_eventc C s | ¡ d S r* ©r" r; r& r& r' r š s z FileDialog.files_double_eventc C s | j d¡}| |¡ d S r= )r r> r2 )r% r< Úfiler& r& r' r s z FileDialog.files_select_eventc C s | ¡ d S r* rC r; r& r& r' r ¡ s zFileDialog.ok_eventc C s | | ¡ ¡ d S r* )r: Ú
get_selection©r% r& r& r' r" ¤ s zFileDialog.ok_commandc C s& | ¡ \}}zt |¡}W n tk
r: | j ¡ Y d S X || _| ||¡ | ¡ tj g}g }|D ]@}tj
||¡}tj
|¡r|
|¡ qft ||¡rf|
|¡ qf| j dt¡ |D ]}| j t|¡ qº| j dt¡ |D ]}| j t|¡ qàtj
| ¡ ¡\} }
|
tjkrd}
| |
¡ d S )Nr r) )r4 r, ÚlistdirÚOSErrorr Úbellr r1 ÚsortÚpardirr- r@ r/ ÚappendÚfnmatchr ÚdeleteÚENDÚinsertr r0 rE Úcurdirr2 ) r% r< rA rB ÚnamesZsubdirsZ
matchingfilesÚnameÚfullnameÚheadÚtailr& r& r' r § s6
zFileDialog.filter_commandc C sN | j ¡ }tj |¡}|dd … tjks4tj |¡rBtj |d¡}tj |¡S )Néÿÿÿÿr ) r r> r, r- r. Úsepr/ r@ r0 )r% r r& r& r' r4 Ã s
zFileDialog.get_filterc C s | j ¡ }tj |¡}|S r* )r r> r, r- r. ©r% rD r& r& r' rE Ê s
zFileDialog.get_selectionc C s | ¡ d S r* )r: r; r& r& r' r# Ï s zFileDialog.cancel_commandc C s„ t j |¡sPz t ¡ }W n tk
r0 d }Y nX |rPt j ||¡}t j |¡}| j dt ¡ | j
t t j |ptt j |pzd¡¡ d S )Nr r ) r, r- ÚisabsÚgetcwdrH r@ r? r rN rO rP rQ )r% rA rB Úpwdr& r& r' r1 Ò s
zFileDialog.set_filterc C s, | j dt¡ | j ttj | j|¡¡ d S )Nr )r rN rO rP r, r- r@ r rY r& r& r' r2 Þ s zFileDialog.set_selection)N)N)N)N)Ú__name__Ú
__module__Ú __qualname__Ú__doc__r r( r, rQ r9 r: r! r r r r r" r r4 rE r# r1 r2 r& r& r& r' r s"
@
r c @ s e Zd ZdZdZdd„ ZdS )ÚLoadFileDialogz8File selection dialog which checks that the file exists.zLoad File Selection Dialogc C s. | ¡ }tj |¡s | j ¡ n
| |¡ d S r* )rE r, r- Úisfiler rI r: rY r& r& r' r" é s zLoadFileDialog.ok_commandN©r] r^ r_ r` r r" r& r& r& r' ra ã s ra c @ s e Zd ZdZdZdd„ ZdS )ÚSaveFileDialogz@File selection dialog which checks that the file may be created.zSave File Selection Dialogc C s’ | ¡ }tj |¡rZtj |¡r.| j ¡ d S t| jdd|f dddd}|j dkr„d S n*tj
|¡\}}tj |¡s„| j ¡ d S | |¡ d S )Nz Overwrite Existing File QuestionzOverwrite existing file %r?Z questheadr )ZYesr )r r
Zbitmapr7 Ústringsr ) rE r, r- Úexistsr/ r rI r r Únumr0 r: )r% rD ÚdrU rV r& r& r' r" ÷ s&
û
zSaveFileDialog.ok_commandNrc r& r& r& r' rd ñ s rd c @ s e Zd Zdd„ Zdd„ ZdS )Ú_Dialogc C s2 zt | jd ƒ| jd< W n tk
r, Y nX d S )NÚ filetypes)ÚtupleÚoptionsÚKeyErrorrF r& r& r' Ú _fixoptions, s z_Dialog._fixoptionsc C sR |rHz
|j }W n tk
r" Y nX tj |¡\}}|| jd< || jd< || _|S )NÚ
initialdirZ initialfile)ÚstringÚAttributeErrorr, r- r0 rl Úfilename©r% ÚwidgetÚresultr- rD r& r& r' Ú
_fixresult3 s
z_Dialog._fixresultN)r] r^ r_ rn rv r& r& r& r' ri * s ri c @ s e Zd ZdZdZdd„ ZdS )ÚOpenúAsk for a filename to openZtk_getOpenFilec C sx t |tƒrBtdd„ |D ƒƒ}|r>tj |d ¡\}}|| jd< |S |j ¡ sjd| jkrj| ||j |¡¡S t
| ||¡S )Nc S s g | ]}t |d |ƒ‘qS )rp )Úgetattr)Ú.0Úrr& r& r' Ú
<listcomp>N s z#Open._fixresult.<locals>.<listcomp>r ro Úmultiple) Ú
isinstancerk r, r- r0 rl ZtkZ wantobjectsrv Z splitlistri rs r& r& r' rv K s
zOpen._fixresultN©r] r^ r_ r` r rv r& r& r& r' rw F s rw c @ s e Zd ZdZdZdS )ÚSaveAsú Ask for a filename to save asZtk_getSaveFileN)r] r^ r_ r` r r& r& r& r' r€ Z s r€ c @ s e Zd ZdZdZdd„ ZdS )Ú DirectoryzAsk for a directoryZtk_chooseDirectoryc C s8 |r.z
|j }W n tk
r" Y nX || jd< || _|S )Nro )rp rq rl r )r% rt ru r& r& r' rv f s
zDirectory._fixresultNr r& r& r& r' r‚ a s r‚ c K s t f | Ž ¡ S )rx ©rw Úshow©rl r& r& r' Úaskopenfilenamew s r† c K s t f | Ž ¡ S )r )r€ r„ r… r& r& r' Úasksaveasfilename} s r‡ c K s d| d< t f | Ž ¡ S )ztAsk for multiple filenames to open
Returns a list of filenames or empty list if
cancel button selected
r r} rƒ r… r& r& r' Úaskopenfilenamesƒ s rˆ r{ c K s t f |Ž ¡ }|r t|| ƒS dS )z8Ask for a filename to open, and returned the opened fileN)rw r„ Úopen©Úmoderl rr r& r& r' Ú askopenfile s
rŒ c K s4 t f |Ž}|r0g }|D ]}| t|| ƒ¡ q|}|S )z•Ask for multiple filenames and return the open file
objects
returns a list of open file objects or an empty list if
cancel selected
)rˆ rL r‰ )r‹ rl r Zofilesrr r& r& r' Ú askopenfiles˜ s
r Úwc K s t f |Ž ¡ }|r t|| ƒS dS )z;Ask for a filename to save as, and returned the opened fileN)r€ r„ r‰ rŠ r& r& r' Ú
asksaveasfile© s
r c K s t f | Ž ¡ S )z-Ask for a directory, and return the file name)r‚ r„ r… r& r& r' Ú askdirectory² s r c
C sþ t ƒ } | ¡ t| ƒ}|jdd}t| ƒ}|jdd}t||ƒ d}ddl}z&ddl}| |j d¡ |
|j ¡}W n t t
fk
rŠ Y nX tdgd}zt|d ƒ}| ¡ W n$ td
ƒ t| ¡ d ƒ Y nX td | |¡ƒ tƒ } td
| |¡ƒ dS )zSimple test program.Útest)r8 zutf-8r Nr) )z all filesr )rj r{ zCould not open File: r r‰ Zsaveas)ZTkZwithdrawra r9 rd ÚprintÚsysÚlocaleÚ setlocaleÚLC_ALLÚ nl_langinfoÚCODESETÚ ImportErrorrq r† r‰ ÚcloseÚexc_infoÚencoder‡ )
ÚrootÚfdZloadfileZsavefileÚencr“ r” Z openfilenameÚfpZsaveasfilenamer& r& r' r‘ º s2
r‘ Ú__main__)r{ )r{ )rŽ )r` ÚtkinterZtkinter.dialogr r Ztkinter.simpledialogr r, rM r+ r ra rd ri rw r€ r‚ r† r‡ rˆ rŒ r r r r‘ r] r& r& r& r' Ú<module> s2 I9
,
Zerion Mini Shell 1.0