如何为 Delphi 10.1 Berlin 禁用 PopupMenu/Menu 的 VCL 样式?

How can I disable VCL Style for PopupMenu/Menu for Delphi 10.1 Berlin?

如何为 Delphi 10.1 Berlin 禁用 PopupMenu/Menu 的 VCL 样式?

因为它不适合 运行 长菜单。所以,我想对 menu/popup 个菜单项使用 windows 样式。

这可能吗?

要禁用 VCL 样式下的菜单样式,您必须删除 TStyleManager.SystemHooks 属性.

shMenus 元素
TStyleManager.SystemHooks := TStyleManager.SystemHooks - [shMenus];