-rimossa variabile bOnlyProd

2025-09-22 14:28:45 +02:00
parent 189a632d94
commit 888aa76c36
16 changed files with 69 additions and 113 deletions
@@ -2279,16 +2279,9 @@ Public Class BTLPartVM
      '   .FullOpen = True,
      '   .Color = Col.ToColor()
      '}
-      Dim ColorDlg As Object
-      If bOnlyProd Then
-         ColorDlg = New OnlyProdEgtColorPickerV(Application.Current.MainWindow, New EgtColorPickerVM()) With {
-            .Color = Col.ToColor()
-         }
-      Else
-         ColorDlg = New EgtColorPickerV(Application.Current.MainWindow, New EgtColorPickerVM()) With {
-            .Color = Col.ToColor()
-         }
-      End If
+      Dim ColorDlg As New OnlyProdEgtColorPickerV(Application.Current.MainWindow, New EgtColorPickerVM()) With {
+         .Color = Col.ToColor()
+      }
      ' Visualizzo dialogo
      If ColorDlg.ShowDialog() <> Forms.DialogResult.OK Then Return False
      ' Recupero colore scelto