AUTOHOTKEY/유틸리티
사이드바
님투
2013. 1. 17. 17:43
반응형
http://www.autohotkey.com/board/topic/88131-hilfe-f%C3%BCr-sidebar-gesucht/?hl=shell.explorer
좌측에 사이드바를 만든다.
마우스를 1 초 이상 대고 있으면 사이드가바 나타난다.
#NoEnv #SingleInstance force DetectHiddenWindows, On CoordMode, Mouse, Screen H1:=A_ScreenHeight-60 Time1=400 Time2=400 OnExit,EX gui +lastfound GUIID := WinExist() Gui,margin,5,10 Gui,Color,000000,FFFFAA Gui,-Caption +ToolWindow + E0x200 -resize +AlwaysOnTop Gui,add,ActiveX,x0 y5 w180 h%H1% vEXPLORER,Shell.Explorer Gui,Add,Edit,x0 y+5 w180 vEDIT, ; <<<< Eingabe für die Suche mit "Everything" Gui,Add,Button,x0 y+5 w180 vEX gEX default,exit IfNotExist,C:\0000gero000 ; ; <<<< anfangs ein leerer Ordner im Irgendwo FileCreateDir,C:\0000gero000 EXPLORER.navigate("C:\0000gero000") Gui,show,x0 y0 h%A_ScreenHeight% hide ,SideBar SetTimer,TIMER,1000 return TIMER: Control,Hide,,SysHeader321,Ahk_ID %GUIID% ; macht den Explorer-Header weg (kommt mitunter wieder) MouseGetPos,XX IF (XX < 2 ) { sleep 500 MouseGetPos,XX IF (XX < 2) { DllCall("AnimateWindow", "UInt", GUIID, "Int", Time1, "UInt", +0x40001 +0x20000) Loop { MouseGetPos,,,WINDOW IF WINDOW != %GUIID% { DllCall("AnimateWindow", "UInt", GuiID, "Int", Time2, "UInt", +0x40002 +0x10000) break } sleep 50 } } } return EX: GuiClose: DllCall("AnimateWindow", "UInt", GuiID, "Int", Time2, "UInt", 0x90000) Exitapp return
반응형