summaryrefslogtreecommitdiffstats
path: root/library
diff options
context:
space:
mode:
authorpatthoyts <patthoyts@users.sourceforge.net>2009-12-03 23:58:34 (GMT)
committerpatthoyts <patthoyts@users.sourceforge.net>2009-12-03 23:58:34 (GMT)
commit4f22e4e2865a8ef6917cc8a16c3a4041ab2e3b5a (patch)
treeaf01d0a3f9a01d3ce36f35080c91b9855a8d1636 /library
parent11451aec4915dc62cc84ee9caf897dc10818e8c9 (diff)
downloadtk-4f22e4e2865a8ef6917cc8a16c3a4041ab2e3b5a.zip
tk-4f22e4e2865a8ef6917cc8a16c3a4041ab2e3b5a.tar.gz
tk-4f22e4e2865a8ef6917cc8a16c3a4041ab2e3b5a.tar.bz2
Fix the selection of treeview rows on Windows XP and Vista
Diffstat (limited to 'library')
-rw-r--r--library/ttk/vistaTheme.tcl12
-rw-r--r--library/ttk/xpTheme.tcl14
2 files changed, 25 insertions, 1 deletions
diff --git a/library/ttk/vistaTheme.tcl b/library/ttk/vistaTheme.tcl
index b96f4a7..9b9418d 100644
--- a/library/ttk/vistaTheme.tcl
+++ b/library/ttk/vistaTheme.tcl
@@ -57,6 +57,18 @@ namespace eval ttk::theme::vista {
-background [list selected SystemHighlight] \
-foreground [list selected SystemHighlightText] ;
+ ttk::style configure Row -background SystemWindow
+ ttk::style configure Cell -background SystemWindow
+ ttk::style map Row \
+ -background [list selected SystemHighlight] \
+ -foreground [list selected SystemHighlightText] ;
+ ttk::style map Cell \
+ -background [list selected SystemHighlight] \
+ -foreground [list selected SystemHighlightText] ;
+ ttk::style map Item \
+ -background [list selected SystemHighlight] \
+ -foreground [list selected SystemHighlightText] ;
+
# Label and Toolbutton
ttk::style configure TLabelframe.Label -foreground "#0046d5"
diff --git a/library/ttk/xpTheme.tcl b/library/ttk/xpTheme.tcl
index 9b1c697..8a0400e 100644
--- a/library/ttk/xpTheme.tcl
+++ b/library/ttk/xpTheme.tcl
@@ -1,5 +1,5 @@
#
-# $Id: xpTheme.tcl,v 1.6.2.2 2009/05/14 00:53:04 patthoyts Exp $
+# $Id: xpTheme.tcl,v 1.6.2.3 2009/12/03 23:58:35 patthoyts Exp $
#
# Settings for 'xpnative' theme
#
@@ -36,6 +36,18 @@ namespace eval ttk::theme::xpnative {
-background [list selected SystemHighlight] \
-foreground [list selected SystemHighlightText] ;
+ ttk::style configure Row -background SystemWindow
+ ttk::style configure Cell -background SystemWindow
+ ttk::style map Row \
+ -background [list selected SystemHighlight] \
+ -foreground [list selected SystemHighlightText] ;
+ ttk::style map Cell \
+ -background [list selected SystemHighlight] \
+ -foreground [list selected SystemHighlightText] ;
+ ttk::style map Item \
+ -background [list selected SystemHighlight] \
+ -foreground [list selected SystemHighlightText] ;
+
ttk::style configure TLabelframe.Label -foreground "#0046d5"
# OR: -padding {3 3 3 6}, which some apps seem to use.