2017-01-19 1 views
1

gui 용 TK를 사용하는 Perl 스크립트가 있습니다. 화면에 "ACTIVE WINDOW"가있는 경우 활성 시간 동안 호출하면 알 수 있습니다.Linux Perl TK : 내 스크립트 창이 활성 창인지 여부를 확인하는 방법?

더 이상 "ACTIVE WINDOW"가 화면에 나타나지 않으면 자살 (퇴장 또는 사망)하고 싶습니다.

예 1 : 정상적으로 실행되었으므로 아무 것도 실행되지 않습니다. 예 2 : 활성화되어있는 동안 다른 gui 응용 프로그램을 클릭 했으므로 현재 스크립트가 내 화면의 ACTIVE WINDOW가 아니므로 자살하고 자체를 종료해야합니다.

+0

왜 이것이 너무 광범위합니까? 특정한 경우에 특정 질문을하고 있습니다. –

+0

위에 나열된 사람들이 귀하의 질문을 이해하지 못하기 때문에 답변을 작성할 수 없습니다. 작동 할 수있는 한 가지 방법은'bind '을하는 것입니다. exit'. 커서가 기본 창을 떠나면 응용 프로그램이 종료됩니다. 기본 창에 포커스가 있고 마우스 커서가 시작시 주 창에있는 경우이 방법이 유용합니다. –

+0

@BradLanam 가능한 경우 HOLD를 제거 할 수 있습니까? 그래서 나는 내 자신의 질문에 대답 할 수있다. –

답변

2

GUITest 패키지의 GetInputFocus 메서드는 마녀 창에 키보드 포커스가 있음을 알려줍니다.

관련 문제