diff options
Diffstat (limited to 'library/ttk/xpTheme.tcl')
| -rw-r--r-- | library/ttk/xpTheme.tcl | 47 |
1 files changed, 1 insertions, 46 deletions
diff --git a/library/ttk/xpTheme.tcl b/library/ttk/xpTheme.tcl index 07df1d9..d786841 100644 --- a/library/ttk/xpTheme.tcl +++ b/library/ttk/xpTheme.tcl @@ -1,5 +1,5 @@ # -# $Id: xpTheme.tcl,v 1.11 2008/11/29 00:43:48 patthoyts Exp $ +# $Id: xpTheme.tcl,v 1.12 2008/12/05 11:11:58 patthoyts Exp $ # # Settings for 'xpnative' theme # @@ -60,50 +60,5 @@ namespace eval ttk::theme::xpnative { ttk::style configure Toolbutton -padding {4 4} - # Vista requires some style modifications. There are some - # additional or different elements in use. - if {[tk windowingsystem] eq "win32" - && [info exists tcl_platform(osVersion)] - && $tcl_platform(osVersion) >= 6.0} { - - ttk::style element create Combobox.field vsapi \ - COMBOBOX 2 {{} 1} - ttk::style element create Combobox.border vsapi \ - COMBOBOX 4 {disabled 4 focus 3 active 2 {} 1} - ttk::style element create Combobox.rightdownarrow vsapi \ - COMBOBOX 6 {disabled 4 pressed 3 active 2 {} 1} - ttk::style layout TCombobox { - Combobox.border -sticky nswe -border 0 -children { - Combobox.rightdownarrow -side right -sticky ns - Combobox.padding -expand 1 -sticky nswe -children { - Combobox.focus -expand 1 -sticky nswe -children { - Combobox.textarea -sticky nswe - } - } - } - } - ttk::style element create ComboboxPopdownFrame.background vsapi\ - COMBOBOX 2 - ttk::style layout ComboboxPopdownFrame { - ComboboxPopdownFrame.background -sticky news -border 1 -children { - ComboboxPopdownFrame.padding -sticky news - } - } - - # EDIT EP_EDITBORDER_HVSCROLL - ttk::style configure TSpinbox -padding {2 0 15 1} - ttk::style element create Vista.Spinbox.field vsapi \ - EDIT 9 {disabled 4 focus 3 active 2 {} 1} \ - -padding {1 1 1 2} - ttk::style layout TSpinbox { - Vista.Spinbox.field -sticky nswe -children { - Spinbox.padding -sticky nswe -children { - Spinbox.textarea -expand 1 -sticky {} - } - Spinbox.uparrow -side top -sticky ens - Spinbox.downarrow -side bottom -sticky ens - } - } - } } } |