在Delphi IDE中叠加图标

Question

如何在Delphi IDE中实现叠加图标,如下所示:

• 在编辑器的文件选项卡上;
• 在项目经理的树上;
• 在项目经理的弹出菜单上？

Answer 1

我最近一直在使用项目管理器的上下文菜单，并且上下文菜单 ( TPopupMenu) 没有TCustomImageList分配给它。

因此，要在上下文菜单上获取图像，您需要为其指定TCustomImageList( )。TImageList我所做的是创建一个与TPopupMenu组件具有相同所有者的组件。

至于其他的，我知之甚少：

• 项目管理器的树是一个虚拟树视图，因此可能值得在应用程序中使用它来看看可以做什么。

• 编辑器选项卡是自定义组件，因此可能需要一些低级挂钩。看看Delphi IDE Colorizer如何处理自定义选项卡；这可能有助于钩子。

Plea：由于这是在玩弄 IDE 的内部结构，因此请不要假设您是那里的第一人并重新开始编写其他人的工作。

编辑：有一篇关于扩展项目管理器上下文菜单的 EDN 文章