diff options
| author | jenglish <jenglish@flightlab.com> | 2006-12-18 19:33:10 (GMT) |
|---|---|---|
| committer | jenglish <jenglish@flightlab.com> | 2006-12-18 19:33:10 (GMT) |
| commit | fb835826dd21c44784539b40e590866ffb89bd93 (patch) | |
| tree | b0a6aa116ab0a8f8f7eefc79d7816eb5eb6e5c58 /library/ttk/aquaTheme.tcl | |
| parent | 16cde6f4aaf0d168843b71218b3b76cad1f1da4c (diff) | |
| download | tk-fb835826dd21c44784539b40e590866ffb89bd93.zip tk-fb835826dd21c44784539b40e590866ffb89bd93.tar.gz tk-fb835826dd21c44784539b40e590866ffb89bd93.tar.bz2 | |
Big batch of ttk::treeview improvements:
Added column '-stretch' and '-minwidth' options.
Improved column drag and resize behavior.
Added horizontal scrolling [#1518650].
Row height and child indent specifiable on Treeview style.
Decreased default row height, no default -padding.
Use correct heading height [#1163349].
Apply tag settings to tree item as well as to data columns
[NOTE: 'tag configure' still buggy].
Fix off-by-one condition when moving nodes forward [#1618142]
Prevent overscroll ([#1173434])
Treeview style settings specified separately in each theme.
Added disclosure triangle element in aqua theme.
Diffstat (limited to 'library/ttk/aquaTheme.tcl')
| -rw-r--r-- | library/ttk/aquaTheme.tcl | 13 |
1 files changed, 12 insertions, 1 deletions
diff --git a/library/ttk/aquaTheme.tcl b/library/ttk/aquaTheme.tcl index 4b4ad5e..f0f63aa 100644 --- a/library/ttk/aquaTheme.tcl +++ b/library/ttk/aquaTheme.tcl @@ -1,5 +1,5 @@ # -# $Id: aquaTheme.tcl,v 1.1 2006/10/31 01:42:26 hobbs Exp $ +# $Id: aquaTheme.tcl,v 1.2 2006/12/18 19:33:14 jenglish Exp $ # # Ttk widget set: Aqua theme (OSX native look and feel) # @@ -38,6 +38,16 @@ namespace eval ttk { style configure TNotebook -tabposition n -padding {20 12} style configure TNotebook.Tab -padding {10 2 10 2} + # Treeview: + style configure Treeview -rowheight 18 + style configure Heading -font TkHeadingFont + style map Row -background [list \ + {selected background} "#c3c3c3" selected SystemHighlight] ; + style map Cell -foreground [list \ + {selected background} "#000000" selected SystemHighlightText] ; + style map Item -foreground [list \ + {selected background} "#000000" selected SystemHighlightText] ; + # Enable animation for ttk::progressbar widget: style configure TProgressbar -period 100 -maxphase 255 @@ -56,5 +66,6 @@ namespace eval ttk { # style configure TLabelframe \ -labeloutside true -labelmargins {14 0 14 4} + } } |