TVSettings Bugfix

Aviso/frmTvSettings.vb

@@ -43,6 +43,7 @@ Partial Class frmTvSettings
                     ' Wenn nicht, setze auf den ersten Eintrag
                     cmbLogoSelection.SelectedIndex = 0
                 End If
+
             Else
                 ' Standardwerte verwenden, falls keine Einstellungen vorhanden sind
                 SetDefaultValues()
@@ -70,11 +71,9 @@ Partial Class frmTvSettings
 
     ' Methode zur Initialisierung der ComboBox
     Private Sub InitializeComboBox()
-        ' Legen Sie die DisplayMember und ValueMember fest
         cmbLogoSelection.DisplayMember = "Display"
         cmbLogoSelection.ValueMember = "Value"
 
-        ' Erstellen Sie eine Liste von ComboBoxItem-Objekten
         Dim logoItems As New List(Of ComboBoxItem) From {
             New ComboBoxItem("VERAG AG", "verag.png"),
             New ComboBoxItem("ATILLA", "atilla.png"),
@@ -84,10 +83,9 @@ Partial Class frmTvSettings
             New ComboBoxItem("UNISPED", "unisped.jpg")
         }
 
-        ' Binden Sie die Liste als DataSource
         cmbLogoSelection.DataSource = logoItems
 
-        ' Optional: Setzen Sie die Standardauswahl
+
         If logoItems.Count > 0 Then
             cmbLogoSelection.SelectedIndex = 0
         End If
@@ -109,12 +107,14 @@ Partial Class frmTvSettings
         If cmbLogoSelection.Items.Count > 0 Then
             cmbLogoSelection.SelectedIndex = 0
         End If
+
+        ' Reload-Checkbox auf nicht aktiviert setzen
+        chkReload.Checked = False
     End Sub
 
     ' Ereignis-Handler für den Speichern-Button
     Private Sub btnSave_Click(sender As Object, e As EventArgs) Handles btnSave.Click
         Try
-            ' Holen Sie sich das ausgewählte ComboBoxItem
             Dim selectedItem As ComboBoxItem = CType(cmbLogoSelection.SelectedItem, ComboBoxItem)
             Dim selectedValue As String = If(selectedItem IsNot Nothing, selectedItem.Value, String.Empty)
 
@@ -129,7 +129,8 @@ Partial Class frmTvSettings
                 .KachelRowGapInPercent = CDbl(numKachelRowGapInPercent.Value),
                 .TextFlaggeBottom = CDbl(numTextFlaggeBottom.Value),
                 .TextFlaggeLeft = CDbl(numTextFLaggeLeft.Value),
-                .SelectedLogoValue = selectedValue
+                .SelectedLogoValue = selectedValue,
+                .Reload = If(chkReload.Checked, 1, 0) ' Setzen der Reload-Spalte
             }
 
             ' Einstellungen in der Datenbank speichern