- Introdotto calcolo separato dei solidi

- Spostati file CurrMachining
- Introdotto slider custom
- Introdotti flag di modifica separati per slice ed operazioni successive
- Gestito calcolo  dei solidi separato dal resto
- Gestito bottone from import su reference
- Aggiornato logo
- Migliorata gestione dell'interazione con la scena nelle modifiche grafiche( rib, start mach, ...)
- Introdotta gestione grid da oggetto
- Gestiti percorsi chiusi e con cap end in ShellNumber

Icarus/ShellNumberParamPanel/ShellNumberParamPanelVM.vb

@@ -62,9 +62,16 @@ Public Class ShellNumberParamPanelVM
    End Sub
 
    Friend Sub WriteParamsInShellNumber(nRibId As Integer)
+      ' se parametri modificati
+      Dim bModified As Boolean = False
       For Each Param As ShellNumberNumericMachiningParam In m_MachiningParamList
+         If Param.bIsModified AndAlso Not bModified Then bModified = True
          Param.WriteParamInShellNumber(nRibId)
       Next
+      If bModified Then
+         ' Imposto flag di ricalcolo slice
+         EgtSetInfo(Map.refTopPanelVM.SelPart.nPartId, MAC_TORECALC_SLICE, True)
+      End If
    End Sub
 
 #End Region    ' METHODS
@@ -126,7 +133,7 @@ End Class
 Public Class ShellNumberNumericMachiningParam
    Inherits NumericMachiningParam
 
-   Public Overrides Property dValue As String
+   Public Overrides Property sValue As String
       Get
          Return If(m_bIsLen, LenToString(m_dValue, 1), m_dValue)
       End Get
@@ -136,7 +143,7 @@ Public Class ShellNumberNumericMachiningParam
          Else
             m_dValue = value
          End If
-         NotifyPropertyChanged(NameOf(dValue))
+         NotifyPropertyChanged(NameOf(sValue))
          NotifyPropertyChanged(NameOf(bIsModifiedFromPart))
       End Set
    End Property
@@ -181,6 +188,7 @@ Public Class ShellNumberNumericMachiningParam
       m_dOrigValue = m_dValue
       If Not bReadFromPart Then
          m_dValue = m_dPartValue
+         m_dOrigValue = m_dPartValue
       End If
    End Sub
 
@@ -242,7 +250,7 @@ Public Class ShellNumberNumericMachiningParam
 
    Public Sub ResetParamCmd()
       m_dValue = m_dPartValue
-      NotifyPropertyChanged(NameOf(dValue))
+      NotifyPropertyChanged(NameOf(sValue))
       NotifyPropertyChanged(NameOf(bIsModifiedFromPart))
    End Sub