delphi – 程序在一段时间内未使用时自动关闭

参见英文答案 > How do I check for PROGRAM idle time, as opposed to SYSTEM idle time?                                    3个
我们有一个程序,我们正在用Delphi XE编写.我有个问题 ：

如果程序在我们设置为参数的持续时间内未使用,则应自动返回到输入屏幕.所以像Windows一样,必须有像鼠标和键盘这样的控件.你能帮帮我吗？

谢谢.

定期调用 GetLastInputInfo.这将返回上次输入事件的滴答计数.然后将输入事件的滴答计数与当前滴答计数之间的差异与超时进行比较.

这种方法的缺点是你必须处理具有32位Windows滴答计数的49天翻转问题.作为替代方案,您可以选择安装系统挂钩来监视键盘和鼠标事件.这将允许您避免49天翻转问题,但实施起来要复杂得多.