如果当前激活窗口非文件夹，关闭所有打开的文件夹
如果当前激活的为文件夹，关闭当前文件夹之外的所有文件夹
F1::
WinGetClass, Class, A
If (Class = "CabinetWClass")
{
WinGet, NoClossID, id, A
WinGet, AllID, List, ahk_class CabinetWClass
Loop % AllID
{
If (AllID%A_Index% != NoClossID)
WinClose, % "ahk_id" AllID%A_Index%
}
}
Else
{
WinGet, AllID, List, ahk_class CabinetWClass
Loop % AllID
WinClose, % "ahk_id" AllID%A_Index%
}
Return
mark