delphi-7 - 图标强制 TPopupMenu 到 OwnerDraw？

Question

我为 TPopUpMenu 分配了一些图标，但看起来它已更改为 ownerdraw（它设置为 false）...我也使用 XP Manifest，但它看起来仍然很旧（Win2000 样式）...是否有可能让它看起来像在 Windows/资源管理器中？也许是一个组件？

这是显示问题的图像：

感谢您的帮助。

Answer 1

这只是 Delphi 7 非常过时的问题。它在发布时很棒，但现在已经有十年了，而且它的年龄正在显现。

您可能会发现Toolbar2000很有用。尽管名称如此，但它包含一个非常灵活的替代品TMenu和TPopupMenu功能，可让您使您的菜单看起来像 Of​​fice 2000 中的菜单。（请参阅链接页面上带有项目符号项的注释Office 2000 style menus，其中指出：

Office 2000 风格的菜单 菜单和工具栏之间没有明显的区别，为您提供了最大的灵活性。工具栏可以包含菜单，菜单栏可以包含按钮，它们可以共享相同的项目。

它已作为免费软件（带有源代码）发布，因此可用，并且 AFAICT 它仍然支持 Delphi 7。如果不是，Toolbar97（可从同一 URL 获得）将提供类似的功能。