Egalware/egtbeamwall
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Correzione controller

Browse Source 
Aggiunta gestione del passaggio da prod a proj con scelta di questultimo
This commit is contained in:
Emmanuele Sassi
2021-06-17 11:35:24 +02:00
parent 3b368ac504
commit f24dcd0bc5
4 changed files with 76 additions and 53 deletions
Download Patch File Download Diff File Expand all files Collapse all files
EgtBEAMWALL.ViewerOptimizer/OpenProjectFileDialog/OpenProjectFileDialogVM.vb
+4 -3
View File
@@ -145,12 +145,12 @@ Public Class OpenProjectFileDialogVM
Private m_cmdProjectDoubleClick As ICommand
Private m_cmdDelete As ICommand
Public Function Init(ProjectType As ProjectType, Optional ProjectList As List(Of ProjectFileVM) = Nothing) As Boolean?
Public Function Init(ProjectType As ProjectType, Optional CurrProjectList As List(Of ProjectFileVM) = Nothing) As Boolean?
m_ProjectType = ProjectType
' carico colonne
LoadColumns(ProjectType)
' carico lista progetti
If IsNothing(ProjectList) OrElse ProjectList.Count = 0 Then
If IsNothing(CurrProjectList) OrElse CurrProjectList.Count = 0 Then
' leggo da db
If ProjectType = ProjectType.PROJ Then
Dim DbProjectList As New List(Of ProjFileM)
@@ -166,7 +166,8 @@ Public Class OpenProjectFileDialogVM
Next
End If
Else
m_ProjectList = New ObservableCollection(Of ProjectFileVM)(ProjectList)
m_ProjectList = New ObservableCollection(Of ProjectFileVM)(CurrProjectList)
NotifyPropertyChanged(NameOf(ProjectList))
End If
End Function