Workaround to scale up fonts on high resolution Linux systems

This commit is contained in:
Matthias Hochsteger 2017-01-20 10:39:16 +01:00
parent cc0f14c14c
commit 424b246eda

View File

@ -1,3 +1,12 @@
if { $tcl_platform(os) eq "Linux" && [tk scaling] > 1.5 } {
# On some Linux systems, the scaling setting is only applied after
# overwriting some default font settings.
# This is a workaround to scale up fonts on high resolution displays.
font create ngFont -family Helvetica
option add *font ngFont
ttk::style configure "." -font ngFont
}
# netgen menus: # netgen menus:
menu .ngmenu -tearoff 0 -relief raised -bd 2 menu .ngmenu -tearoff 0 -relief raised -bd 2