请问:如何不操作应用程序一段时间后自动退出?

BigBoyDJ 2004-03-30 05:00:50
就像Windows在没有用户操作一定时间后会自动运行屏保一样,我想让应用程序在不接受操作一定时间后自动退出,不知如何实现,烦请各位大侠勇越帮忙,谢谢!
...全文
85 6 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
menggirl 2004-03-31
  • 打赏
  • 举报
回复
我要分分
menggirl 2004-03-31
  • 打赏
  • 举报
回复
upupupupupupup
ekin 2004-03-31
  • 打赏
  • 举报
回复
:_)
BigBoyDJ 2004-03-31
  • 打赏
  • 举报
回复
呵呵,有人理了,有分同分。
nyf1220 2004-03-31
  • 打赏
  • 举报
回复
呵呵,晕呀,你知道了,考我们呢?
BigBoyDJ 2004-03-31
  • 打赏
  • 举报
回复
还是自己来吧:
在程序中放一个TApplicationEvents控件,一个TTimer控件(Name为tmSysRun),在OnMessage事件中加入:

if (msg.message = wm_keydown) or (msg.message = wm_mousemove) or (msg.message = WM_LBUTTONDOWN) then tmSysRun.Enabled := false;

在TApplicationEvents的OnIdle事件中加入:
tmSysRun.Enabled := true;

在TTimer控件的OnTimer事件中加入:
Close;

设置好TTimer控件的Interval时间,OK了。

1,183

社区成员

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

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