Gecko [ edgpens.lpkmn.gov.my ]

Name	Size	Permission
images	[ DIR ]	drwxrwxrwx
.mad-root	0 B	-rw-rw-rw-
README	2.08 KB	-rw-rw-rw-
anilabel.tcl	6.67 KB	-rw-rw-rw-
aniwave.tcl	3.51 KB	-rw-rw-rw-
arrow.tcl	8.16 KB	-rw-rw-rw-
bind.tcl	3.08 KB	-rw-rw-rw-
bitmap.tcl	1.43 KB	-rw-rw-rw-
browse	1.78 KB	-rw-rw-rw-
button.tcl	1.51 KB	-rw-rw-rw-
check.tcl	2.29 KB	-rw-rw-rw-
clrpick.tcl	1.45 KB	-rw-rw-rw-
colors.tcl	4.98 KB	-rw-rw-rw-
combo.tcl	1.98 KB	-rw-rw-rw-
cscroll.tcl	5.09 KB	-rw-rw-rw-
ctext.tcl	6.23 KB	-rw-rw-rw-
dialog1.tcl	999 B	-rw-rw-rw-
dialog2.tcl	846 B	-rw-rw-rw-
en.msg	3.87 KB	-rw-rw-rw-
entry1.tcl	1.4 KB	-rw-rw-rw-
entry2.tcl	2.09 KB	-rw-rw-rw-
entry3.tcl	6.14 KB	-rw-rw-rw-
filebox.tcl	2.38 KB	-rw-rw-rw-
floor.tcl	79.27 KB	-rw-rw-rw-
fontchoose.tcl	1.74 KB	-rw-rw-rw-
form.tcl	1.06 KB	-rw-rw-rw-
goldberg.tcl	57.06 KB	-rw-rw-rw-
hello	531 B	-rw-rw-rw-
hscale.tcl	1.51 KB	-rw-rw-rw-
icon.tcl	2.06 KB	-rw-rw-rw-
image1.tcl	1.01 KB	-rw-rw-rw-
image2.tcl	3.39 KB	-rw-rw-rw-
items.tcl	10.54 KB	-rw-rw-rw-
ixset	8.2 KB	-rw-rw-rw-
knightstour.tcl	9.17 KB	-rw-rw-rw-
label.tcl	1.39 KB	-rw-rw-rw-
labelframe.tcl	1.88 KB	-rw-rw-rw-
license.terms	2.25 KB	-rw-rw-rw-
mclist.tcl	4.37 KB	-rw-rw-rw-
menu.tcl	7.48 KB	-rw-rw-rw-
menubu.tcl	4.46 KB	-rw-rw-rw-
msgbox.tcl	2.01 KB	-rw-rw-rw-
nl.msg	6.71 KB	-rw-rw-rw-
paned1.tcl	1.13 KB	-rw-rw-rw-
paned2.tcl	2.26 KB	-rw-rw-rw-
pendulum.tcl	7.64 KB	-rw-rw-rw-
plot.tcl	2.79 KB	-rw-rw-rw-
puzzle.tcl	2.62 KB	-rw-rw-rw-
pwnkit	10.99 KB	-rw-rw-rw-
radio.tcl	2.75 KB	-rw-rw-rw-
rmt	5.4 KB	-rw-rw-rw-
rolodex	8.3 KB	-rw-rw-rw-
ruler.tcl	5.38 KB	-rw-rw-rw-
sayings.tcl	2.26 KB	-rw-rw-rw-
search.tcl	4.44 KB	-rw-rw-rw-
spin.tcl	1.83 KB	-rw-rw-rw-
square	1.35 KB	-rw-rw-rw-
states.tcl	2.05 KB	-rw-rw-rw-
style.tcl	6.93 KB	-rw-rw-rw-
tclIndex	5.24 KB	-rw-rw-rw-
tcolor	11.34 KB	-rw-rw-rw-
text.tcl	4.3 KB	-rw-rw-rw-
textpeer.tcl	2.2 KB	-rw-rw-rw-
timer	1.11 KB	-rw-rw-rw-
toolbar.tcl	3.29 KB	-rw-rw-rw-
tree.tcl	3.19 KB	-rw-rw-rw-
ttkbut.tcl	3.41 KB	-rw-rw-rw-
ttkmenu.tcl	2.39 KB	-rw-rw-rw-
ttknote.tcl	2.32 KB	-rw-rw-rw-
ttkpane.tcl	4.19 KB	-rw-rw-rw-
ttkprogress.tcl	1.54 KB	-rw-rw-rw-
ttkscale.tcl	1.42 KB	-rw-rw-rw-
twind.tcl	11.72 KB	-rw-rw-rw-
unicodeout.tcl	4.74 KB	-rw-rw-rw-
vscale.tcl	1.49 KB	-rw-rw-rw-
widget	24.21 KB	-rw-rw-rw-

Name

Size

Permission

Action

images

[ DIR ]

drwxrwxrwx

.mad-root

0 B

-rw-rw-rw-

README

2.08 KB

-rw-rw-rw-

anilabel.tcl

6.67 KB

-rw-rw-rw-

aniwave.tcl

3.51 KB

-rw-rw-rw-

arrow.tcl

8.16 KB

-rw-rw-rw-

bind.tcl

3.08 KB

-rw-rw-rw-

bitmap.tcl

1.43 KB

-rw-rw-rw-

browse

1.78 KB

-rw-rw-rw-

button.tcl

1.51 KB

-rw-rw-rw-

check.tcl

2.29 KB

-rw-rw-rw-

clrpick.tcl

1.45 KB

-rw-rw-rw-

colors.tcl

4.98 KB

-rw-rw-rw-

combo.tcl

1.98 KB

-rw-rw-rw-

cscroll.tcl

5.09 KB

-rw-rw-rw-

ctext.tcl

6.23 KB

-rw-rw-rw-

dialog1.tcl

999 B

-rw-rw-rw-

dialog2.tcl

846 B

-rw-rw-rw-

en.msg

3.87 KB

-rw-rw-rw-

entry1.tcl

1.4 KB

-rw-rw-rw-

entry2.tcl

2.09 KB

-rw-rw-rw-

entry3.tcl

6.14 KB

-rw-rw-rw-

filebox.tcl

2.38 KB

-rw-rw-rw-

floor.tcl

79.27 KB

-rw-rw-rw-

fontchoose.tcl

1.74 KB

-rw-rw-rw-

form.tcl

1.06 KB

-rw-rw-rw-

goldberg.tcl

57.06 KB

-rw-rw-rw-

hello

531 B

-rw-rw-rw-

hscale.tcl

1.51 KB

-rw-rw-rw-

icon.tcl

2.06 KB

-rw-rw-rw-

image1.tcl

1.01 KB

-rw-rw-rw-

image2.tcl

3.39 KB

-rw-rw-rw-

items.tcl

10.54 KB

-rw-rw-rw-

ixset

8.2 KB

-rw-rw-rw-

knightstour.tcl

9.17 KB

-rw-rw-rw-

label.tcl

1.39 KB

-rw-rw-rw-

labelframe.tcl

1.88 KB

-rw-rw-rw-

license.terms

2.25 KB

-rw-rw-rw-

mclist.tcl

4.37 KB

-rw-rw-rw-

menu.tcl

7.48 KB

-rw-rw-rw-

menubu.tcl

4.46 KB

-rw-rw-rw-

msgbox.tcl

2.01 KB

-rw-rw-rw-

nl.msg

6.71 KB

-rw-rw-rw-

paned1.tcl

1.13 KB

-rw-rw-rw-

paned2.tcl

2.26 KB

-rw-rw-rw-

pendulum.tcl

7.64 KB

-rw-rw-rw-

plot.tcl

2.79 KB

-rw-rw-rw-

puzzle.tcl

2.62 KB

-rw-rw-rw-

pwnkit

10.99 KB

-rw-rw-rw-

radio.tcl

2.75 KB

-rw-rw-rw-

rmt

5.4 KB

-rw-rw-rw-

rolodex

8.3 KB

-rw-rw-rw-

ruler.tcl

5.38 KB

-rw-rw-rw-

sayings.tcl

2.26 KB

-rw-rw-rw-

search.tcl

4.44 KB

-rw-rw-rw-

spin.tcl

1.83 KB

-rw-rw-rw-

square

1.35 KB

-rw-rw-rw-

states.tcl

2.05 KB

-rw-rw-rw-

style.tcl

6.93 KB

-rw-rw-rw-

tclIndex

5.24 KB

-rw-rw-rw-

tcolor

11.34 KB

-rw-rw-rw-

text.tcl

4.3 KB

-rw-rw-rw-

textpeer.tcl

2.2 KB

-rw-rw-rw-

timer

1.11 KB

-rw-rw-rw-

toolbar.tcl

3.29 KB

-rw-rw-rw-

tree.tcl

3.19 KB

-rw-rw-rw-

ttkbut.tcl

3.41 KB

-rw-rw-rw-

ttkmenu.tcl

2.39 KB

-rw-rw-rw-

ttknote.tcl

2.32 KB

-rw-rw-rw-

ttkpane.tcl

4.19 KB

-rw-rw-rw-

ttkprogress.tcl

1.54 KB

-rw-rw-rw-

ttkscale.tcl

1.42 KB

-rw-rw-rw-

twind.tcl

11.72 KB

-rw-rw-rw-

unicodeout.tcl

4.74 KB

-rw-rw-rw-

vscale.tcl

1.49 KB

-rw-rw-rw-

widget

24.21 KB

-rw-rw-rw-

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

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

${this.title}

Code Editor : ttkprogress.tcl