강좌 / 팁

소프트웨어 StrokesPlus 창닫기/탭닫기 조정 스크립트(수정본)

2013.11.19 15:26

유리얼음 조회:4280 추천:3

글로벌 액션하고, 익스용 액션하고 분리해서..

인터넷옵션창이나, 팝업창, 추가관리기능창 등등 새끼 창들도 제스처 하나로

닫을수 있게 수정해보았습니다..

아래 게시글에서는 되는줄 아랐는데 안되서-0-;;;;;

팟플레이어 같은 경우도 옵션창이나, 열기창, 다른 응용프로그램들의 열기창, 저장창 설정창 등도

제스처 하나로 작동합니다.. 역시 마우스 제스처가 시작되는 곳 바로 아래 있는 프로그램에 작동합니다..

====================================================================================================

아래는 글로벌 액션에 등록

--------------------------

local iHandle= acGetParentWindowByPoint(gsx, gsy)
local iTorrent = acGetExecutableName(iHandle, nil, nil)
acActivateWindow(iHandle, nil, nil, 0)
acSendKeys("%{F_4}")
acDelay(200)
if acGetClassName(acGetForegroundWindow(), nil, nil) == "Shell_TrayWnd" or iTorrent == "utorrent.exe" then
  acSendKeys("%{ESC}")
end

============================================================================================================

아래는 IE용 액션에 등록

--------------------------

local iHandle= acGetParentWindowByPoint(gsx, gsy)
acActivateWindow(iHandle, nil, nil, 0)
if acGetClassName(iHandle, nil, nil) ~= "IEFrame" then
 acSendKeys("%{F_4}")
else
 acSendKeys("^{F_4}")
end
if acGetClassName(acGetForegroundWindow(), nil, nil) == "Shell_TrayWnd" then
 acSendKeys("%{ESC}")
end                                                                 
================================================================================================================


여튼 저렇게 등록하면 하나의 제스처로 (저는 ↓이거 하나로 모든 창을 닫음)

거의 모든창을 닫을수 있습니다....


아래는 제가 쓰는 스크립트(참고용)...

해상도 기준, 프라세스로 종료할 프로그램, 익스에서 탭하나 남을때 alt+f4로 종료하기가 추가되어 있습니다..

=========================================================================================================

글로벌용

-----------------

local iHandle= acGetParentWindowByPoint(gsx, gsy)
acActivateWindow(iHandle, nil, nil, 0)
if acGetClassName(iHandle, nil, nil) == "QWidget" then                                       
 acTerminateProcess(iHandle, nil, nil)
else
 local iTorrent = acGetExecutableName(iHandle, nil, nil) --토렌트 종료전에 등록해놔야
 acSendKeys("%{F_4}")
 acDelay(200)
 if acGetClassName(acGetForegroundWindow(), nil, nil) == "Shell_TrayWnd" or iTorrent == "utorrent.exe" then
  acSendKeys("%{ESC}")
 end
end

===========================================================================================================

익스용

---------------------

local iHandle= acGetParentWindowByPoint(gsx, gsy)
acActivateWindow(iHandle, nil, nil, 0)
if acGetClassName(iHandle, nil, nil) ~= "IEFrame" then
 acSendKeys("%{F_4}")
elseif acGetWindowBottom(acFindWindow("Shell_TrayWnd"), nil, nil) == 900 then
  if acGetPixelBByPoint(1020, 28) == 251 then  
   acSendKeys("%{F_4}")
  else
   acSendKeys("^{F_4}")
  end                                                                    
elseif acGetPixelBByPoint(860, 28) == 251 then
   acSendKeys("%{F_4}")
  else                                                                      
   acSendKeys("^{F_4}")
end

=========================================================================================================

번호 제목 글쓴이 조회 추천 등록일
[공지] 강좌 작성간 참고해주세요 gooddew - - -
2312 소프트웨어| VMware 설치 후 전면 USB 인식(스마트폰)이 이상할때 [2] 그뉴비 4271 0 11-05
2311 윈 도 우| 베가에서도 윈8.1 공식 지원하는거 같네요. [1] 태연매냐 5556 0 11-06
2310 기 타| 그 동안 본인이 업로드한 강좌를 보내드립니다. [181] 고양이2 12722 45 11-06
2309 윈 도 우| 윈도우 8.1에서 ati hd 4000 이하 VGA 드라이버 설치법 [8] sous_la_pl 9083 0 11-06
2308 윈 도 우| PE ADK 8.1 제작 [1] tanny tale 5817 0 11-07
2307 소프트웨어| (2013.11.09) 수정본 다시 보내드렸습니다 [112] 고양이2 9929 27 11-08
2306 윈 도 우| windows 8에서 8.1로 업데이트 엡 찾기 [5] 누구예요 6849 2 11-08
2305 윈 도 우| 윈도우 7 . IE11 설치 한뒤. [9] 억무리 18650 7 11-09
2304 서버 / IT| Chrome의 Zenmate 로 우회 접속 하기 [18] DOS 11333 2 11-10
2303 소프트웨어| 백신 Trust Port 6개월 프로모션, Webroot 6개월 프로모션 ... [5] sous_la_pl 4898 3 11-11
2302 기 타| 유튜브에서 HTML5모드 사용 시 IE 볼륨믹서가 초기화 되는 ... [1] 고고추 4673 2 11-13
2301 기 타| 숨은파일 [7] 공습 7137 2 11-13
2300 기 타| 그림 파일에 압축파일 감추기 [6] 늦깍기 6593 5 11-14
2299 윈 도 우| 신형 REFS 파일시스템으로 보조 및 외장 HDD/SSD 포맷하기 [4] 메트로작전 8133 3 11-14
2298 소프트웨어| VMware workstation 사용법(본문 수정-2) [76] 고양이2 14940 30 11-14
2297 소프트웨어| 한컴오피스 2014 업데이트 설정하는 법 [7] 유기농초코 11533 2 11-17
2296 기 타| 빈 vhd에 이미지 설치와 부팅시키기 [7] 카멜 6029 4 11-19
2295 소프트웨어| StrokesPlus 창닫기/탭닫기 조정 스크립트 [2] 유리얼음 5030 2 11-19
2294 윈 도 우| Win 8.1 인터넷 익스플로러 11의 유투브 호환성 문제 해결법 [4] 일교차 8690 1 11-19
» 소프트웨어| StrokesPlus 창닫기/탭닫기 조정 스크립트(수정본) [2] 유리얼음 4280 3 11-19
XE1.11.6 Layout1.4.8