diff options
| author | Kevin Walzer <kw@codebykevin.com> | 2023-07-10 02:50:00 (GMT) |
|---|---|---|
| committer | Kevin Walzer <kw@codebykevin.com> | 2023-07-10 02:50:00 (GMT) |
| commit | 229a97b66e65891cd0ad4082921b36c68bfa1a16 (patch) | |
| tree | 555c936097cdf9ca170c2116e4056f7c59fee417 /library | |
| parent | 0640744ae1ac1faa02e751d15925891bda6763d6 (diff) | |
| download | tk-229a97b66e65891cd0ad4082921b36c68bfa1a16.zip tk-229a97b66e65891cd0ad4082921b36c68bfa1a16.tar.gz tk-229a97b66e65891cd0ad4082921b36c68bfa1a16.tar.bz2 | |
Cosmetic improvement to treeview and widget demo under Aqua with handling for Dark Mode
Diffstat (limited to 'library')
| -rw-r--r-- | library/demos/mclist.tcl | 2 | ||||
| -rw-r--r-- | library/ttk/aquaTheme.tcl | 4 |
2 files changed, 5 insertions, 1 deletions
diff --git a/library/demos/mclist.tcl b/library/demos/mclist.tcl index f0136be..dbdc6a0 100644 --- a/library/demos/mclist.tcl +++ b/library/demos/mclist.tcl @@ -28,7 +28,7 @@ pack [addSeeDismiss $w.seeDismiss $w {} { ttk::frame $w.container ttk::treeview $w.tree -columns {country capital currency} -show headings \ - -yscroll "$w.vsb set" -xscroll "$w.hsb set" + -yscroll "$w.vsb set" -xscroll "$w.hsb set" -stripe 1 ttk::scrollbar $w.vsb -orient vertical -command "$w.tree yview" ttk::scrollbar $w.hsb -orient horizontal -command "$w.tree xview" pack $w.container -fill both -expand 1 diff --git a/library/ttk/aquaTheme.tcl b/library/ttk/aquaTheme.tcl index 468cea3..5674d39 100644 --- a/library/ttk/aquaTheme.tcl +++ b/library/ttk/aquaTheme.tcl @@ -160,6 +160,10 @@ namespace eval ttk::theme::aqua { selected systemSelectedTextBackgroundColor } + #improved appearance for stripebackground + bind all <<DarkAqua>> {+ ttk::style configure Treeview -stripedbackground black} + bind all <<LightAqua>> {+ ttk::style configure Treeview -stripedbackground #F5F5F6} + # Enable animation for ttk::progressbar widget: ttk::style configure TProgressbar -period 100 -maxphase 120 |