Поправил тему оформления
Some checks failed
Gitea Actions Demo / Explore-Gitea-Actions (push) Has been cancelled
Some checks failed
Gitea Actions Demo / Explore-Gitea-Actions (push) Has been cancelled
This commit is contained in:
7
debian/changelog
vendored
7
debian/changelog
vendored
@@ -1,3 +1,9 @@
|
|||||||
|
projman (2.0.0-alpha18) stable; urgency=medium
|
||||||
|
|
||||||
|
* Новая сборка
|
||||||
|
|
||||||
|
-- Sergey Kalinin <svk@nuk-svk.ru> Mon, 27 Oct 2025 21:01:15 +0300
|
||||||
|
|
||||||
projman (2.0.0-alpha18) stable; urgency=medium
|
projman (2.0.0-alpha18) stable; urgency=medium
|
||||||
|
|
||||||
* Исправлена работа в windows
|
* Исправлена работа в windows
|
||||||
@@ -371,3 +377,4 @@ projman (2.0.0-alfa0) stable; urgency=medium
|
|||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
@@ -10,7 +10,7 @@ exec wish8.6 "$0" -- "$@"
|
|||||||
######################################################
|
######################################################
|
||||||
# Version: 2.0.0
|
# Version: 2.0.0
|
||||||
# Release: alpha18
|
# Release: alpha18
|
||||||
# Build: 27102025205938
|
# Build: 28102025160338
|
||||||
######################################################
|
######################################################
|
||||||
|
|
||||||
# определим текущую версию, релиз и т.д.
|
# определим текущую версию, релиз и т.д.
|
||||||
|
|||||||
124
theme/black.tcl
124
theme/black.tcl
@@ -39,6 +39,7 @@ namespace eval ttk::theme::black {
|
|||||||
-lightest "#ffffff"
|
-lightest "#ffffff"
|
||||||
-selectbg "#4a6984"
|
-selectbg "#4a6984"
|
||||||
-selectfg "#ffffff"
|
-selectfg "#ffffff"
|
||||||
|
-font "#c8c8c8"
|
||||||
}
|
}
|
||||||
if {[info commands ::ttk::style] ne ""} {
|
if {[info commands ::ttk::style] ne ""} {
|
||||||
set styleCmd ttk::style
|
set styleCmd ttk::style
|
||||||
@@ -46,77 +47,78 @@ namespace eval ttk::theme::black {
|
|||||||
set styleCmd style
|
set styleCmd style
|
||||||
}
|
}
|
||||||
|
|
||||||
$styleCmd theme create black -parent clam -settings {
|
$styleCmd theme create black -parent clam -settings {
|
||||||
|
|
||||||
# -----------------------------------------------------------------
|
# -----------------------------------------------------------------
|
||||||
# Theme defaults
|
# Theme defaults
|
||||||
#
|
#
|
||||||
$styleCmd configure "." \
|
$styleCmd configure "." \
|
||||||
-background $colors(-frame) \
|
-background $colors(-frame) \
|
||||||
-foreground white \
|
-foreground white \
|
||||||
-bordercolor $colors(-darkest) \
|
-bordercolor $colors(-darkest) \
|
||||||
-darkcolor $colors(-dark) \
|
-darkcolor $colors(-dark) \
|
||||||
-lightcolor $colors(-lighter) \
|
-lightcolor $colors(-lighter) \
|
||||||
-troughcolor $colors(-darker) \
|
-troughcolor $colors(-darker) \
|
||||||
-selectbackground $colors(-selectbg) \
|
-selectbackground $colors(-selectbg) \
|
||||||
-selectforeground $colors(-selectfg) \
|
-selectforeground $colors(-selectfg) \
|
||||||
-selectborderwidth 0 \
|
-selectborderwidth 0 \
|
||||||
-font "{Droid Sans Mono} 9" \
|
-font "{Droid Sans Mono} 9" \
|
||||||
;
|
;
|
||||||
|
|
||||||
$styleCmd map "." \
|
$styleCmd map "." \
|
||||||
-background [list disabled $colors(-frame) \
|
-background [list disabled $colors(-frame) \
|
||||||
active $colors(-lighter)] \
|
active $colors(-lighter)] \
|
||||||
-foreground [list disabled $colors(-disabledfg)] \
|
-foreground [list disabled $colors(-disabledfg)] \
|
||||||
-selectbackground [list !focus $colors(-darkest)] \
|
-selectbackground [list !focus $colors(-darkest)] \
|
||||||
-selectforeground [list !focus white] \
|
-selectforeground [list !focus white] \
|
||||||
;
|
;
|
||||||
|
|
||||||
# ttk widgets.
|
# ttk widgets.
|
||||||
$styleCmd configure TButton \
|
$styleCmd configure TButton \
|
||||||
-width -8 -padding {5 1} -relief link
|
-width -8 -padding {5 1} -relief link
|
||||||
$styleCmd configure TMenubutton\
|
$styleCmd configure TMenubutton \
|
||||||
-relief flat -arrowsize 0
|
-relief flat -arrowsize 0
|
||||||
$styleCmd configure TCheckbutton \
|
|
||||||
-indicatorbackground $colors(-lighter) -indicatormargin {1 1 4 1}
|
|
||||||
$styleCmd configure TRadiobutton \
|
|
||||||
-indicatorbackground $colors(-lighter) -indicatormargin {1 1 4 1}
|
|
||||||
|
|
||||||
$styleCmd configure TEntry \
|
$styleCmd configure TCheckbutton \
|
||||||
-fieldbackground gray20 -foreground black \
|
-indicatorbackground $colors(-lighter) -indicatormargin {1 1 4 1}
|
||||||
-padding {2 0} -border -1
|
$styleCmd configure TRadiobutton \
|
||||||
$styleCmd configure TCombobox \
|
-indicatorbackground $colors(-lighter) -indicatormargin {1 1 4 1}
|
||||||
-fieldbackground white -foreground black \
|
|
||||||
-padding {2 0}
|
|
||||||
$styleCmd configure TSpinbox \
|
|
||||||
-fieldbackground white -foreground black \
|
|
||||||
-padding {2 0}
|
|
||||||
|
|
||||||
$styleCmd configure TNotebook \
|
$styleCmd configure TEntry \
|
||||||
-border -1
|
-fieldbackground gray20 -foreground $colors(-font) \
|
||||||
$styleCmd configure TNotebook.Tab \
|
-padding {2 0} -border -1
|
||||||
-padding {6 2 6 2} \
|
$styleCmd configure TCombobox \
|
||||||
-border -1
|
-fieldbackground white -foreground $colors(-font)\
|
||||||
|
-padding {2 0}
|
||||||
|
$styleCmd configure TSpinbox \
|
||||||
|
-fieldbackground white -foreground $colors(-font) \
|
||||||
|
-padding {2 0}
|
||||||
|
|
||||||
$styleCmd map TNotebook.Tab -background [list \
|
$styleCmd configure TNotebook \
|
||||||
selected $colors(-lighter)]
|
-border -1
|
||||||
|
$styleCmd configure TNotebook.Tab \
|
||||||
|
-padding {6 2 6 2} \
|
||||||
|
-border -1
|
||||||
|
|
||||||
# tk widgets.
|
$styleCmd map TNotebook.Tab -background [list \
|
||||||
$styleCmd map Menu \
|
selected $colors(-lighter)]
|
||||||
-background [list active $colors(-lighter)] \
|
|
||||||
-foreground [list disabled $colors(-disabledfg)]
|
|
||||||
|
|
||||||
$styleCmd configure TreeCtrl \
|
# tk widgets.
|
||||||
-background gray30 -itembackground {gray60 gray50} \
|
$styleCmd map Menu \
|
||||||
-itemfill white -itemaccentfill yellow -border -1
|
-background [list active $colors(-dark)] \
|
||||||
|
-foreground [list disabled $colors(-lightest)] \
|
||||||
|
|
||||||
$styleCmd map Treeview\
|
$styleCmd configure TreeCtrl \
|
||||||
-background [list selected $colors(-lighter)] \
|
-background gray30 -itembackground {gray60 gray50} \
|
||||||
-foreground [list selected $colors(-selectfg)]
|
-itemfill white -itemaccentfill yellow -border -1
|
||||||
# -background [list selected $colors(-selectbg)] \
|
|
||||||
|
|
||||||
$styleCmd configure Treeview -fieldbackground gray25
|
$styleCmd map Treeview\
|
||||||
}
|
-background [list selected $colors(-lighter)] \
|
||||||
|
-foreground [list selected $colors(-selectfg)]
|
||||||
|
# -background [list selected $colors(-selectbg)] \
|
||||||
|
|
||||||
|
$styleCmd configure Treeview -fieldbackground gray25
|
||||||
|
}
|
||||||
puts [ttk::style element names]
|
puts [ttk::style element names]
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user