** List of ttk Themes ** Most of the themes can be downloaded here: http://chiselapp.com/user/sgolovan/repository/ttk-themes/home%|%A collection of Ttk themes%|% The SCID themes can be downloaded here: https://sourceforge.net/projects/scid/files/Scid/Additional+Files/%|%SCID Sourceforge (/Scid/Additional Files)%|% The waldorf theme is here: [waldorf ttk theme] The black theme is here: [black ttk theme] ---- ''Graphical?'' indicates that the theme uses pixmaps, GIFs or PNG files. Graphical themes may not scale properly on high resolution displays. ''Native'' themes are supported by the operating system's built-in libraries, and are only available on the relevant platform. ---- %|Theme|Source|Graphical?|Base|Notes|License|Author|% &|alt|built-in|no|||Tcl||& &|aqua|built-in|native||Mac OS X only; Native Mac OS X|Tcl||& &|aquablue|external|yes|clam|Oddly, there is no blue involved|||& &|aquativo|external|yes||GTK aquativo||Andrew Wyatt, Pat Thoyts|& &|arc|external|yes|default|GTK arc; Good for Linux; Modern scrollbar look with no up/down arrows. Disabled and read-only colors will not work due to graphics.||Sergei Golovan|& &|black|external|no|clam|[black ttk theme]||Mats Bengtsson|& &|blue|external|yes||This one is blue; Button gradient creates an illusion that the buttons are not square||Pat Thoyts|& &|blueelegance|external|yes||GTK2 Blue Elegance Light; No blue; Odd button graphics. Disabled and read-only colors will not work due to graphics.|||& &|clam|built-in|no|||Tcl||& &|classic|built-in|no|||Tcl||& &|clearlooks|external|yes|clam|GTK Clearlooks; Good for Linux|||& &|default|built-in|no|||Tcl||& &|gtk2|external|yes|clam|X11 Only; [defColor], [xtk::theme] (1) (2)||Jürgen "Arthur" Beyersdorff|& &|keramik|external|yes|alt|||Pat Thoyts|& &|keramik_alt|external|yes|alt|||Pat Thoyts|& &|kroc|external|yes|clam|Orange||David Zolli|& &|plastik|external|yes|default|Disabled and read-only colors will not work due to graphics.||Pat Thoyts|& &|radiance|external|yes|clam||||& &|rivet2d|external|yes|clam|X11 Only; [defColor], [xtk::theme], [xtk::theme::rivet] (1) (2)||Jürgen "Arthur" Beyersdorff|& &|rivet3d|external|yes|clam|X11 Only; [defColor], [xtk::theme], [xtk::theme::rivet] (1) (2)||Jürgen "Arthur" Beyersdorff|& &|radiance|external|yes|clam||||& &|scidblue|external|yes||The scid* themes have nice focus colors and a modern scrollbar with no up/down arrows.|Tcl|Uwe Klimmek|& &|scidgreen|external|yes|||Tcl|Uwe Klimmek|& &|scidgrey|external|yes|||Tcl|Uwe Klimmek|& &|scidmint|external|yes|||Tcl|Uwe Klimmek|& &|scidpink|external|yes|||Tcl|Uwe Klimmek|& &|scidpurple|external|yes|||Tcl|Uwe Klimmek|& &|scidsand|external|yes|||Tcl|Uwe Klimmek|& &|sriv|external|||Unable to locate|||& &|srivlg|external|||Unable to locate|||& &|step|external|no|default|Old, unattractive||||& &|tilegtk|external|no||X11 Only; out of date, could not get to compile||||& &|tileqt|external|no||X11 Only; out of date, compiles, does not work||||& &|tk|external|yes|clam|X11 Only; [defColor], [xtk::theme] (1) (2)||Jürgen "Arthur" Beyersdorff|& &|vista|built-in|native||Windows only; Native Windows|Tcl||& &|waldorf|external|yes||2016. Disabled and read-only colors will not work due to graphics. [waldorf ttk theme]||François Tonneau|& &|winnative|built-in|native||Windows only; Old-Style Windows theme; Native Windows|Tcl||& &|winxpblue|external|yes|clam|GTK WinXP Blue||Pat Thoyts|& &|xpnative|built-in|native||Windows only; Native Windows|Tcl||& ---- *** Notes *** (1) [bll] 2017-4-12: I personally, cannot get these to work. (2) 2018-6-12: Source is already lost. ** Screenshots ** %|alt|aqua|aquablue|% &|[img-ttk-demo-alt]|[img-ttk-demo-aqua]|[img-ttk-demo-aquablue]|& %|aquativo|arc|black|% &|[img-ttk-demo-aquativo]|[img-ttk-demo-arc]|[img-ttk-demo-black]|& %|blue|blueelegance|clam|% &|[img-ttk-demo-blue]|[img-ttk-demo-blueelegance]|[img-ttk-demo-clam]|& %|classic|clearlooks|default|% &|[img-ttk-demo-classic]|[img-ttk-demo-clearlooks]|[img-ttk-demo-default]|& %|keramik|keramik_alt|kroc|% &|[img-ttk-demo-keramik]|[img-ttk-demo-keramik_alt]|[img-ttk-demo-kroc]|& %|plastik|radiance|scidblue|% &|[img-ttk-demo-plastik]|[img-ttk-demo-radiance]|[img-ttk-demo-scidblue]|& %|scidgreen|scidgrey|scidmint|% &|[img-ttk-demo-scidgreen]|[img-ttk-demo-scidgrey]|[img-ttk-demo-scidmint]|& %|scidpink|scidpurple|scidsand|% &|[img-ttk-demo-scidpink]|[img-ttk-demo-scidpurple]|[img-ttk-demo-scidsand]|& %|vista (windows 7)|vista (windows 8)|waldorf|% &|[img-ttk-demo-vista-win7]|[img-ttk-demo-vista-win8]|[img-ttk-demo-waldorf]|& %|winnative|winxpblue|xpnative (windows XP)|% &|[img-ttk-demo-winnative]|[img-ttk-demo-winxpblue]|[img-ttk-demo-xpnative-xp]|& %|xpnative (windows 7)|% &|[img-ttk-demo-xpnative]|& <>Demo Code ====== #!/usr/bin/tclsh package require Tk set theme [lindex $::argv 0] # replace this block with your method of loading the theme set ap [file join [file dirname [info script]] .. code] if { $ap ni $::auto_path } { lappend ::auto_path $ap } unset ap package require themeloader themeloader::loadTheme $theme #if { [file exists $theme.tcl] } { # source $theme.tcl #} ttk::style theme use $theme set tbg [ttk::style lookup TFrame -background] lassign [winfo rgb . $tbg] bg_r bg_g bg_b set tbg [format {#%02x%02x%02x} \ [expr {$bg_r / 256}] \ [expr {$bg_g / 256}] \ [expr {$bg_b / 256}]] set val 55 set valb $theme set off 0 set on 1 . configure -background $tbg ttk::notebook .nb pack .nb -side left -fill both -expand true ttk::labelframe .lf -text " $theme " .nb add .lf -text $theme ttk::frame .junk .nb add .junk -text [join [lreverse [split $theme {}]] {}] ttk::frame .bf ttk::label .lb -text $theme ttk::button .b -text $theme pack .lb .b -in .bf -side left -padx 3p ttk::combobox .combo -values [list aaa bbb ccc] -textvariable valb -width 15 ttk::frame .cbf ttk::checkbutton .cboff -text off -variable off ttk::checkbutton .cbon -text on -variable on pack .cboff .cbon -in .cbf -side left -padx 3p ttk::separator .sep ttk::frame .rbf ttk::radiobutton .rboff -text off -variable on -value 0 ttk::radiobutton .rbon -text on -variable on -value 1 pack .rboff .rbon -in .rbf -side left -padx 3p ttk::scale .sc -from 0 -to 100 -variable val ttk::progressbar .pb -mode determinate -length 100 -variable val ttk::entry .ent -textvariable valb -width 15 ttk::spinbox .sbox -textvariable val -width 5 ttk::scrollbar .sb ttk::sizegrip .sg pack .sb -side right -fill y -expand true pack .bf .combo .cbf .sep .rbf .sc .pb .ent .sbox \ -in .lf -side top -anchor w -padx 3p -pady 3p pack configure .sep -fill x -expand true pack .sg -in .lf -side right -anchor s ====== <> <>Category GUI