autostartup; ensure folder unique

Libs/FileManager.ahk

@@ -8,6 +8,7 @@ GetAllFolder() {
     DetectHiddenWindows DetectHiddenWindowsStateOld
 
     ; parse foler
+    folderMap := Map() ; ensure folder unique
     for winId in windows {
         winCls := WinGetClass("ahk_id " winId)
         fileManager := ""
@@ -20,7 +21,12 @@ GetAllFolder() {
 
         folders := fileManager.GetCurrentFolder(winId, true)
         if (folders and folders.Length) {
-            allFolders.Push(folders*)
+            for folder in folders {
+                if (!folderMap.Has(folder)) {
+                    allFolders.Push(folder)
+                    folderMap.Set(folder, true)
+                }
+            }
         }
     }
     return allFolders

Libs/Settings.ahk

@@ -0,0 +1,19 @@
+; global config
+#Include Config.ahk
+
+; A_TrayMenu
+SettingMenu := A_TrayMenu
+SettingMenu.Insert("1&", "&AutoStartup Switch", onAutoStartupSwitch, "Radio")
+SettingMenu.Add()
+
+onAutoStartupSwitch(*) {
+  isAutoStartup := !CFG.GetConfig("AutoStartup", "Global")
+  CFG.UpdateConfig("AutoStartup", isAutoStartup, "Global")
+  autoStartupLnk := A_Startup "\QuickSwitch.lnk"
+  if (isAutoStartup and !FileExist(autoStartupLnk)) {
+    FileCreateShortcut(A_ScriptFullPath, autoStartupLnk, A_WorkingDir)
+  } else if (!isAutoStartup and FileExist(autoStartupLnk)) {
+    FileDelete(autoStartupLnk)
+  }
+  MsgBox(isAutoStartup ? "开机自动启动已允许" : "开机自动启动已禁止")
+}

QuickSwitch.ahk

@@ -14,6 +14,7 @@ KeyHistory 0 ; disable key history
 #Include Libs\Config.ahk
 #Include Libs\FileDialog.ahk
 #Include Libs\FolderSelector.ahk
+#Include Libs\Settings.ahk
 
 ;_____________________________________________________________________________
 ;

README.md

@@ -8,6 +8,7 @@ Modified based on [gepruts/QuickSwitch](https://github.com/gepruts/QuickSwitch):
 
 1. Get path of active or all explorer tab
 2. Fix menu close by escape/click-outside
+3. Auto startup(TrayMenu)
 
 ### What does QuickSwitch do?