musicstashall
Знающий
- Сообщения
- 322
- Репутация
- 7
Столкнулся с задачей, когда потребовалось устанавливать шрифт текста в элементах управления такой, чтобы соответствовал дефолтному шрифту системы в данный момент. Дело в том, что если я применяю стиль к шрифту, в данном случае это подчеркнутый текст, то непосредственно сам шрифт становится отличным от дефолтного. Вот пример:
Вопрос: есть ли возможность получить системный шрифт и его применять к элементам? Либо что-то может иное посоветуете.
Код:
#include <GUICtrlOnHover.au3>
$Back = GUICtrlCreateLabel('<< Назад', $x + 30, $y + 352, 50)
GUICtrlSetColor(-1, 0x696969)
GUICtrlSetFont(-1, -1, -1, -1)
$Complete = GUICtrlCreateLabel('Завершить', $x + 90, $y + 352, 60)
GUICtrlSetColor(-1, 0x696969)
GUICtrlSetFont(-1, -1, -1, -1)
$forward = GUICtrlCreateLabel('Далее >>', $x + 160, $y + 352, 50)
GUICtrlSetColor(-1, 0x696969)
GUICtrlSetFont(-1, -1, -1, -1)
Func _Hover($CtrlID, $iParam)
Switch $iParam
Case 1 ;Hover
Switch $CtrlID
Case $Back
GUICtrlSetFont($Back, -1, -1, 4)
Case $Complete
GUICtrlSetFont($Complete, -1, -1, 4)
Case $forward Then
GUICtrlSetFont($forward, -1, -1, 4)
EndSwitch
Case 2 ;Leave Hover
Switch $CtrlID
Case $Back
GUICtrlSetFont($Back, -1, -1, -1)
Case $Complete
GUICtrlSetFont($Complete, -1, -1, -1)
Case $forward
GUICtrlSetFont($forward, -1, -1, -1)
EndSwitch
EndSwitch
EndFunc
Вопрос: есть ли возможность получить системный шрифт и его применять к элементам? Либо что-то может иное посоветуете.