如何检测非活动用户

Question

如何检测 Windows 应用程序中的非活动（空闲）用户？我想在一段时间内没有来自用户的任何输入（键盘、鼠标）时关闭应用程序。

Answer 1

当屏幕保护程序即将启动时，您的应用程序将收到一条带有SC_SCREENSAVE 作为命令ID 的WM_SYSCOMMAND 消息。这样可以吗？当监视器即将变为空白时，还有SC_MONITORPOWER 命令 ID（也是 WM_SYSCOMMAND 消息）。

编辑：查看 cmets，您似乎并不关心 user 是否处于非活动状态，而是您的 应用程序 是否处于非活动状态。

这很容易。如果您的应用程序已最小化，则用户不会与它进行交互。如果您的应用程序不是前台应用程序，那也是一个很好的指标。

您还可以注意泵中的消息，以注意是否有任何用户输入消息到您的应用程序中，在 C++ 中向泵中添加代码是微不足道的，在 delphi 中，您可以 使用 WH_GETMESSAGE 挂钩来监控pump 挂钩到 TApplication 实现的消息循环。或 GetLastInputInfo

Answer 2

您可能希望看到这个问题的答案：How to tell when Windows is inactive [1] 它与建议的解决方案基本相同的问题是使用GetLastInputInfo [2] API 调用。

这篇文章也解释了一些方面：(The Code Project) How to check for user inactivity with and without platform invokes in C# [3]

[1]How to tell when Windows is inactive
[2]http://msdn.microsoft.com/en-us/library/ms646302%28VS.85%29.aspx
[3]http://www.codeproject.com/KB/cs/uim.aspx

Answer 3

要跟踪用户的空闲时间，您可以挂钩键盘和鼠标活动。但是请注意，安装系统范围的消息挂钩是一件非常具有侵入性的事情，应尽可能避免，因为它需要将挂钩 DLL 加载到所有进程中。

另一个解决方案是使用GetLastInputInfo API 函数（如果您的应用程序在 Win2000（及更高版本）机器上运行）。 GetLastInputInfo 检索最后一个输入事件的时间（以毫秒为单位）（当接收到最后一个检测到的用户活动时，无论是来自键盘还是鼠标）。

这是一个简单的例子。 SecondsIdle 函数返回没有用户活动的秒数（在TTimer 组件的OnTimer 事件中调用）。

~~~~~~~~~~~~~~~~~~~~~~~~~
function SecondsIdle: DWord;
var
   liInfo: TLastInputInfo;
begin
   liInfo.cbSize := SizeOf(TLastInputInfo) ;
   GetLastInputInfo(liInfo) ;
   Result := (GetTickCount - liInfo.dwTime) DIV 1000;
end;

procedure TForm1.Timer1Timer(Sender: TObject) ;
begin
   Caption := Format('System IDLE last %d seconds', [SecondsIdle]) ;
end;

http://delphi.about.com/od/adptips2004/a/bltip1104_4.htm

Answer 4

这个 SecondsIdle 根本不起作用。 方法是使用 TTimer 结合第二个变量，每次用户输入鼠标或键盘时都会重置。