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

Public Class CompoType
   Inherits VMBase

   Public Brand As New ObservableCollection(Of CompoBrandDir)

   Private m_IsSelectedBtn As Boolean = False
   Public Property IsSelectedBtn As Boolean
      Get
         Return m_IsSelectedBtn
      End Get
      Set(value As Boolean)
         m_IsSelectedBtn = value
         NotifyPropertyChanged("IsSelectedBtn")
      End Set
   End Property

   Private m_Name As String
   Public ReadOnly Property Name As String
      Get
         Return m_Name
      End Get
   End Property
   Public Sub SetName(Name As String)
      m_Name = Name
   End Sub

   Private m_DDFName As String
   Public ReadOnly Property DDFName As String
      Get
         Return m_DDFName
      End Get
   End Property
   Public Sub SetDDFName(DDFName As String)
      m_DDFName = DDFName
   End Sub

   Private m_Path As String
   Public ReadOnly Property Path As String
      Get
         Return m_Path
      End Get
   End Property
   Public Sub SetPath(Path As String)
      m_Path = Path
   End Sub

   Private m_JambSide As String
   Public ReadOnly Property JambSide As String
      Get
         Return m_JambSide
      End Get
   End Property
   Public Sub SetJambSide(JambSide As String)
      m_JambSide = JambSide
   End Sub

   ' lista dei marchi
   Private m_BrandListPart As New ObservableCollection(Of String)
   Public Property BrandListPart As ObservableCollection(Of String)
      Get
         Return m_BrandListPart
      End Get
      Set(value As ObservableCollection(Of String))
         m_BrandListPart = value
      End Set
   End Property

   Public Function LoadListTemplate() As Boolean
      Brand.Clear()
      GetDirectoryCompoModel(m_Path, Brand)
      If Brand.Count > 0 Then
         For IndexModel As Integer = 0 To Brand.Count - 1
            m_BrandListPart.Add(Brand(IndexModel).ModelDirGraphic)
         Next
      End If

      Return True
   End Function

   Sub New(sName As String, sDDFName As String, sPath As String, sJambSide As String)
      m_Name = sName
      m_DDFName = sDDFName
      m_Path = sPath
      m_JambSide = sJambSide
      LoadListTemplate()
   End Sub

End Class