Imports EgtBEAMWALL.Core Imports EgtWPFLib5 Public Class PartManagerVM Inherits VMBase #Region "FIELDS & PROPERTIES" Private m_PartManager_IsEnabled As Boolean = True Public ReadOnly Property PartManager_IsEnabled As Boolean Get Return m_PartManager_IsEnabled End Get End Property Public ReadOnly Property Lock_Visibility As Visibility Get Return If(Not IsNothing(Map.refProjectVM.BTLStructureVM) AndAlso Map.refProjectVM.BTLStructureVM.nPROJTYPE = BWType.WALL AndAlso Map.refMainWindowVM.MainWindowM.GetKeyOption(KEY_OPT.NESTING_AUTO), Visibility.Visible, Visibility.Collapsed) End Get End Property #End Region ' Fields & Properties #Region "CONSTRUCTOR" Sub New() ' salvo riferimento in Map Map.SetRefPartManagerVM(Me) End Sub #End Region ' Constructor #Region "METHODS" Friend Sub SetPartManagerIsEnabled(bIsEnabled As Boolean) m_PartManager_IsEnabled = bIsEnabled NotifyPropertyChanged(NameOf(PartManager_IsEnabled)) End Sub Friend Sub LockVisibilityUpdate() NotifyPropertyChanged(NameOf(Lock_Visibility)) End Sub #End Region ' Methods End Class