home *** CD-ROM | disk | FTP | other *** search
/ Practical Programming in Tcl & Tk (4th Edition) / TCLBOOK4.BIN / mac / exsource.old / 24_5.tcl < prev    next >
Text File  |  2003-04-15  |  313b  |  15 lines
  1. #
  2. # Example 24-5
  3. # Mixing bottom and right packing sides.
  4. #
  5.  
  6. # pack two frames on the bottom.
  7. frame .one -width 100 -height 50 -bg grey50
  8. frame .two -width 40 -height 40 -bg white
  9. pack .one .two -side bottom
  10. # pack another frame to the right
  11. frame .three -width 20 -height 20 -bg grey75
  12. pack .three -side right
  13.  
  14.  
  15.