OXIESEC PANEL
- Current Dir:
/
/
usr
/
share
/
tcltk
/
tk8.6
/
ttk
Server IP: 139.59.38.164
Upload:
Create Dir:
Name
Size
Modified
Perms
📁
..
-
10/28/2024 06:50:36 AM
rwxr-xr-x
📄
altTheme.tcl
3.46 KB
03/24/2018 06:42:17 PM
rw-r--r--
📄
aquaTheme.tcl
1.95 KB
03/24/2018 06:42:17 PM
rw-r--r--
📄
button.tcl
2.91 KB
03/24/2018 06:42:17 PM
rw-r--r--
📄
clamTheme.tcl
4.49 KB
03/24/2018 06:42:17 PM
rw-r--r--
📄
classicTheme.tcl
3.6 KB
03/24/2018 06:42:17 PM
rw-r--r--
📄
combobox.tcl
12.13 KB
03/24/2018 06:42:17 PM
rw-r--r--
📄
cursors.tcl
3.91 KB
03/24/2018 06:42:17 PM
rw-r--r--
📄
defaults.tcl
4.25 KB
03/24/2018 06:42:17 PM
rw-r--r--
📄
entry.tcl
16.01 KB
03/24/2018 06:42:17 PM
rw-r--r--
📄
fonts.tcl
5.44 KB
03/24/2018 06:42:17 PM
rw-r--r--
📄
menubutton.tcl
4.8 KB
03/24/2018 06:42:17 PM
rw-r--r--
📄
notebook.tcl
5.49 KB
03/24/2018 06:42:17 PM
rw-r--r--
📄
panedwindow.tcl
1.88 KB
03/24/2018 06:42:17 PM
rw-r--r--
📄
progress.tcl
1.06 KB
03/24/2018 06:42:17 PM
rw-r--r--
📄
scale.tcl
2.63 KB
03/24/2018 06:42:17 PM
rw-r--r--
📄
scrollbar.tcl
3.02 KB
03/24/2018 06:42:17 PM
rw-r--r--
📄
sizegrip.tcl
2.34 KB
03/24/2018 06:42:17 PM
rw-r--r--
📄
spinbox.tcl
4.16 KB
03/24/2018 06:42:17 PM
rw-r--r--
📄
treeview.tcl
8.65 KB
03/24/2018 06:42:17 PM
rw-r--r--
📄
ttk.tcl
4.44 KB
03/24/2018 06:42:17 PM
rw-r--r--
📄
utils.tcl
8.36 KB
03/24/2018 06:42:17 PM
rw-r--r--
📄
vistaTheme.tcl
9.12 KB
03/24/2018 06:42:17 PM
rw-r--r--
📄
winTheme.tcl
2.58 KB
03/24/2018 06:42:17 PM
rw-r--r--
📄
xpTheme.tcl
1.88 KB
03/24/2018 06:42:17 PM
rw-r--r--
Editing: classicTheme.tcl
Close
# # "classic" Tk theme. # # Implements Tk's traditional Motif-like look and feel. # namespace eval ttk::theme::classic { variable colors; array set colors { -frame "#d9d9d9" -window "#ffffff" -activebg "#ececec" -troughbg "#c3c3c3" -selectbg "#c3c3c3" -selectfg "#000000" -disabledfg "#a3a3a3" -indicator "#b03060" -altindicator "#b05e5e" } ttk::style theme settings classic { ttk::style configure "." \ -font TkDefaultFont \ -background $colors(-frame) \ -foreground black \ -selectbackground $colors(-selectbg) \ -selectforeground $colors(-selectfg) \ -troughcolor $colors(-troughbg) \ -indicatorcolor $colors(-frame) \ -highlightcolor $colors(-frame) \ -highlightthickness 1 \ -selectborderwidth 1 \ -insertwidth 2 \ ; # To match pre-Xft X11 appearance, use: # ttk::style configure . -font {Helvetica 12 bold} ttk::style map "." -background \ [list disabled $colors(-frame) active $colors(-activebg)] ttk::style map "." -foreground \ [list disabled $colors(-disabledfg)] ttk::style map "." -highlightcolor [list focus black] ttk::style configure TButton \ -anchor center -padding "3m 1m" -relief raised -shiftrelief 1 ttk::style map TButton -relief [list {!disabled pressed} sunken] ttk::style configure TCheckbutton -indicatorrelief raised ttk::style map TCheckbutton \ -indicatorcolor [list \ pressed $colors(-frame) \ alternate $colors(-altindicator) \ selected $colors(-indicator)] \ -indicatorrelief {alternate raised selected sunken pressed sunken} \ ; ttk::style configure TRadiobutton -indicatorrelief raised ttk::style map TRadiobutton \ -indicatorcolor [list \ pressed $colors(-frame) \ alternate $colors(-altindicator) \ selected $colors(-indicator)] \ -indicatorrelief {alternate raised selected sunken pressed sunken} \ ; ttk::style configure TMenubutton -relief raised -padding "3m 1m" ttk::style configure TEntry -relief sunken -padding 1 -font TkTextFont ttk::style map TEntry -fieldbackground \ [list readonly $colors(-frame) disabled $colors(-frame)] ttk::style configure TCombobox -padding 1 ttk::style map TCombobox -fieldbackground \ [list readonly $colors(-frame) disabled $colors(-frame)] ttk::style configure ComboboxPopdownFrame \ -relief solid -borderwidth 1 ttk::style configure TSpinbox -arrowsize 10 -padding {2 0 10 0} ttk::style map TSpinbox -fieldbackground \ [list readonly $colors(-frame) disabled $colors(-frame)] ttk::style configure TLabelframe -borderwidth 2 -relief groove ttk::style configure TScrollbar -relief raised ttk::style map TScrollbar -relief {{pressed !disabled} sunken} ttk::style configure TScale -sliderrelief raised ttk::style map TScale -sliderrelief {{pressed !disabled} sunken} ttk::style configure TProgressbar -background SteelBlue ttk::style configure TNotebook.Tab \ -padding {3m 1m} \ -background $colors(-troughbg) ttk::style map TNotebook.Tab -background [list selected $colors(-frame)] # Treeview: ttk::style configure Heading -font TkHeadingFont -relief raised ttk::style configure Treeview -background $colors(-window) ttk::style map Treeview \ -background [list selected $colors(-selectbg)] \ -foreground [list selected $colors(-selectfg)] ; # # Toolbar buttons: # ttk::style configure Toolbutton -padding 2 -relief flat -shiftrelief 2 ttk::style map Toolbutton -relief \ {disabled flat selected sunken pressed sunken active raised} ttk::style map Toolbutton -background \ [list pressed $colors(-troughbg) active $colors(-activebg)] } }