working on setting dialogs

Author: amorphobia

RabbitDeployer.ahk

@@ -54,6 +54,9 @@ RunDeployer(args) {
         case "sync":
             res := conf.SyncUserData()
             opt := RABBIT_PARTIAL_MAINTENANCE
+        case "test":
+            res := conf.Test()
+            return res
         default:
             res := conf.Run(command = "install")
             opt := RABBIT_PARTIAL_MAINTENANCE ; TODO: check if need maintenance
@@ -79,10 +82,22 @@ CreateFileIfNotExist(filename) {
         FileAppend("", filepath)
 }
 
-ConfigureSwitcher(levers, switcher_settings, reconfigured) {
+ConfigureSwitcher(levers, switcher_settings, &reconfigured) {
     if not levers.load_settings(switcher_settings)
         return false
-    ; 
+    ; To mimic a dialog
+    result := {
+        yes : false
+    }
+    dialog := SwitcherSettingsDialog(switcher_settings, result)
+    dialog.Show()
+    WinWaitClose(dialog)
+    
+    if result.yes {
+        ; save settings
+        return true
+    }
+    return false
 }
 
 class Configurator extends Class {
@@ -105,12 +120,30 @@ class Configurator extends Class {
         switcher_settings := levers.switcher_settings_init()
         skip_switcher_settings := installing && !levers.is_first_run(switcher_settings)
 
+        ; (skip_switcher_settings || ConfigureSwitcher(levers, switcher_settings, &reconfigured) &&
+        ;     (skip_ui_style_settings || ConfigureUI(levers, &ui_style_settings, &reconfigured)))
+
         if installing
             this.UpdateWorkspace()
 
         return 0
     }
 
+    Test() {
+        levers := RimeLeversApi()
+        if !levers
+            return 1
+
+        switcher_settings := levers.switcher_settings_init()
+        skip_switcher_settings := !levers.is_first_run(switcher_settings)
+
+        if !skip_switcher_settings {
+            ConfigureSwitcher(levers, switcher_settings, &reconfigured)
+        }
+
+        return 0
+    }
+
     UpdateWorkspace(report_errors := false) {
         mutex := RabbitMutex()
         if not mutex.Create() {
@@ -150,3 +183,32 @@ class Configurator extends Class {
         return 0
     }
 }
+
+class SwitcherSettingsDialog extends Gui {
+    __New(settings, result) {
+        super.__New(, "【玉兔毫】方案选单设定", this)
+        this.settings := settings
+        this.loaded := false
+        this.modified := false
+        this.api := RimeLeversApi()
+
+        this.result := result
+
+        ; Layout
+        this.AddText("", "请勾选所需的输入方案：")
+        this.lv := this.AddListView("Section Checked", ["方案名称"])
+        {
+            this.lv.Add(, "星空键道")
+        }
+        this.introduction := this.AddText("YP", "选中列表中的输入方案以查看简介")
+        this.AddText("XS", "在玉兔毫里，以下快捷键可唤出方案选单，以切换模式或选用其他输入方案。")
+        this.AddEdit("-Multi ReadOnly r1 w480", "Control+quoteright, Control+Shift+space")
+        this.ok := this.AddButton(, "确定")
+        this.ok.OnEvent("Click", (*) => this.exit(true))
+    }
+
+    exit(yes) {
+        this.result.yes := yes
+        this.Destroy()
+    }
+}