Delphi XE2样式:忽略主菜单

Ale*_*dre 7 delphi menu delphi-xe2 vcl-styles

我已经在Delphi XE2中将样式应用于VCL应用程序,但它工作正常,但似乎主菜单忽略了样式.见附图.这是正常行为吗?在此输入图像描述

关于如何在主菜单中应用样式的任何建议?

RRU*_*RUZ 10

这是TMainMenuBarStyleHookVcl Style钩子的限制.修复此类问题的常规方法是创建并注册新的TMainMenuStyle钩子,但不幸的是,这个Vcl Style钩子在内部由TFormStyleHook(窗体的vcl样式钩子)使用,所以这将需要你创建一个新的表单样式钩子同样,这意味着很多工作.

所以我的建议是替换TMainMenu一个TActionMainMenuBar与vcl样式非常兼容的组件.

在此输入图像描述