计算机二级:DELPHI如何在菜单中显示图片
文章作者 100test 发表时间 2011:03:22 18:43:57
来源 100Test.Com百考试题网
2009年下半年全国计算机等级考试你准备好了没?考计算机等级考试的朋友,2009年下半年全国计算机等级考试时间是2009年9月19日至23日。更多优质资料尽在百考试题论坛 百考试题在线题库
用过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过大,只有左上角被显示。
特别推荐:
#0000ff>2009年9月全国计算机等级考试时间及科目预告