home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Practical Programming in Tcl & Tk (4th Edition)
/
TCLBOOK4.BIN
/
pc
/
exsource.old
/
24_1.tcl
< prev
next >
Wrap
Text File
|
2003-04-15
|
253b
|
14 lines
#
# Example 24-1
# Two frames packed inside the main frame.
#
# Make the main window black
. config -bg black
# Create and pack two frames
frame .one -width 40 -height 40 -bg white
frame .two -width 100 -height 50 -bg grey50
pack .one .two -side top