메신저 등을 사용할 때 한동안 입력이 없으면 "자리비움" 표시를 합니다.
이럴때 사용할 수 있는 방법은 마우스, 키보드 후킹을 해도 되지만
더 간단한 방법이 있군요.

타이머 이벤트 또는 Application의 OnIdle 이벤트에 넣어서 사용하면 되겠습니다.

출처 : http://newsgroups.cryer.info/borland/public.delphi.nativeapi.win32/200608/0608175619.html

function SecondsIdle: Cardinal;
var 
  liInfo: TLastInputInfo;
begin
  liInfo.cbSize := SizeOf(TLastInputInfo);
  GetLastInputInfo(liInfo);

  Result := (GetTickCount - liInfo.dwTime) div 1000;
end;