Aggiunta configurazione TableUp/Down per AreaCut

DirectCuts/ControlsMachineButtonUC.xaml.vb

@@ -342,6 +342,37 @@ Public Class ControlsMachineButtonUC
       End If
    End Sub
 
+   Friend Sub ZoneStateChanged(ZoneState As Integer)
+      'Dim sFlag As String = String.Empty
+      'If ZoneState = 1 Then
+      '   sFlag = BTN_ENABLE_ZONE_1
+      'ElseIf ZoneState = 2 Then
+      '   sFlag = BTN_ENABLE_ZONE_2
+      'End If
+      'Dim EnableZoneButton As TwoStateButton = Nothing
+      'For Each MachineButton As MachineButton In m_ButtonList
+      '   If MachineButton.StateFlag = K_ENABLEZONE Then
+      '      EnableZoneButton = MachineButton
+      '   End If
+      'Next
+      'If Not IsNothing(EnableZoneButton) Then
+      '   EnableZoneButton.SetIsChecked(EnableZone)
+      'End If
+   End Sub
+
+   Friend Sub PcStateChanged(EnablePC As Boolean)
+      'Dim EnablePCButton As TwoStateButton = Nothing
+      'For Each MachineButton As MachineButton In m_ButtonList
+      '   If MachineButton.StateFlag = K_ENABLEPC Then
+      '      EnablePCButton = MachineButton
+      '   End If
+      'Next
+      'If Not IsNothing(EnablePCButton) Then
+      '   EnablePCButton.SetIsChecked(EnablePC)
+      'End If
+   End Sub
+
+
    Public Function GetPrivateProfileMachineButtons(
                          ByVal lpAppName As String,
                          ByVal lpKeyName As String,
@@ -414,6 +445,8 @@ Public MustInherit Class MachineButton
    Friend Const BTN_STATE_THREEAXIS As String = "ThreeAxis"
    Friend Const BTN_STATE_FIVEAXIS As String = "FiveAxis"
    Friend Const BTN_STATE_NOTHING As String = "Nothing"
+   Friend Const BTN_ENABLE_ZONE_1 As String = "EnableZone1"
+   Friend Const BTN_ENABLE_ZONE_2 As String = "EnableZone2"
 
    ' Dichiarazione delle Page UserControl
    Friend Shared m_MainWindow As MainWindow = DirectCast(Application.Current.MainWindow, MainWindow)