EgtCAM5 :

- Migliorati Db utensili e lavorazioni.
- Corretto errore che non permetteva di scrivere le s nell'inputbox.
- Introdotta chiusura automatica degli expander nell'OptionPanel in modalità lavora.

ProjectPage/OptionPanel/MachiningOptionPanel/SimulationExpander/SimulationExpanderViewModel.vb

@@ -290,7 +290,7 @@ Namespace EgtCAM5
       Public ReadOnly Property StepCommand As ICommand
          Get
             If m_cmdStep Is Nothing Then
-               m_cmdStep = New RelayCommand(AddressOf StepCmd, AddressOf CanStep)
+               m_cmdStep = New RelayCommand(AddressOf StepCmd)
             End If
             Return m_cmdStep
          End Get
@@ -319,13 +319,6 @@ Namespace EgtCAM5
          End If
       End Sub
 
-      ''' <summary>
-      ''' Returns true if the selected treeviewitem is valid for new tool creation.
-      ''' </summary>
-      Private Function CanStep(ByVal param As Object) As Boolean
-         Return True
-      End Function
-
 #End Region ' StepCommand
 
 #Region "PlayPauseCommand"
@@ -336,7 +329,7 @@ Namespace EgtCAM5
       Public ReadOnly Property PlayPauseCommand As ICommand
          Get
             If m_cmdPlayPause Is Nothing Then
-               m_cmdPlayPause = New RelayCommand(AddressOf PlayPause, AddressOf CanPlayPause)
+               m_cmdPlayPause = New RelayCommand(AddressOf PlayPause)
             End If
             Return m_cmdPlayPause
          End Get
@@ -373,12 +366,6 @@ Namespace EgtCAM5
          End If
       End Sub
 
-      ''' <summary>
-      ''' Returns true if the selected treeviewitem is valid for new tool creation.
-      ''' </summary>
-      Private Function CanPlayPause(ByVal param As Object) As Boolean
-         Return True
-      End Function
 
 #End Region ' PlayPauseCommand
 
@@ -390,7 +377,7 @@ Namespace EgtCAM5
       Public ReadOnly Property StopCommand As ICommand
          Get
             If m_cmdStop Is Nothing Then
-               m_cmdStop = New RelayCommand(AddressOf StopCmd, AddressOf CanStop)
+               m_cmdStop = New RelayCommand(AddressOf StopCmd)
             End If
             Return m_cmdStop
          End Get
@@ -416,12 +403,6 @@ Namespace EgtCAM5
          m_nStatus = SIM_ST.ST_STOP
       End Sub
 
-      ''' <summary>
-      ''' Returns true if the selected treeviewitem is valid for new tool creation.
-      ''' </summary>
-      Private Function CanStop(ByVal param As Object) As Boolean
-         Return True
-      End Function
 
 #End Region ' StopCommand