OmagCUT :

- modifiche per gestione ghigliottina con nesting automatico (viene associata a flag Tagli allineati).

Machine/AlarmsPageUC.xaml.vb

@@ -294,9 +294,6 @@ Public Class AlarmsPageUC
       ' Leggo sicurezza su tagli in angoli interni
       dVal = GetPrivateProfileDouble(S_MACH_NEST, K_MACH_SAFE_LEN_INTCORNER, 0, m_MainWindow.GetMachIniFile())
       AngleCutExtraLenTxBx.Text = LenToString(dVal, 2)
-      ' Leggo tagli ridotti per interferenza in nesting
-      CompleteCutsChBx.IsChecked =
-             (GetPrivateProfileInt(S_MACH_NEST, K_MACH_REDUCEDCUT, 0, m_MainWindow.GetMachIniFile()) = 0)
       ' Leggo distanza di sicurezza
       dVal = 0
       EgtMdbGetGeneralParam(MCH_GP.SAFEZ, dVal)
@@ -324,12 +321,16 @@ Public Class AlarmsPageUC
       ShortTxBx.Text = LenToString(dVal, 2)
       ' Flag per movimento in home alla fine dei tagli diretti
       FinalHomeChBx.IsChecked = m_MainWindow.m_CurrentMachine.bDirectCutsFinalHome
+      ' Leggo tagli ridotti per interferenza in nesting
+      CompleteCutsChBx.IsChecked =
+             (GetPrivateProfileInt(S_MACH_NEST, K_MACH_REDUCEDCUT, 0, m_MainWindow.GetMachIniFile()) = 0)
       ' Flag per nesting allineato
       AlignChBx.IsChecked =
              (GetPrivateProfileInt(S_MACH_NEST, K_MACH_NEST_ALIGNED, 0, m_MainWindow.GetMachIniFile()) <> 0)
       ' Flag per nesting automatico
       AutomaticChBx.IsChecked =
              (GetPrivateProfileInt(S_MACH_NEST, K_MACH_NEST_AUTOMATIC, 0, m_MainWindow.GetMachIniFile()) <> 0)
+      AdjustAlignTextOnAutomaticOrCompleteCuts()
       ' Aggiorno messaggio sovratavola con numero tavola
       If GetTableCount() > 1 Then
          AdditionalTableTxBl.Text = EgtMsg(MSG_ALARMSPAGEUC + 36) & " " & GetCurrentTable().ToString()
@@ -628,6 +629,7 @@ Public Class AlarmsPageUC
       Else
          WritePrivateProfileString(S_MACH_NEST, K_MACH_REDUCEDCUT, "1", m_MainWindow.GetMachIniFile())
       End If
+      AdjustAlignTextOnAutomaticOrCompleteCuts()
    End Sub
 
    Private Sub CornerCutsChBx_Click(sender As Object, e As RoutedEventArgs) Handles CornerCutsChBx.Click
@@ -682,6 +684,15 @@ Public Class AlarmsPageUC
       Else
          WritePrivateProfileString(S_MACH_NEST, K_MACH_NEST_AUTOMATIC, "0", m_MainWindow.GetMachIniFile())
       End If
+      AdjustAlignTextOnAutomaticOrCompleteCuts()
+   End Sub
+
+   Private Sub AdjustAlignTextOnAutomaticOrCompleteCuts()
+      If AutomaticChBx.IsChecked() And Not CompleteCutsChBx.IsChecked() Then
+         AlignTxBl.Text = EgtMsg( 91060)         ' Allineato e Ghigliottina
+      Else
+         AlignTxBl.Text = EgtMsg( 90932)         ' Allineato
+      End If
    End Sub
 
    Private Sub AdditionalTableTxBx_EgtClosed(sender As Object, e As EventArgs) Handles AdditionalTableTxBx.EgtClosed