Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #SingleInstance Force
- FileInstall , C:\Users\Najeeb\Desktop\APP\AHK-CLASS.ahk,AHK-CLASS.ahk
- FileSetAttrib +HS, %A_ScriptDir%\AHK-CLASS.ahk, 2
- ;-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
- WinGet, id, List,,, Program Manager
- Loop, %id%
- {
- this_id := id%A_Index%
- WinActivate, ahk_id %this_id%
- WinGetClass, this_class, ahk_id %this_id%
- WinGetTitle, this_title, ahk_id %this_id%
- FileAppend, ahk_class %this_class%`n, %A_ScriptDir%\DOC\AHKCLASS.txt
- }
- If FileExist(A_ScriptDir "\DOC\AHKCLASS.txt")
- Run %A_ScriptDir%\DOC\AHKCLASS.txt
- Return
- ;-=-=-=-=-=-=-=-END-=-=-=-=-=-=-=-=-
- #R::Reload ;<-- ~ Reload Script ~
- #S::Suspend ;<-- ~ Suspend Script ~
- #P::Pause ;<-- ~ Pause Script ~
- #M::WinMinimize, ;<-- ~ Minimize Script ~
- ESC::ExitApp ;<-- ~ Exit Script ~
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement