在显示弹出式对话框的时候,如何实现系统挂起?

q112 2004-10-25 10:03:55
这是个弹出式对话框:
windows.messagebox(0,'标题','警告错误',MB_ICONWARNING or MB_TOPMOST);

在2000下这个对话框显示在所有窗体的最前面,但是你还是能够响应其它的程序(比如还能继续在记事本上打字),我的要求是如何对话框一显示,整个系统挂起,在没有结束这个对话框的时候,其它任何程序用鼠标或者键盘都无法响应???
...全文
84 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
ztenv 2004-10-26
  • 打赏
  • 举报
回复
阻塞键盘和鼠标的输入就可以了
aderly 2004-10-26
  • 打赏
  • 举报
回复
用hook
aderly 2004-10-26
  • 打赏
  • 举报
回复
你可以 像萬象網吧管理程序那樣,把鼠標控制 在你這個對話框裡,然後禁止鍵般就可以 了
xthmpro_cn 2004-10-26
  • 打赏
  • 举报
回复
错了,是下面的.
windows.messagebox(Application.handle,'标题','警告错误',MB_ICONWARNING or MB_TOPMOST or MB_SYSTEMMODAL);
xthmpro_cn 2004-10-26
  • 打赏
  • 举报
回复
这些人把问题想的这么难,试试下面的.
windows.messagebox(Application.handle,'标题','警告错误',MB_ICONWARNING or MB_TOPMOST);
q112 2004-10-25
  • 打赏
  • 举报
回复
问题似乎不难,但是谁能告诉我呢?

1,184

社区成员

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

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