delphi - 当程序在一定时间内不使用时自动关闭

Question

这个问题已经有答案了:

How do I check for PROGRAM idle time, as opposed to SYSTEM idle time? (3 个回答)

已关闭 5 年前。

我们有一个程序，我们正在用 Delphi XE 编写。我有一个问题:

如果在我们设置的参数时间内没有使用程序，它应该自动返回到输入屏幕。所以像windows一样，必须有像鼠标和键盘这样的控件。你能帮我解决这个问题吗？

谢谢。

Answer 1

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

这种方法的缺点是您必须处理 32 位 Windows 刻度计数的 49 天滚动问题。作为替代方案，您可以选择安装系统 Hook 来监视键盘和鼠标事件。这将使您避免 49 天的延期问题，但实现起来要复杂得多。