EgtCAM5 :

- Correzzione quando viene creata una nuova lavorazione veniva rimossa la geometria una volta dato l'ok.

ProjectPage/ProjectViewModel.vb

@@ -783,7 +783,10 @@ Namespace EgtCAM5
 
       Private Sub OnMouseSelectedAll(ByVal sender As Object) Handles m_ProjectScene.OnMouseSelectedAll
          ' Se in modalità Draw seleziono tutto
-         If IniFile.m_ProjectMode = ProjectModeOpt.DRAW Then m_Controller.MouseSelectedAll()
+         If IniFile.m_ProjectMode = ProjectModeOpt.DRAW Then
+            m_Controller.MouseSelectedAll()
+            Return
+         End If
          ' Sono in modalità Machining, se la modalità di selezione è NULL non seleziono nulla ed esco
          If m_SceneSelMode = SceneSelModeOpt.NULL Then Return
          Select Case m_SceneSelType
@@ -847,10 +850,20 @@ Namespace EgtCAM5
       End Sub
 
       Private Sub OnMouseDeselectedAll(ByVal sender As Object) Handles m_ProjectScene.OnMouseDeselectedAll
+         ' Se in modalità Draw seleziono tutto
+         If IniFile.m_ProjectMode = ProjectModeOpt.DRAW Then
+            m_Controller.MouseDeselectedAll()
+            Return
+         End If
+         ' Sono in modalità Machining, se la modalità di selezione è NULL non seleziono nulla ed esco
+         If m_SceneSelMode = SceneSelModeOpt.NULL Then Return
          ' Se sono in lavorazione
-         If IniFile.m_ProjectMode = ProjectModeOpt.MACHINING AndAlso _
-            (m_SceneSelType = SceneSelTypeOpt.RAWPART OrElse m_SceneSelType = SceneSelTypeOpt.FIXTURE OrElse m_SceneSelType = SceneSelTypeOpt.RAWPARTWITHFIXTURE) Then
-            EgtResetMark(EgtGetFirstSelectedObj())
+         If IniFile.m_ProjectMode = ProjectModeOpt.MACHINING Then
+            if (m_SceneSelType = SceneSelTypeOpt.RAWPART OrElse m_SceneSelType = SceneSelTypeOpt.FIXTURE OrElse m_SceneSelType = SceneSelTypeOpt.RAWPARTWITHFIXTURE) Then
+               EgtResetMark(EgtGetFirstSelectedObj())
+            ElseIf m_SceneSelType = SceneSelTypeOpt.NULL Then
+               Return
+            End If
          End If
          ' deseleziono tutto
          m_Controller.MouseDeselectedAll()