deprecate My.Settings

Global_Indexer/frmConfig_Basic.vb

@@ -123,9 +123,9 @@ Public Class frmConfig_Basic
         Cursor = Cursors.Default
     End Sub
 
-    <STAThread()>
     Private Sub frmConfig_Basic_Load(sender As Object, e As EventArgs) Handles MyBase.Load
-
+        CheckBoxIndexResult.Checked = CONFIG.Config.ShowIndexResult
+        CheckBoxPreviewDocs.Checked = CONFIG.Config.FilePreview
     End Sub
 
     Dim reload As Boolean = False
@@ -407,9 +407,9 @@ Public Class frmConfig_Basic
         Process.Start(Application.UserAppDataPath())
     End Sub
 
-    Private Sub CheckBox2_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBox2.CheckedChanged
-
-        My.Settings.Save()
+    Private Sub CheckBox2_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBoxIndexResult.CheckedChanged
+        CONFIG.Config.ShowIndexResult = CheckBoxIndexResult.Checked
+        CONFIG.Save()
     End Sub
 
     Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click