高手们请教一个很菜的问题,虽然很菜,但我还是不知道 我不知道,但我猜想是对消息的响应时间或是什么的。 AppendMenu(GetSystemMenu(Handle,false),MF_STRING,200,'前端显示(&A)');同这一行的“200”有关吧! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 的确是和AppendMenu(GetSystemMenu(Handle,false),MF_STRING,200,'前端显示(&A)');有关,200是您添加的菜单项的ID,当按下系统发送消息,消息里面就含有这个ID。所以可以用很简单的方法来证实:将这一句改成300,但是下面的不改,结果是点击菜单没有反应。如果把if Msg.IDItem =200 then 中200也改成300,您就可以发现效果和200的完全一样啦。 另外:这么写习惯不好 procedure MenuCommand(var Msg:TWMMENUSELECT); //自定义过程 message WM_SysCommand; 这样写好一点 procedure MenuCommand(var Msg:TWMMENUSELECT); message WM_SysCommand;//自定义过程 求优化算法 应用程序栏里程序的隐藏实现 心情不好,散分 给记录排序的问题 明天就是国庆,祝愿祖国繁荣富强,散分祝贺~~ split 函数 数据库备份和恢复 有关pagecontrol的changing事件问题? 为什么这样查不到数据?代码如下: 请问如何给一个PARADOX数据库加秘? 急!在DELPHI编程中如何实email地址查找??(有分送哦!) 哪一个delphi网站是最好的!各位讨论一下:)
有关,200是您添加的菜单项的ID,当按下系统发送消息,消息里面就含有这个ID。
所以可以用很简单的方法来证实:将这一句改成300,但是下面的不改,结果是点击菜单没有反应。如果把if Msg.IDItem =200 then 中200也改成300,您就可以发现效果和200的完全一样啦。
另外:这么写习惯不好
procedure MenuCommand(var Msg:TWMMENUSELECT); //自定义过程
message WM_SysCommand;
这样写好一点
procedure MenuCommand(var Msg:TWMMENUSELECT); message WM_SysCommand;//自定义过程