如何做出如Windows开始菜单中带Bitmap BAR的菜单?照“Delphi论坛精华2000”中所写无效!(100分)

  • 主题发起人 主题发起人 章慧
  • 开始时间 开始时间

章慧

Unregistered / Unconfirmed
GUEST, unregistred user!
如上!急! 我在Delphi5中象使菜单弹出时和O-ICQ一样带BAR!使用PopupMenu的非自动弹
出,为何用ModifyMenu和SetMenuItemBitmap都不行?
 
我有一个控件,目前仅支持DLEPHI4。0以上版本。
 
有控件的啊,coolmenu可以,去我的主页<a href="http://go.163.com/~delphizone"><font size="4" color="#339966">Delphi Zone</font></a>
下载吧
ps:你是南航的那个章慧吧,如果是的给我发信<a href="mailto:delphizone@yeah.net">Delphi Zone</a>
 
使用AHM中的控件。www.net-wing.net/kangwei
 
可否有哪位大虾动手给出源码?,希望可以不使用第三方控件。
 
算了,我自己搞出来了:
在第二个Item上面BarBreak;
接管第一个的OnDrawItem,ACanvas.Draw(x,y,TGraphic);
接管所有的‘-’的DrawItem,自己划线免得‘-’划到图片上去.
 
我也有同样的问题,能否把源级我,谢谢! mchsoft@163.net。
 
章慧:
我也想要那部分代码,可以?
tingweb@wx88.net
很感谢
 
非常感謝:corao@yeah.net
 
wind2000@21cn.com
谢谢
 
多人接受答案了。
 
后退
顶部