Imports System.Collections.ObjectModel
Imports System.IO
Imports EgtUILib
Imports EgtWPFLib5

Public Class MachGroupPanelVM
   Inherits EgtWPFLib5.EgtMachGroupPanelVM

#Region "CONSTRUCTOR"

   Sub New()
      MyBase.New()
      ' Creo riferimento a questa classe in OmagOFFICEMap
      OmagOFFICEMap.SetRefMachGroupPanelVM(Me)
      InitMachGroups(True, OmagOFFICEMap.refMachinePanelVM.MachineList.ToList())
   End Sub

#End Region    ' CONSTRUCTOR

#Region "METHODS"

   Public Overrides Function OnPostNewMachGroup() As Boolean
      ' !!! GESTIRE MACCHINE CON DUE TAVOLE !!!
      EgtSetTable("MainTab")
      Return True
   End Function

   Public Overrides Function OnPostSetCurrMachGroup() As Boolean
      ' Imposto vista solo tavola
      EgtSetMachineLook(MCH_LOOK.TAB)
      ' Imposto tab Disposizione
      OmagOFFICEMap.refOptionPanelVM.SelItem = OptionPanelVM.Tabs.NESTING
      Return True
   End Function

#End Region    ' METHODS

End Class