Public Class BottomPanelVM
   Inherits VMBase

   Friend Enum PartFeatureTab As Integer
      STRUCTURE_ = 0
      PART = 1
      FEATURE = 2
   End Enum

   Private m_SelPartFeatureTab As PartFeatureTab
   Public Property SelPartFeatureTab As Integer
      Get
         Return m_SelPartFeatureTab
      End Get
      Set(value As Integer)
         m_SelPartFeatureTab = value
      End Set
   End Property
   Friend Sub SetSelPartFeatureTab(SelPartFeatureTab As PartFeatureTab)
      m_SelPartFeatureTab = SelPartFeatureTab
      NotifyPropertyChanged("SelPartFeatureTab")
   End Sub

   Private m_sCurrDraw As String
   Public ReadOnly Property sCurrDraw As String
      Get
         Return m_sCurrDraw
      End Get
   End Property
   Friend Sub SetCurrDraw(sCurrDraw As String)
      m_sCurrDraw = sCurrDraw
      NotifyPropertyChanged(NameOf(sCurrDraw))
   End Sub

#Region "CONSTRUCTOR"

   Sub New()
      ' Creo riferimento a questa classe in EgtCAM5Map
      Map.SetRefBottomPanelVM(Me)
   End Sub

#End Region    ' CONSTRUCTOR

End Class