我截获我窗口的消息,来自己处理这个函数怎么写的在delphi里面 sendmessage(FindWindow(0,'窗口标题'),wm_close,0,0); 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 sendmessage(FindWindow(0,'窗口标题'),wm_close,0,0); sendmessage() or postmessage or F1 重载WndProc过程,你就可以截获窗体的所有消息了。 procedure WndProc(var Message: TMessage); override;procedure TForm1.WndProc(var Message: TMessage);begin //你的处理 inherited;end; 呵呵,同意楼上,不过,setwindowlong()也是可以的,可能是你没用对吧! 我不光想截获窗体的消息,我还嫌结果桌面的消息。我要这样setwindowlong(getdesktopwindow,GWL_WNDPROC, yourProc);不知道这样可不可以。如果不可以怎么截获桌面上的消息阿 delphi 如何对压缩文件文件名加密 怎么样禁止Twebbrowser本身的快捷键? Delphi写的DLL如何按别名导出函数 如何把excel里的数据导入到DBGrid里面。 如何控制EXECL文件内容复制 可否自制一个游戏M人机器,如何实现(可否举个例子) 求杀读方法 (internat.exe) 这是怎么回事 真正的高手问题,能解决问题再加100,绝不食言。 在这里提问有限制吗?怎么老是失败? 此单提交后我再打不开,能否新建单子答复,多谢! 为什么这个语句不执行? ●●●有没有值得推荐的DBRichEdit组件,我用InfoPower3000的,但很不稳定,经常出现指针错●●●
procedure WndProc(var Message: TMessage); override;procedure TForm1.WndProc(var Message: TMessage);
begin
//你的处理 inherited;
end;
setwindowlong(getdesktopwindow,GWL_WNDPROC, yourProc);
不知道这样可不可以。如果不可以怎么截获桌面上的消息阿