delphi - Delphi XE2 风格：主菜单被忽略

Question

我在 Delphi XE2 中的一个 VCL 应用程序中应用了一个样式，但它工作正常，但似乎主菜单忽略了该样式。见附图。这是正常行为吗？

关于如何将样式应用于主菜单的任何建议？

Answer 1

这是TMainMenuBarStyleHookVcl Style 挂钩的限制。解决此类问题的常规方法是创建并注册新的TMainMenu样式钩子，但不幸的是，此 Vcl 样式钩子由TFormStyleHook（表单的 vcl 样式钩子）在内部使用，因此这将需要您创建一个新的表单样式钩子同样，这意味着大量的工作。

所以我的建议是替换TMainMenu一个TActionMainMenuBar非常适合 vcl 样式的组件。