File Manager

X7ROOT File Manager

Current Path: /usr/lib64/tcl8.6/Tix8.4.3

?? ..
?? Balloon.tcl(12.97 KB)
?? BtnBox.tcl(2.61 KB)
?? CObjView.tcl(7.56 KB)
?? ChkList.tcl(4.97 KB)
?? ComboBox.tcl(35.42 KB)
?? Compat.tcl(870 B)
?? Console.tcl(14.95 KB)
?? Control.tcl(12.11 KB)
?? DefSchm.tcl(2.94 KB)
?? DialogS.tcl(4.2 KB)
?? DirBox.tcl(5.3 KB)
?? DirDlg.tcl(2.15 KB)
?? DirList.tcl(6.9 KB)
?? DirTree.tcl(8.76 KB)
?? DragDrop.tcl(3.93 KB)
?? DtlList.tcl(1002 B)
?? EFileBox.tcl(11.12 KB)
?? EFileDlg.tcl(1.68 KB)
?? Event.tcl(5.11 KB)
?? FileBox.tcl(14 KB)
?? FileCbx.tcl(2.42 KB)
?? FileDlg.tcl(2.13 KB)
?? FileEnt.tcl(7.15 KB)
?? FloatEnt.tcl(3.1 KB)
?? Grid.tcl(21.16 KB)
?? HList.tcl(17.72 KB)
?? HListDD.tcl(4.39 KB)
?? IconView.tcl(5.97 KB)
?? Init.tcl(6.05 KB)
?? LabEntry.tcl(2.09 KB)
?? LabFrame.tcl(1.15 KB)
?? LabWidg.tcl(3.86 KB)
?? ListNBk.tcl(3.5 KB)
?? Meter.tcl(3.04 KB)
?? MultView.tcl(3.62 KB)
?? NoteBook.tcl(6.02 KB)
?? OldUtil.tcl(2.98 KB)
?? OptMenu.tcl(9.17 KB)
?? PanedWin.tcl(27.68 KB)
?? PopMenu.tcl(5.37 KB)
?? Primitiv.tcl(10.28 KB)
?? README.txt(987 B)
?? ResizeH.tcl(12.94 KB)
?? SGrid.tcl(5.8 KB)
?? SHList.tcl(3.7 KB)
?? SListBox.tcl(6.97 KB)
?? STList.tcl(2.37 KB)
?? SText.tcl(3.09 KB)
?? SWidget.tcl(9.52 KB)
?? SWindow.tcl(6.75 KB)
?? Select.tcl(7.04 KB)
?? Shell.tcl(1.06 KB)
?? SimpDlg.tcl(1.13 KB)
?? StackWin.tcl(1.95 KB)
?? StatBar.tcl(1.31 KB)
?? StdBBox.tcl(1.62 KB)
?? StdShell.tcl(1.15 KB)
?? TList.tcl(17.59 KB)
?? Tix.tcl(9.51 KB)
?? Tree.tcl(4.57 KB)
?? Utils.tcl(10.54 KB)
?? VResize.tcl(4.95 KB)
?? VStack.tcl(9.42 KB)
?? VTree.tcl(4.31 KB)
?? Variable.tcl(2.5 KB)
?? WInfo.tcl(965 B)
?? bitmaps
?? fs.tcl(3.9 KB)
?? html
?? libTix.so(341.3 KB)
?? license.terms(2.76 KB)
?? pkgIndex.tcl(122 B)
?? pref

Editing: Shell.tcl

# -*- mode: TCL; fill-column: 75; tab-width: 8; coding: iso-latin-1-unix -*-
#
#	$Id: Shell.tcl,v 1.2 2001/12/09 05:04:02 idiscovery Exp $
#
# Shell.tcl --
#
#	This is the base class to all shell 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.
#

#
# type : normal, transient, overrideredirect
#
tixWidgetClass tixShell {
    -superclass tixPrimitive
    -classname  TixShell
    -flag {
	-title
    }
    -configspec {
	{-title title Title ""}
    }
    -forcecall {
	-title
    }
}

#----------------------------------------------------------------------
# ClassInitialization:
#----------------------------------------------------------------------
proc tixShell:CreateRootWidget {w args} {
    upvar #0 $w data
    upvar #0 $data(className) classRec

toplevel $w -class $data(ClassName)
    wm transient $w ""
    wm withdraw $w
}

proc tixShell:config-title {w value} {
    wm title $w $value
}

X7ROOT File Manager

Editing: Shell.tcl

Upload File

Create Folder