【发布时间】：2012-04-15 20:16:58
【问题描述】：
我在 Delphi XE2 应用程序中使用 vcl 样式，但是当我弹出一个 TPopupmenu 时，这是使用本机窗口外观和感觉显示的，是否存在将 vcl 样式颜色应用于 TPopUpMenu 的任何方式？
【问题讨论】：
-
@RRUZ，轮到你了 :-)
标签： delphi delphi-xe2 vcl-styles
【发布时间】：2012-04-15 20:16:58
【问题描述】：
将 TPopupmenu 替换为 TPopupActionBar 或使用插入器类将 TPopupMenu 强制转换为 TPopupActionBar。
TPopupMenu=class(Vcl.ActnPopup.TPopupActionBar);
你也可以阅读这个Adding VCL Styles support to a TPopupMenu in 2 lines of code
【讨论】：