Implemented persistent auto-hide log state, cleaned up code

GBM/Forms/frmMain.vb

@@ -969,7 +969,7 @@ Public Class frmMain
             mgrPath.RemoteDatabaseLocation = oSettings.BackupFolder
             SetupSyncWatcher()
             LoadGameSettings()
-            SetAppTheme()
+            LoadInterfaceState()
         End If
         ResumeScan()
     End Sub
@@ -1567,35 +1567,8 @@ Public Class frmMain
         AddHandler mgrMonitorList.UpdateLog, AddressOf UpdateLog
         ResetGameInfo()
 
-        'Initialise theme engine
+        'Initialise and sets interface customizations
-        SetAppTheme()
+        LoadInterfaceState()
-    End Sub
-
-    Private Sub SetAppTheme()
-        oThemeEngine.SetTheme(oSettings.ThemeSelection)
-
-        'Base Theme
-        BackColor = oThemeEngine.ColorBase
-
-        'Menu/Status Bars
-        gMonMainMenu.BackColor = oThemeEngine.ColorBase
-        gMonMainMenu.ForeColor = oThemeEngine.ColorHighlightSecondary
-        gMonStatusStrip.BackColor = oThemeEngine.ColorBase
-        gMonStripTxtStatus.ForeColor = oThemeEngine.ColorHighlight
-        gMonStripStatusButton.ForeColor = oThemeEngine.ColorHighlight
-
-        'Text Labels
-        lblGameTitle.ForeColor = oThemeEngine.ColorHighlight
-        lblStatus1.ForeColor = oThemeEngine.ColorHighlight
-        lblStatus2.ForeColor = oThemeEngine.ColorHighlight
-        lblStatus3.ForeColor = oThemeEngine.ColorHighlight
-        lblTimeSpent.ForeColor = oThemeEngine.ColorHighlight
-        lblLastActionTitle.ForeColor = oThemeEngine.ColorHighlight
-        lblLastAction.ForeColor = oThemeEngine.ColorHighlight
-
-        'Output Log
-        txtLog.BackColor = oThemeEngine.ColorBaseSecondary
-        txtLog.ForeColor = oThemeEngine.ColorHighlight
     End Sub
 
     Private Function BuildChildProcesses() As Integer
@@ -1659,6 +1632,43 @@ Public Class frmMain
         End Try
     End Sub
 
+    Private Sub LoadInterfaceState()
+#Region "Auto-hide log"
+        If oSettings.AutoHideLog Then
+            Size = New Size(0, 0)
+        Else
+            Size = New Size(0, 440)
+        End If
+#End Region
+
+#Region "Set application theme"
+        oThemeEngine.SetTheme(oSettings.ThemeSelection)
+
+        'Base Theme
+        BackColor = oThemeEngine.ColorBase
+
+        'Menu/Status Bars
+        gMonMainMenu.BackColor = oThemeEngine.ColorBase
+        gMonMainMenu.ForeColor = oThemeEngine.ColorHighlightSecondary
+        gMonStatusStrip.BackColor = oThemeEngine.ColorBase
+        gMonStripTxtStatus.ForeColor = oThemeEngine.ColorHighlight
+        gMonStripStatusButton.ForeColor = oThemeEngine.ColorHighlight
+
+        'Text Labels
+        lblGameTitle.ForeColor = oThemeEngine.ColorHighlight
+        lblStatus1.ForeColor = oThemeEngine.ColorHighlight
+        lblStatus2.ForeColor = oThemeEngine.ColorHighlight
+        lblStatus3.ForeColor = oThemeEngine.ColorHighlight
+        lblTimeSpent.ForeColor = oThemeEngine.ColorHighlight
+        lblLastActionTitle.ForeColor = oThemeEngine.ColorHighlight
+        lblLastAction.ForeColor = oThemeEngine.ColorHighlight
+
+        'Output Log
+        txtLog.BackColor = oThemeEngine.ColorBaseSecondary
+        txtLog.ForeColor = oThemeEngine.ColorHighlight
+#End Region
+    End Sub
+
     'Functions that control the scanning for games
     Private Sub StartScan()
         tmScanTimer.Interval = 5000