delphi 마우스 입력감지하기

안녕하세요 메르세데스입니다.

사이트에 보면 이런 경우가 있죠..    은행을 보면..일정시간동안 사용을 안하면 사이트가 자동 로그아웃이 됩니다.

이런 기능이 별것 아닌 것 같지만.. 구현하려면 생각보다 쉽지 않습니다. delphi의 타이머를 이용해서 mousemove이벤트를 이용해서 처리하면 될 것 같은데 말이죠...

움직임 감지를 위해 화면상에 보이는 패널이며 그리드며.. 모든부분에 감지이벤트를 넣자니 귀찮고.. 또한 main-form에 적용해도 잘 안됩니다. 상속을 받아 처리를 해야하는지..  (제가 내공이 딸려서)

찾이보니..생각보다 간단한 방법이 있어서 적용해 보았습니다.

http://hackhyun.tistory.com/237 (의 글을 참조를 하였습니다. 도움을 주셔서 감사합니다)

위와 같은 함수를 원하는 폼에 만들어 넣은 후 .. Timer를 이용하여 처리하면 됩니다.

초 단위 결과값을 리턴하기 때문에 원하는 숫자를 설정값으로 지정하시면 되겠습니다. 그리고 원하는 코딩을 하면 됩니다.

저는 간단하게 프로그램 종료하는걸 걸어놨습니다.

또한 마우스움직임 뿐만아니라 키보드 타이핑도 감지하게 되니 유용하게 사용할 수 있습니다.