EcchiShell v1.0

You In Here : //lib64/tcl8.5/Tix8.4.3/

Mass Deface Email Grabber

Command Shell

Shell Version : 1.0

Rank Alexa : No Global Rank DA : 0 PA : 0

OS : Linux

RDP : Can't Create RDP

PHP Version : 7.0.33

Software : Apache

Information System : Linux vps.vcrowd.in 3.10.0-1160.119.1.el7.x86_64 #1 SMP Tue Jun 4 14:43:51 UTC 2024 x86_64

Disable Function : NONE

Filename : FileDlg.tcl [ view ] [ edit ] [ rename ] [ download ] [ delete ]

# -*- mode: TCL; fill-column: 75; tab-width: 8; coding: iso-latin-1-unix -*-
#
#	$Id: FileDlg.tcl,v 1.3 2001/12/09 05:04:02 idiscovery Exp $
#
# FileDlg.tcl --
#
#	Implements the 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.
#

tixWidgetClass tixFileSelectDialog {
    -classname TixFileSelectDialog
    -superclass tixStdDialogShell
    -method {
    }
    -flag {
	-command
    }
    -configspec {
	{-command command Command ""}

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

proc tixFileSelectDialog:ConstructTopFrame {w frame} {
    upvar #0 $w data

    tixChainMethod $w ConstructTopFrame $frame

    set data(w:fsbox) [tixFileSelectBox $frame.fsbox \
	-command [list tixFileSelectDialog:Invoke $w]]
    pack $data(w:fsbox) -expand yes -fill both
}

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

    tixChainMethod $w SetBindings

    $data(w:btns) subwidget ok     config -command "$data(w:fsbox) invoke" \
	-underline 0
    $data(w:btns) subwidget apply  config -command "$data(w:fsbox) filter" \
	-text Filter -underline 0
    $data(w:btns) subwidget cancel config -command "wm withdraw $w" \
	-underline 0
    $data(w:btns) subwidget help config -underline 0


    bind $w <Alt-Key-l> "focus [$data(w:fsbox) subwidget filelist]"
    bind $w <Alt-Key-d> "focus [$data(w:fsbox) subwidget dirlist]"
    bind $w <Alt-Key-s> "focus [$data(w:fsbox) subwidget selection]"
    bind $w <Alt-Key-t> "focus [$data(w:fsbox) subwidget filter]"
    bind $w <Alt-Key-o> "tkButtonInvoke [$data(w:btns) subwidget ok]"
    bind $w <Alt-Key-f> "tkButtonInvoke [$data(w:btns) subwidget apply]"
    bind $w <Alt-Key-c> "tkButtonInvoke [$data(w:btns) subwidget cancel]"
    bind $w <Alt-Key-h> "tkButtonInvoke [$data(w:btns) subwidget help]"
}

proc tixFileSelectDialog:Invoke {w filename} {
    upvar #0 $w data

    wm withdraw $w

    if {$data(-command) != ""} {
	set bind(specs) "%V"
	set bind(%V) $filename
	tixEvalCmdBinding $w $data(-command) bind $filename
    }
}

Name	Filetype	Perm	Option
.	dir	drwxr-xr-x	newfile \| newfolder
..	dir	drwxr-xr-x	newfile \| newfolder
bitmaps	dir	drwxr-xr-x	rename \| delete
html	dir	drwxr-xr-x	rename \| delete
pref	dir	drwxr-xr-x	rename \| delete
Balloon.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
BtnBox.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
CObjView.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
ChkList.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
ComboBox.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
Compat.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
Console.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
Control.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
DefSchm.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
DialogS.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
DirBox.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
DirDlg.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
DirList.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
DirTree.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
DragDrop.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
DtlList.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
EFileBox.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
EFileDlg.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
Event.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
FileBox.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
FileCbx.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
FileDlg.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
FileEnt.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
FloatEnt.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
Grid.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
HList.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
HListDD.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
IconView.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
Init.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
LabEntry.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
LabFrame.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
LabWidg.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
ListNBk.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
Meter.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
MultView.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
NoteBook.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
OldUtil.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
OptMenu.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
PanedWin.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
PopMenu.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
Primitiv.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
README.txt	text file	-rw-r--r--	edit \| rename \| delete \| download
ResizeH.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
SGrid.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
SHList.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
SListBox.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
STList.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
SText.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
SWidget.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
SWindow.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
Select.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
Shell.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
SimpDlg.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
StackWin.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
StatBar.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
StdBBox.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
StdShell.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
TList.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
Tix.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
Tree.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
Utils.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
VResize.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
VStack.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
VTree.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
Variable.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
WInfo.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
fs.tcl	file	-rw-r--r--	edit \| rename \| delete \| download
libTix.so	link	-rwxr-xr-x	edit \| rename \| delete \| download
license.terms	file	-rw-r--r--	edit \| rename \| delete \| download
pkgIndex.tcl	file	-rw-r--r--	edit \| rename \| delete \| download

./EcchiExploit Copyright © 2025