Posted to tcl by prep at Sat Feb 18 00:37:19 GMT 2023view raw

  1. grid [frame .main] -padx 5 -sticky nswe
  2.  
  3. grid [
  4. ctext .main.area -font Mono -undo 1 -relief flat -highlightthickness 1 -insertunfocussed none -bd 1 -wrap word -maxundo 0 -tabs "[expr {4 * [font measure Mono 0]}] left" -tabstyle wordprocessor -linemap 0
  5. ] -column 1 -row 1 -padx 0