图标强制TPopupMenu到OwnerDraw?

Ben*_*iss 1 delphi vcl delphi-7

我为TPopUpMenu分配了一些图标,但看起来它改为ownerdraw(设置为false)...我也使用XP Manifest但它仍然看起来那么老(Win2000 Style)......有可能让它看起来像在Windows /资源管理器?也许是一个组件?

这是显示问题的图像:

Delphi 7 Popup with Images(主题)

谢谢您的帮助.

Ken*_*ite 6

这只是Delphi 7极度过时的问题.它在发布时真是太棒了,但它现在已经十年了,它的年龄正在显现.

您可能会发现Toolbar2000很有用.尽管名称不同,它还包含一个非常灵活的替换TMenu和TPopupMenu功能,使您可以使菜单看起来像Office 2000中的那些.(请参阅链接页面上的注释以及项目符号项Office 2000 style menus,其中说明:

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

它已作为免费软件(带有源代码)发布,因此它可用,而AFAICT它仍然支持Delphi 7.如果不是,Toolbar97(可从相同的URL获得)将提供类似的功能.

  • @BenjaminWeiss,我刚刚检查过.根据下载页面(不要让它欺骗你 - 工具栏2K许可证表明它现在是免费的),它与D2009兼容,这意味着它必须是Unicode友好的. (2认同)