Posted to tcl by petasis at Fri Aug 17 18:33:24 GMT 2012view raw

  1. ttk::style configure . \
  2. -background $background(normal) \
  3. -foreground $foreground(normal) \
  4. -selectforeground $foreground(selected) \
  5. -selectbackground $background(selected) \
  6. ;