图标强制TPopupMenu到OwnerDraw?

时间:2012-07-26 01:18:03

标签: delphi-7 vcl delphi

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

这是显示问题的图像:

Delphi 7 Popup with Images (Themed)

感谢您的帮助。

1 个答案:

答案 0 :(得分:6)

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

您可能会发现Toolbar2000有用。尽管名称不同,但它包含了TMenuTPopupMenu功能的非常灵活的替代品,使您可以使菜单看起来像Office 2000中的那些。(请参阅带有子弹的链接页面上的注释项目Office 2000 style menus,其中声明:

  

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

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