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

Question

我为 TPopUpMenu 分配了一些图标，但看起来它已更改为ownerdraw(它设置为 false)...我也使用 XP Manifest，但它看起来仍然很旧(Win2000 风格)...是否可以使其看起来像在 windows/explorer 中？也许是一个组件？

这是显示问题的图像:

感谢您的帮助。

Answer 1

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

您可能会发现 Toolbar2000有用。尽管名称如此，它确实包含了对 TMenu 和 TPopupMenu 功能的非常灵活的替代，使您可以使菜单看起来像 Of​​fice 2000 中的菜单。(请参阅有关注释带有项目符号项目 Office 2000 样式菜单 的链接页面，其中指出:

Office 2000-style menus There is no clear distinction between menus and toolbars, giving you the utmost in flexibility. Toolbars can contain menus, menu bars can contain buttons, and they can share the same items.

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