EgtCAM5 :

- aggiorna lavorazioni sdoppiato (solo tasto o shift + tasto) per aggiornamento senza o con ricalcolo - corretta gestione lato lavoro in opzioni lavorazioni.
2018-04-07 16:33:49 +00:00
parent b039961809
commit 8ecd2b68ef
3 changed files with 21 additions and 11 deletions
@@ -719,8 +719,9 @@ Namespace EgtCAM5
         Application.Current.MainWindow.ForceCursor = True
         Application.Current.MainWindow.Cursor = Cursors.Wait
         ' Eseguo ricalcolo
+         Dim bRecalc As Boolean = ((Keyboard.Modifiers And ModifierKeys.Shift) = ModifierKeys.Shift)
         Dim sErr As String = String.Empty
-         Dim bOk As Boolean = EgtApplyAllMachinings(True, False, sErr)
+         Dim bOk As Boolean = EgtApplyAllMachinings(bRecalc, False, sErr)
         EgtSetModified()
         ' Aggiorno visualizzazione e ritorno a cursore standard
         EgtDraw()