Imports EgtCAM5.MachiningParameterExpanderVM
Imports EgtUILib

Public Class MachiningParameterExpanderV

   Private m_nToolLook As Integer

   Sub New()

      ' La chiamata è richiesta dalla finestra di progettazione.
      InitializeComponent()

      ' Aggiungere le eventuali istruzioni di inizializzazione dopo la chiamata a InitializeComponent().

      ' Associo il gestore evento m_EventFocusOnSlider all'evento generato da FocusOnSlider
      AddHandler Map.refMachiningParameterExpanderVM.m_EventFocusOnSlider, AddressOf FocusOnSlider
   End Sub

   ''' <summary>
   ''' Funzione che mette il focus allo slider
   ''' </summary>
   Friend Sub FocusOnSlider()
      Me.SliderV.Focus()
   End Sub

End Class