Изменить фон TPageControl (вкладок и основной области)

Работаю в Delphi 11 Alexandria. Кидаю на форму TPageControl. Фон контрола – белый. Сделать его серым (вернее, clBtnFace) можно, отключив Runtime Themes (в настройках манифеста проекта). Однако, результат получается не очень красивым, т.к. отключаются стили. Особенно удручает TProgressBar в стиле Windows 2000. Ещё один вариант – применить SetWindowTheme(MyPageControl.Handle, nil, '') , однако стили в этом случае так же отключаются.

Вопрос: можно ли как-то поменять фон PageControl'а (вкладок и основной области) без изменения остальных элементов стиля? Может, через WinAPI, через манипуляции со стилями (VCL или Winapi.UxTheme)?


Ответы (0 шт):