拦截到WM_COMMAND后如何让此消息不执行 如题,我拦截到的是从MENU中发出的消息 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 重载wndproc活着写拦截WM_COMMAND方法,接收到WM_COMMAND后,直接Exit 接收到WM_COMMAND后,直接Exit 不行啊我是装了HOOK 拦截到的直接EXIT的话好象不起作用 procedure WMCommand(var Message: TWMCommand); message WM_COMMAND;procedure TForm1.WMCommand(var Message: TWMCommand);begin //这里处理,不执行就Exit;end; 不是用这样的方式来做的 你的这个我知道我是先加载了HOOK的我的目的是想让别人的一个EXE中的某一按钮按下去不响应 好象是返回值上的区别吧,忘了.不知道HOOK的类型能不能修改消息,如能就好办了:WM_COMMAND wNotifyCode = HIWORD(wParam); // notification code wID = LOWORD(wParam); // item, control, or accelerator identifier hwndCtl = (HWND) lParam; // handle of control 把wID改 成一个不存在的ID,10000总够了,呵呵 可以了 minizhuxianchun我是直接把发送的消息类型替换掉了嘿嘿 钩WM_LBUTTONDOWN 消息,然后判断根据鼠标位置来判断是否在按钮内,如果是就EXIT 自己完成了 分刚结掉 sanguomi 不好意思了 fast report 画表格问题 [在线等]请问openpicturedialog控件在哪个选项里 如何处理“主键重复”异常? 请教一个关于sql 2000数据库表的问题! 如何比较数组是否匹配 小问题 谁作过档案管理系统? 关于窗体拖动? 钩子的新问题? 和listview有关的问题求教? Delphi寻求帮助 Delphi中Result都可以返回哪些类型啊?
procedure WMCommand(var Message: TWMCommand); message WM_COMMAND;
procedure TForm1.WMCommand(var Message: TWMCommand);
begin
//这里处理,不执行就Exit;
end;
WM_COMMAND
wNotifyCode = HIWORD(wParam); // notification code
wID = LOWORD(wParam); // item, control, or accelerator identifier
hwndCtl = (HWND) lParam; // handle of control
把wID改 成一个不存在的ID,10000总够了,呵呵
minizhuxianchun我是直接把发送的消息类型替换掉了嘿嘿
钩WM_LBUTTONDOWN 消息,然后判断根据鼠标位置来判断是否在按钮内,如果是就EXIT