EgtCAM5 :

- Aggiunta deselezione di tutto quando vado in simulazione. - Quando si è definita una nuova lavorazione apre direttamente i parametri di questa.
2016-09-26 11:27:05 +00:00
parent d276f70993
commit b3b11abd6f
8 changed files with 177 additions and 30 deletions
@@ -45,6 +45,8 @@ Namespace EgtCAM5
                  Application.Msn.NotifyColleagues(Application.MACHININGTREEVIEWEXPANDERISENABLED, False)
                  ' Disabilito la selezione di curve e superfici del pezzo
                  Application.Msn.NotifyColleagues(Application.SETSCENESELMODE, SceneSelModeOpt.NULL)
+                  ' Apro i parametri della lavorazione aggiunta
+                  ParametersIsExpanded = True
               End If
               m_NewMachining = value
            End If
@@ -540,6 +542,13 @@ Namespace EgtCAM5
                                                                                       ListIsExpanded = False
                                                                                       ParametersIsExpanded = False
                                                                                       m_CurrExpandedExpander = MachiningOptionPanelExpander.SIMULATION
+                                                                                    Else
+                                                                                       ' Deseleziono e riseleziono la lavorazione corrente per fargli riselezionare la geometria
+                                                                                       ' di lavorazione che è stata deselezionata dalla simulazione
+                                                                                       Dim CurrSelectedOperation As OperationListBoxItem
+                                                                                       CurrSelectedOperation = SelectedOperation
+                                                                                       SelectedOperation = Nothing
+                                                                                       SelectedOperation = CurrSelectedOperation
                                                                                    End If
                                                                                 End Sub)
      End Sub