Gerenciador & Editor PHP

📍 /usr/lib64/tcl8.6/Tix8.4.3

📝 Editando: EFileDlg.tcl

# -*- mode: TCL; fill-column: 75; tab-width: 8; coding: iso-latin-1-unix -*-
#
#	$Id: EFileDlg.tcl,v 1.3 2002/01/24 09:13:58 idiscovery Exp $
#
# EFileDlg.tcl --
#
#	Implements the Extended File Selection Dialog widget.
#
# Copyright (c) 1993-1999 Ioi Kim Lam.
# Copyright (c) 2000-2001 Tix Project Group.
#
# See the file "license.terms" for information on usage and redistribution
# of this file, and for a DISCLAIMER OF ALL WARRANTIES.
#

foreach fun {tkButtonInvoke} {
    if {![llength [info commands $fun]]} {
	tk::unsupported::ExposePrivateCommand $fun
    }
}
unset fun

tixWidgetClass tixExFileSelectDialog {
    -classname TixExFileSelectDialog
    -superclass tixDialogShell
    -method {}
    -flag   {
	-command
    }
    -configspec {
	{-command command Command ""}

{-title title Title "Select A File"}
    }
}

proc tixExFileSelectDialog:ConstructWidget {w} {
    upvar #0 $w data

tixChainMethod $w ConstructWidget
    set data(w:fsbox) [tixExFileSelectBox $w.fsbox -dialog $w \
	-command $data(-command)]
    pack $data(w:fsbox) -expand yes -fill both

}

proc tixExFileSelectDialog:config-command {w value} {
    upvar #0 $w data

$data(w:fsbox) config -command $value
}

proc tixExFileSelectDialog:SetBindings {w} {
    upvar #0 $w data

tixChainMethod $w SetBindings

bind $w <Alt-Key-f> "focus [$data(w:fsbox) subwidget file]"
    bind $w <Alt-Key-t> "focus [$data(w:fsbox) subwidget types]"
    bind $w <Alt-Key-d> "focus [$data(w:fsbox) subwidget dir]"
    bind $w <Alt-Key-o> "tkButtonInvoke [$data(w:fsbox) subwidget ok]"
    bind $w <Alt-Key-c> "tkButtonInvoke [$data(w:fsbox) subwidget cancel]"
    bind $w <Alt-Key-s> "tkButtonInvoke [$data(w:fsbox) subwidget hidden]"
}

[ Cancelar ]

Nome	Permissões	Ações
[ .. Voltar ]
📄 Balloon.tcl	0644	[ EDITAR/VER ]
📄 BtnBox.tcl	0644	[ EDITAR/VER ]
📄 CObjView.tcl	0644	[ EDITAR/VER ]
📄 ChkList.tcl	0644	[ EDITAR/VER ]
📄 ComboBox.tcl	0644	[ EDITAR/VER ]
📄 Compat.tcl	0644	[ EDITAR/VER ]
📄 Console.tcl	0644	[ EDITAR/VER ]
📄 Control.tcl	0644	[ EDITAR/VER ]
📄 DefSchm.tcl	0644	[ EDITAR/VER ]
📄 DialogS.tcl	0644	[ EDITAR/VER ]
📄 DirBox.tcl	0644	[ EDITAR/VER ]
📄 DirDlg.tcl	0644	[ EDITAR/VER ]
📄 DirList.tcl	0644	[ EDITAR/VER ]
📄 DirTree.tcl	0644	[ EDITAR/VER ]
📄 DragDrop.tcl	0644	[ EDITAR/VER ]
📄 DtlList.tcl	0644	[ EDITAR/VER ]
📄 EFileBox.tcl	0644	[ EDITAR/VER ]
📄 EFileDlg.tcl	0644	[ EDITAR/VER ]
📄 Event.tcl	0644	[ EDITAR/VER ]
📄 FileBox.tcl	0644	[ EDITAR/VER ]
📄 FileCbx.tcl	0644	[ EDITAR/VER ]
📄 FileDlg.tcl	0644	[ EDITAR/VER ]
📄 FileEnt.tcl	0644	[ EDITAR/VER ]
📄 FloatEnt.tcl	0644	[ EDITAR/VER ]
📄 Grid.tcl	0644	[ EDITAR/VER ]
📄 HList.tcl	0644	[ EDITAR/VER ]
📄 HListDD.tcl	0644	[ EDITAR/VER ]
📄 IconView.tcl	0644	[ EDITAR/VER ]
📄 Init.tcl	0644	[ EDITAR/VER ]
📄 LabEntry.tcl	0644	[ EDITAR/VER ]
📄 LabFrame.tcl	0644	[ EDITAR/VER ]
📄 LabWidg.tcl	0644	[ EDITAR/VER ]
📄 ListNBk.tcl	0644	[ EDITAR/VER ]
📄 Meter.tcl	0644	[ EDITAR/VER ]
📄 MultView.tcl	0644	[ EDITAR/VER ]
📄 NoteBook.tcl	0644	[ EDITAR/VER ]
📄 OldUtil.tcl	0644	[ EDITAR/VER ]
📄 OptMenu.tcl	0644	[ EDITAR/VER ]
📄 PanedWin.tcl	0644	[ EDITAR/VER ]
📄 PopMenu.tcl	0644	[ EDITAR/VER ]
📄 Primitiv.tcl	0644	[ EDITAR/VER ]
📄 README.txt	0644	[ EDITAR/VER ]
📄 ResizeH.tcl	0644	[ EDITAR/VER ]
📄 SGrid.tcl	0644	[ EDITAR/VER ]
📄 SHList.tcl	0644	[ EDITAR/VER ]
📄 SListBox.tcl	0644	[ EDITAR/VER ]
📄 STList.tcl	0644	[ EDITAR/VER ]
📄 SText.tcl	0644	[ EDITAR/VER ]
📄 SWidget.tcl	0644	[ EDITAR/VER ]
📄 SWindow.tcl	0644	[ EDITAR/VER ]
📄 Select.tcl	0644	[ EDITAR/VER ]
📄 Shell.tcl	0644	[ EDITAR/VER ]
📄 SimpDlg.tcl	0644	[ EDITAR/VER ]
📄 StackWin.tcl	0644	[ EDITAR/VER ]
📄 StatBar.tcl	0644	[ EDITAR/VER ]
📄 StdBBox.tcl	0644	[ EDITAR/VER ]
📄 StdShell.tcl	0644	[ EDITAR/VER ]
📄 TList.tcl	0644	[ EDITAR/VER ]
📄 Tix.tcl	0644	[ EDITAR/VER ]
📄 Tree.tcl	0644	[ EDITAR/VER ]
📄 Utils.tcl	0644	[ EDITAR/VER ]
📄 VResize.tcl	0644	[ EDITAR/VER ]
📄 VStack.tcl	0644	[ EDITAR/VER ]
📄 VTree.tcl	0644	[ EDITAR/VER ]
📄 Variable.tcl	0644	[ EDITAR/VER ]
📄 WInfo.tcl	0644	[ EDITAR/VER ]
📁 bitmaps/	0755
📄 fs.tcl	0644	[ EDITAR/VER ]
📁 html/	0755
📄 libTix.so	0755	[ EDITAR/VER ]
📄 license.terms	0644	[ EDITAR/VER ]
📄 pkgIndex.tcl	0644	[ EDITAR/VER ]
📁 pref/	0755