DELPHI如何在菜单中显示图片？

2008-01-02 11:02:54　来源:中国自学编程网　作者: 点击:

用过Office97吗？是不是觉得在菜单中显示图标很新鲜？如果想让你的程序也能如此锦上添花，那就请你赶快准备bmp吧！

　　
　　假设你打算为“文件”菜单栏（name为n1）下的第9项（序号改为8）“打印”添加一个打印机图标（文件名为c:inter.bmp），那只要在form的OnCreate事件中这样编写：

　　
　　var
　　 Bmp : TPicture;
　　begin
　　Bmp := TPicture.Create;
　　Bmp.LoadFromFile(′c:printer.bmp′);
　　SetMenuItemBitmaps(n1.Handle,8， MF_BYPOSITION,Bmp. Bitmap. Handle, Bmp.Bitmap.Handle);
　　end;

　　
　　其中，第一个bitmap.handle用于未选定菜单项（unchecked），第二个则指定了选定（checked）时所显示的bitmap，同异皆可。另外，由于菜单项的高度有限，所以，若bitmap过大，只有左上角被显示。

评论加载中...

编辑部信箱去论坛给我们提意见

精彩推荐

焦点大图推荐

本类热门文章

论坛美图

本周软件下载排行

广告联系 | 版权说明 | 意见建议 | 加入收藏 | 华军网站群 [ 华军软件园 - 华军软件商城 - 华军软件园论坛 ]

DELPHI如何在菜单中显示图片？

相关文章：

论坛美图