关于截取消息的问题,请大家帮忙

kill_net 2002-11-15 11:43:08

function login:boolean ;
var
msg:tmsg;
begin
Application.CreateForm(Tfm_login, fm_login);
fm_login.ShowModal;
while peekmessage(msg,0,0,0,pm_remove) do
begin

if msg.message=wm_usercon then
begin
if msg.wParam=wm_quit then
begin
showmessage('Quit');
result:=false
end ;
if msg.wParam=wm_login then
begin
showmessage('login');
result:=true
end;
end
else
begin
translatemessage(msg);
dispatchmessage(msg);
;
end;
end;

end;


procedure Tfm_login.btn_exitClick(Sender: TObject);
begin
postmessage(0,wm_usercon,wm_quit,0);
end;

login接受到btn_exitClick发出的消息并返回一个布尔值,但现在没有任何响应





...全文
77 11 打赏 收藏 转发到动态 举报
写回复
用AI写文章
11 条回复
切换为时间正序
请发表友善的回复…
发表回复
kill_net 2002-12-02
  • 打赏
  • 举报
回复
我是在问大家我该如何写这段代码
kill_net 2002-12-01
  • 打赏
  • 举报
回复
我对api不是很熟悉我该如何做那
deanchang 2002-12-01
  • 打赏
  • 举报
回复
如果"他汉子"说的改成handle还是不行,干脆你用findwindow抓到句柄不就万无一失了??
kmask 2002-12-01
  • 打赏
  • 举报
回复
没有定义要拦截的消息???
kill_net 2002-11-30
  • 打赏
  • 举报
回复
大家不要灌了
hansion3406 2002-11-29
  • 打赏
  • 举报
回复
原来比我会灌啊..呵呵..
为什么世界这么精彩而我却没有人爱??呜呜...
  • 打赏
  • 举报
回复
不但看到了,而且吓到了,哈哈

晕倒(按人中中):)。。。。。。。。
stanely 2002-11-18
  • 打赏
  • 举报
回复
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUP
UPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUP
UPUPUPUP UPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUP UPUPUPUPUPUP
UPUPUPUP UPUPUPUPUP
UPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUP UPUP
UPUP UPUPUPUP
UPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUP
UPUPUPUPUPUPUP UPUPUPUPUPUP
UPUPUPUPUPUP UPUPUPUPUPUPUPUPUP UPUPUPUPUPUP
UPUPUPUPUP UP UPUPUPUPUPUPUPUPUP UPUPUPUPUPUP
UPUPUPUP UPUP UPUPUPUPUPUP
UPUPUP UPUPUPUP UPUPUPUPUPUPUPUPUP UPUPUPUPUPUP
UPUP UPUPUPUPUP UPUPUPUPUPUPUPUPUP UPUPUPUPUPUP
UP UPUPUPUPUPUP UPUPUPUPUPUP
UPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUP UPUPUPUPUPUP
UPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUP UPUPUPUPUPUP
UPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUP UPUPUPUPUPUP
UPUPUPUPUPUPUPUP UPUPUPUPUPUP
UPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUP UPUP
UPUP UPUPUPUPUPUPUP UPUPUP
UPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUP
UPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUP UPUPUPUP UPUPUP
UPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUP UPUPUPUP UPUPUP
UPUPUPUPUPUP UPUPUP UPUPUPUPUP UPUPUPUP UPUPUP
UPUPUPUPUPUP UPUPUPUPUP UPUPUPUP UPUPUPUP UPUPUP
UPUPUPUP UPUPUPUPUPUPUP UPUPUP UPUPUPUP UPUPUP
UPUPUP UP UPUP UPUPUPUP UPUPUP
UPUPUPUP UPUPUP UPUPUPUP UPUP UPUPUPUP UPUPUP
UPUPUPUPUPUPUPUP UPUPUPUP UPUPUP UPUPUPUP UPUPUP
UPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUP UPUPUPUP UPUPUP
UPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUP UPUPUPUP UPUPUP
UPUPUPUPUPUPUPUP UPUPUP UPUPUP UPUPUPUP UPUPUP
UPUPUP UPUPUPUPUP UPUPUPUP UPUPUP
UPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUP UPUPUPUP UPUPUP
UPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUP UPUPUPUP UPUPUP
UPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUP UPUPUPUP UPUPUP
UPUPUPUPUPUPUPUP UPUPUPUPUP UPUPUPUPUPUPUP UPUPUP
UPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUP UPUPUP
UPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUP
UPUP UPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUP
UPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUP
UPUPUPUP UPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUP UPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUP
UPUPUP UPUPUPUP UPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUP
UPUPUP UPUPUPUPUPUPUPUPUPUP UPUPUPUPUP
UPUPUP UPUPUPUP UPUPUPUP UPUPUPUPUP UPUPUPUPUP
UPUPUP UPUPUPUP UPUPUPUP UPUPUPUPUP UPUPUPUPUP
UPUPUP UPUPUPUP UPUPUPUP UPUPUPUPUPUP UPUPUPUPUPUP
UPUPUP UPUPUPUP UPUPUPUP UPUPUPUPUPUP UPUPUPUPUPUP
UPUPUP UPUPUPUP UPUPUPUP UPUPUPUPUPUP UPUPUPUPUPUP
UPUPUP UPUPUPUP UPUPUPUP UPUPUPUPUPUP UPUPUPUPUPUP
UPUPUP UPUPUPUP UPUPUPUP UPUPUPUPUPUP UPUP UPUPUP
UPUPUP UPUPUPUP UPUPUP UPUP
UPUPUP UPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUP
UPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUP
UPUPUP UPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUP
UPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUPUPUP UPUP UPUPUP
UPUPUP UPUPUPUPUPUP UPUP UPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUP UPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP UPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUP UPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUP UPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUP UPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUP UPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUP UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP
stanely 2002-11-17
  • 打赏
  • 举报
回复
postmessage(0,wm_usercon,wm_quit,0);
改成
postmessage(handle,wm_usercon,wm_quit,0);
kill_net 2002-11-17
  • 打赏
  • 举报
回复
哥哥我问的不是这样的问题
Wnyu 2002-11-16
  • 打赏
  • 举报
回复
fm_login.ShowModal改为fm_login.ShowModal试试

1,183

社区成员

发帖
与我相关
我的任务
社区描述
Delphi Windows SDK/API
社区管理员
  • Windows SDK/API社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧