在Delphi IDE中叠加图标

Question

如何在Delphi IDE中实现叠加图标，如下所示：

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

Answer 1

我最近一直在玩项目经理的上下文菜单，上下文菜单（TPopupMenu）没有分配TCustomImageList。

因此，要在上下文菜单中获取图像，您需要为其分配TCustomImageList（TImageList）。我所做的是创建一个与TPopupMenu组件具有相同所有者的人。

对于其他人，我知之甚少：

• 项目经理的树是virtual tree view，因此在应用程序中使用它可能值得一试，看看可以做些什么。

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

辩诉：由于这是在IDE的内部，所以请不要假设你是第一个在那里开始写作其他人的工作。

修改：Extending the Project Manager Context menu

上有一篇EDN文章