Imports System.ComponentModel Imports System.Collections.ObjectModel Imports System.IO Imports EgtUILib Imports EgtWPFLib5 Public Class PartDoor Inherits VMBase Private m_IsTemplate As Boolean = False Public Property IsTemplate As Boolean Get Return m_IsTemplate End Get Set(value As Boolean) m_IsTemplate = value End Set End Property Private m_Door As Part Public Property Door As Part Get Return m_Door End Get Set(value As Part) m_Door = value End Set End Property Private m_ListAssociation As New ObservableCollection(Of Association) Public Property ListAssociation As ObservableCollection(Of Association) Get Return m_ListAssociation End Get Set(value As ObservableCollection(Of Association)) m_ListAssociation = value End Set End Property Private m_IsChecked As Boolean Public Property IsChecked As Boolean Get Return m_IsChecked End Get Set(value As Boolean) m_IsChecked = value m_Door.IsActive = IsChecked If m_Door.TypePart.Contains("DO_") Then Map.refSceneManagerVM.RefreshBtn() End If End Set End Property Public Sub SetIsChecked(bIsChecked As Boolean) m_IsChecked = bIsChecked m_Door.IsActive = bIsChecked NotifyPropertyChanged("IsChecked") Map.refAssemblyManagerVM.CurrProject.SelAssemblyName.IsModified = True End Sub Private m_IsVisible As Visibility Public Property IsVisible As Visibility Get Return m_IsVisible End Get Set(value As Visibility) m_IsVisible = value End Set End Property Public ReadOnly Property Type As String Get Return Door.TypePart End Get End Property End Class