Я использую стили vcl в приложении Delphi XE2, но когда я всплываю в TPopupmenu, это шоу, использующее внешний вид и внешний вид собственных окон, существует любой способ применить цвета стиля vcl к TPopUpMenu?
Как я могу применить стиль vcl к TPopupmenu?
Ответ 1
Замените TPopupmenu для TPopupActionBar или используйте класс интерполятора, чтобы передать TPopupMenu в TPopupActionBar.
TPopupMenu=class(Vcl.ActnPopup.TPopupActionBar);
Также вы можете прочитать это Adding VCL Styles support to a TPopupMenu in 2 lines of code
