T Tomorrows Unregistered / Unconfirmed GUEST, unregistred user! 2002-06-04 #1 系统菜单修改:要求同时有位图和caption,我的代码只能实现其中的一项<br>即要么只有位图,要么只有caption,如何两者都有,图中的软件就是用Delphi做的。<br>http://chemailse.myetang.com/smbit.gif<br> <br><br>先谢谢了!
系统菜单修改:要求同时有位图和caption,我的代码只能实现其中的一项<br>即要么只有位图,要么只有caption,如何两者都有,图中的软件就是用Delphi做的。<br>http://chemailse.myetang.com/smbit.gif<br> <br><br>先谢谢了!
T Tomorrows Unregistered / Unconfirmed GUEST, unregistred user! 2002-06-04 #4 原来的系统菜单:<br> 移动(M)<br>X 关闭(C) Alt+F4<br><br>修改后的:<br>(位图) 移动(M)<br>(位图) 关闭(C) Alt+F4<br>要修在关闭的前边有位图,替换原来的 X,IconView就做到了这一点。而且他也是用Delphi做的<br>
原来的系统菜单:<br> 移动(M)<br>X 关闭(C) Alt+F4<br><br>修改后的:<br>(位图) 移动(M)<br>(位图) 关闭(C) Alt+F4<br>要修在关闭的前边有位图,替换原来的 X,IconView就做到了这一点。而且他也是用Delphi做的<br>
张 张辉明 Unregistered / Unconfirmed GUEST, unregistred user! 2002-06-04 #6 在FORM中加IMAGELIST,把要用的图标放入其中,在菜单控件中选中它,点击文件,选择,imageindex为你所要的图片。
C chemer Unregistered / Unconfirmed GUEST, unregistred user! 2002-06-04 #8 var<br> SysMenu : HMenu;<br> myPicClose := TBitmap.Create;<br> mypicclose:=image1.picture.bitmap;<br>SysMenu := GetSystemMenu(Handle, FALSE);<br>setmenuitembitmaps(sysmenu,SC_CLOSE,SC_CLOSE,mypicclose.handle,mypicclose.handle);
var<br> SysMenu : HMenu;<br> myPicClose := TBitmap.Create;<br> mypicclose:=image1.picture.bitmap;<br>SysMenu := GetSystemMenu(Handle, FALSE);<br>setmenuitembitmaps(sysmenu,SC_CLOSE,SC_CLOSE,mypicclose.handle,mypicclose.handle);