Ristrutturazione classi

EgtBEAMWALL.Core/OpenProjectFileDialog/OpenProjectFileDialogVM.vb

@@ -12,6 +12,8 @@ Imports EgtWPFLib5
 Public MustInherit Class OpenProjectFileDialogVM
    Inherits VMBase
 
+#Region "FIELDS & PROPERTIES"
+
    Friend Event m_CloseWindow(bDialogResult As Boolean)
 
    Protected m_ProjectColumns As New ObservableCollection(Of EgtDataGridColumn)
@@ -59,10 +61,6 @@ Public MustInherit Class OpenProjectFileDialogVM
       Get
          Return m_ProjectList
       End Get
-      'Set(value As List(Of ProjFile))
-      '   m_ProjList = value
-      '   NotifyPropertyChanged("ProjList")
-      'End Set
    End Property
 
    Protected m_SelProject As ProjectFileVM
@@ -238,6 +236,10 @@ Public MustInherit Class OpenProjectFileDialogVM
    Private m_cmdProjectDoubleClick As ICommand
    Private m_cmdDelete As ICommand
 
+#End Region    ' FIELDS & PROPERTIES
+
+#Region "METHODS"
+
    Public MustOverride Function Init(ProjectType As ProjectType, Optional CurrProjectList As List(Of ProjectFileVM) = Nothing) As Boolean?
 
    Protected Sub LoadColumns(ProjectType As ProjectType)
@@ -301,6 +303,8 @@ Public MustInherit Class OpenProjectFileDialogVM
       Return bProjectOk
    End Function
 
+#End Region    ' METHODS
+
 #Region "COMMANDS"
 
 #Region "ProjectDoubleClick"