Migliorata gestione cambio configurazione

2022-12-06 16:39:19 +01:00
parent 2ba7424137
commit 9bc09a73b2
3 changed files with 33 additions and 14 deletions
@@ -88,6 +88,14 @@ Module RegexFunction
            Dim sErrorMsg As String = String.Format(EgtMsg(50196), ConfigurationCompo)
            MessageBox.Show(sErrorMsg, "Error", MessageBoxButton.OK, MessageBoxImage.Error)
         Else
+            ' se abilitata la modifica delle configurazioni cambio messaggio e disabilito la chiusura del programma
+            If Map.refOptionsVM.EnableConfig Then
+               Dim sWarningMsg As String = String.Format("The current ddf configuration ({0}) is different from the current program configuration ({1})", ConfigurationCompo, Path.GetFileName(IniFile.m_sDoorsDirPath), vbCrLf)
+               MessageBox.Show(sWarningMsg, "Warning", MessageBoxButton.OK, MessageBoxImage.Warning)
+               Part.LastPartName = Map.refAssemblyManagerVM.CurrProject.SelAssemblyName.Name
+               Return True
+            End If
+
            Dim MsgBoxResult As MessageBoxResult = MessageBoxResult.No
            ' 50195=The current ddf configuration ({0}) is different from the current program configuration ({1}).
            Dim sWarningMas As String = String.Format(EgtMsg(50195), ConfigurationCompo, Path.GetFileName(IniFile.m_sDoorsDirPath), vbCrLf)