Posted to tcl by thomas at Tue Mar 02 20:40:56 GMT 2010view raw

  1. text .t
  2. pack .t -expand yes -fill both
  3. puts [.t index end]
  4.  
  5.  
  6.  
  7. >2.0