repo.or.cz
/
tcl-tlc.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
Fixes
[tcl-tlc.git]
/
examples
/
test_fileselectbox.itk
blob
f8ce220003528f0b3567fe4dd606763eda591bf7
1
#!/tcl8.4/bin/wish8.4
2
3
source "boilerplate.tcl"
4
5
Form .form -schema {
6
"Filename" {filename fileselect}
7
}
8
9
table . -pady 5 -padx 5 \
10
.form 1,1 -fill both
11
12