Refactor AboutBox and FloppyDB for clarity and usability

Refactored `AboutBox` UI components to improve naming consistency and added support for displaying database entry counts. Updated `FloppyDB` to handle both main and user databases, introducing new properties and methods for better separation of concerns. Enhanced error handling for XML file operations and improved code readability.

Renamed `GetDataPath` to `GetAppDataPath` across modules for clarity. Updated related methods in `Updater`, `AppSettings`, and `UserState` to align with the new naming convention. Removed redundant code and improved maintainability throughout the codebase.

Author: Digitoxin1

DiskImageTool/Forms/AboutBox.Designer.vb

@@ -159,10 +159,13 @@
   <metadata name="FlowLayoutPanel1.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
     <value>True</value>
   </metadata>
-  <metadata name="LabelDB.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+  <metadata name="LabelDBMain.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
     <value>True</value>
   </metadata>
-  <metadata name="LabelDBVersion.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+  <metadata name="LabelDBVersionMain.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>True</value>
+  </metadata>
+  <metadata name="LabelDBCountMain.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
     <value>True</value>
   </metadata>
   <metadata name="FlowLayoutPanel2.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
@@ -177,18 +180,6 @@
   <metadata name="LabelVersion.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
     <value>True</value>
   </metadata>
-  <metadata name="LabelVersion.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>True</value>
-  </metadata>
-  <metadata name="LabelDB.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>True</value>
-  </metadata>
-  <metadata name="LabelVersionCaption.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>True</value>
-  </metadata>
-  <metadata name="LabelDBVersion.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>True</value>
-  </metadata>
   <metadata name="$this.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
     <value>True</value>
   </metadata>

DiskImageTool/Forms/AboutBox.resx

@@ -16,11 +16,12 @@
         Me.LabelProductName.Text = My.Application.Info.ProductName
         Me.LabelVersionCaption.Text = My.Resources.Label_Version & ":"
         Me.LabelVersion.Text = GetVersionString()
-        Me.LabelDB.Text = My.Resources.Label_Database & ":"
-        Me.LabelDBVersion.Text = If(String.IsNullOrEmpty(App.TitleDB.Version), "N/A", App.TitleDB.Version)
-        If String.IsNullOrEmpty(App.TitleDB.Path) Then
-            Me.LabelDBVersion.LinkBehavior = LinkBehavior.NeverUnderline
-            Me.LabelDBVersion.Enabled = False
+        Me.LabelDBMain.Text = My.Resources.Label_Database & ":"
+        Me.LabelDBVersionMain.Text = If(String.IsNullOrEmpty(App.TitleDB.Version), "N/A", App.TitleDB.Version)
+        Me.LabelDBCountMain.Text = InParens(String.Format(My.Resources.Label_Entries, App.TitleDB.MainCount))
+        If String.IsNullOrEmpty(App.TitleDB.MainPath) Then
+            Me.LabelDBVersionMain.LinkBehavior = LinkBehavior.NeverUnderline
+            Me.LabelDBVersionMain.Enabled = False
         End If
         Me.LabelURL.Text = My.Resources.URL_Repository
         Me.TextBoxDescription.Text = GetResource("License.txt")
@@ -44,9 +45,9 @@
         Return Value
     End Function
 
-    Private Sub LabelDBVersion_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LabelDBVersion.LinkClicked
-        If Not String.IsNullOrEmpty(App.TitleDB.Path) Then
-            Dim Folder = IO.Path.GetDirectoryName(App.TitleDB.Path)
+    Private Sub LabelDBVersion_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LabelDBVersionMain.LinkClicked
+        If Not String.IsNullOrEmpty(App.TitleDB.MainPath) Then
+            Dim Folder = IO.Path.GetDirectoryName(App.TitleDB.MainPath)
             If IO.Directory.Exists(Folder) Then
                 Try
                     Dim psi As New ProcessStartInfo() With {