- Gestita assenza cartella in progetto presente su Db

- Correzione su solido con multiselezione
- Correzione su sezione selezionata dopo rotazione con selezione multipla
- Progetti Db senza cartella di progetto vengono eliminati da Db
- Rotazione pareti aggiunte da UpdateBTL se macchina girata
This commit is contained in:
Emmanuele Sassi
2022-05-04 19:38:00 +02:00
parent e9eaff2685
commit 22539226e6
5 changed files with 61 additions and 7 deletions
@@ -280,9 +280,11 @@ Public MustInherit Class OpenProjectFileDialogVM
If IsNothing(SelProject) Then Return False
Dim AllFilesInDir As IEnumerable(Of String) = Nothing
If m_ProjectType = Core.ConstBeam.ProjectType.PROJ Then
If String.IsNullOrWhiteSpace(SelProject.sProjDirPath) OrElse Not File.Exists(SelProject.sProjDirPath) Then Return False
' verifico se esiste ProdId
AllFilesInDir = IO.Directory.EnumerateFiles(SelProject.sProjDirPath)
ElseIf m_ProjectType = Core.ConstBeam.ProjectType.PROD Then
If String.IsNullOrWhiteSpace(SelProject.sProdDirPath) OrElse Not File.Exists(SelProject.sProdDirPath) Then Return False
AllFilesInDir = IO.Directory.EnumerateFiles(SelProject.sProdDirPath)
Else
Return False