EgtDOORCreator 2.2e1 :

-> gestione del campo "IsActive = 4" (disabilito il capitolo),
-> gestione della visualizzazione (IsActive) del capitolo in funzione del materiale.

OptionsWindow/OptionModule.vb

@@ -150,6 +150,7 @@ Friend Module OptionModule
    Friend ColorLoadByDefault As String = "Red"
    Friend ColorErrorAndMissing As String = "Red"
    Friend ColorModifyingParamRef As String = "Yellow"
+   Friend ColorDisableChapter As String = "Gray"
 
    Friend m_CompoPaneOrder As List(Of String) = New List(Of String)
 
@@ -488,7 +489,7 @@ Friend Module OptionModule
          Catch ex As Exception
          End Try
       End If
-      DefaultGetPrivateProfileString("Error", "MissingParameter", "Orange", sColor)
+      DefaultGetPrivateProfileString("Error", "MissingParameter", "Purple", sColor)
       If Not String.IsNullOrEmpty(sColor) Then
          Try
             ColorConvert = DirectCast(New BrushConverter().ConvertFrom(sColor), SolidColorBrush)
@@ -520,6 +521,14 @@ Friend Module OptionModule
          Catch ex As Exception
          End Try
       End If
+      DefaultGetPrivateProfileString("Error", "DisableChapter", "Gray", sColor)
+      If Not String.IsNullOrEmpty(sColor) Then
+         Try
+            ColorConvert = DirectCast(New BrushConverter().ConvertFrom(sColor), SolidColorBrush)
+            ColorDisableChapter = sColor
+         Catch ex As Exception
+         End Try
+      End If
       '-----------------------------------------------------------------------------------------------------------------
       ' SIZE JAMB
       Dim ThicknessHead As String = String.Empty