EgtCAM5 2.1e1 :

- aggiunto disegno superfici Swept
- corretta interfaccia lavorazioni Sgrossatura e Finitura con Lama.

OptionPanel/DrawOptionPanel/InputExpander/InputExpanderVM.vb

@@ -65,6 +65,19 @@ Public Class InputExpanderVM
       End Set
    End Property
 
+   Private m_TextVisibility As Visibility
+   Public Property TextVisibility As Visibility
+      Get
+         Return m_TextVisibility
+      End Get
+      Set(value As Visibility)
+         If value <> m_TextVisibility Then
+            m_TextVisibility = value
+            OnPropertyChanged("TextVisibility")
+         End If
+      End Set
+   End Property
+
    Private m_FocusTextBox As Boolean
    Public Property FocusTextBox As Boolean
       Get
@@ -282,8 +295,11 @@ Public Class InputExpanderVM
 
    Private Sub PrepareInputBox(PrepareInputBoxParam As PrepareInputBoxParam)
       Title = PrepareInputBoxParam.sTitle
-      TextBlock = PrepareInputBoxParam.sLabel
-      TextBox = ""
+      If PrepareInputBoxParam.sLabel <> "" Then
+         TextBlock = PrepareInputBoxParam.sLabel
+         TextBox = ""
+         TextVisibility = Visibility.Visible
+      End If
       If PrepareInputBoxParam.sCheckLabel <> "" Then
          CheckBoxText = PrepareInputBoxParam.sCheckLabel
          CheckVisibility = Visibility.Visible
@@ -302,6 +318,7 @@ Public Class InputExpanderVM
 
    Private Sub ResetInputBox()
       Title = EgtMsg(MSG_DRAWOPTION + 5)
+      TextVisibility = Visibility.Collapsed
       CheckVisibility = Visibility.Collapsed
       ComboVisibility = Visibility.Collapsed
       ShowBtnVisibility = Visibility.Collapsed