Delphi shell上下文菜单，如何绘制图标

Question

我可以获得一些代码，说明如何在右键单击上下文菜单中绘制位图/图标吗？

我已经为上下文菜单的DLL提供了工作代码，但它只是文本。示例：http://www.marcocantu.com/code/md5/TODOSHLL.htm

Answer 1

seems您只需使用SetMenuItemBitmaps API。

编辑：Here是德尔福的例子。

编辑2：警告：我刚注意到Delphi示例泄漏了位图句柄，最终可能会使系统崩溃。位图应该只在对象的构造函数中加载一次（更好地从它自己的资源加载，而不是从文件系统加载）并在析构函数中释放。