diff --git a/EgtBEAMWALL.Core/Constants/ConstDataGridColumnsIni.vb b/EgtBEAMWALL.Core/Constants/ConstDataGridColumnsIni.vb index d2dd0134..6a8d1248 100644 --- a/EgtBEAMWALL.Core/Constants/ConstDataGridColumnsIni.vb +++ b/EgtBEAMWALL.Core/Constants/ConstDataGridColumnsIni.vb @@ -1,6 +1,6 @@ Public Module ConstDataGridColumnsIni - Public Const OPTIMIZERDATAGRIDCOLUMNS_FILE_NAME As String = "OPTIMIZERDataGridColumns.ini" + Public Const OPTIMIZERDATAGRIDCOLUMNS_FILE_NAME As String = "OPTIMIZERDataGridColumns.json" Public Const S_OPENPROJFILEDLG_PROD As String = "DG_OpenProjectFileDialog_PROD" Public Const S_NEWOPENPROJFILEDLG_PROD As String = "DG_NewOpenProjectFileDialog_PROD" diff --git a/EgtBEAMWALL.Core/My Project/AssemblyInfo.vb b/EgtBEAMWALL.Core/My Project/AssemblyInfo.vb index 557076cb..b5b388b1 100644 --- a/EgtBEAMWALL.Core/My Project/AssemblyInfo.vb +++ b/EgtBEAMWALL.Core/My Project/AssemblyInfo.vb @@ -38,5 +38,5 @@ Imports System.Windows ' by using the '*' as shown below: ' - - + + diff --git a/EgtBEAMWALL.Core/NewOpenProjectFileDialog/NewOpenProjectFileDialogVM.vb b/EgtBEAMWALL.Core/NewOpenProjectFileDialog/NewOpenProjectFileDialogVM.vb index d9e89436..47768e4e 100644 --- a/EgtBEAMWALL.Core/NewOpenProjectFileDialog/NewOpenProjectFileDialogVM.vb +++ b/EgtBEAMWALL.Core/NewOpenProjectFileDialog/NewOpenProjectFileDialogVM.vb @@ -579,7 +579,7 @@ Public MustInherit Class NewOpenProjectFileDialogVM Protected Sub LoadColumns() ' carico le colonne della datagrid - EgwWPFBaseLib.EgwDataGrid.ReadColumnLayout(Path.ChangeExtension(DataGridColumnsIniFile.m_sDataGridColumnsIniFile, ".json"), S_NEWOPENPROJFILEDLG_PROD, ProdColumns) + EgwWPFBaseLib.EgwDataGrid.ReadColumnLayout(DataGridColumnsIniFile.m_sDataGridColumnsIniFile, S_NEWOPENPROJFILEDLG_PROD, ProdColumns) ' carico campi su cui eseguire il filtro di ricerca m_BTLDateTypeList = New List(Of String)({CreateDate_Msg}) m_SelBTLDateType = BTLDateTypes.CREATEDATE @@ -595,7 +595,7 @@ Public MustInherit Class NewOpenProjectFileDialogVM Friend Function VerifySelected() As Boolean ' Salvo modifiche a colonne - EgwWPFBaseLib.EgwDataGrid.WriteColumnLayout(Path.ChangeExtension(DataGridColumnsIniFile.m_sDataGridColumnsIniFile, ".json"), S_NEWOPENPROJFILEDLG_PROD, ProdColumns) + EgwWPFBaseLib.EgwDataGrid.WriteColumnLayout(DataGridColumnsIniFile.m_sDataGridColumnsIniFile, S_NEWOPENPROJFILEDLG_PROD, ProdColumns) If IsNothing(SelProject) Then Return False Dim AllFilesInDir As IEnumerable(Of String) = Nothing If m_ProjectType = Core.ConstBeam.ProjectType.PROD Then diff --git a/EgtBEAMWALL.Core/OpenProjectFileDialog/OpenProjectFileDialogVM.vb b/EgtBEAMWALL.Core/OpenProjectFileDialog/OpenProjectFileDialogVM.vb index 459581af..506843b5 100644 --- a/EgtBEAMWALL.Core/OpenProjectFileDialog/OpenProjectFileDialogVM.vb +++ b/EgtBEAMWALL.Core/OpenProjectFileDialog/OpenProjectFileDialogVM.vb @@ -445,7 +445,7 @@ Public MustInherit Class OpenProjectFileDialogVM Protected Sub LoadColumns() ' carico le colonne della datagrid - EgwWPFBaseLib.EgwDataGrid.ReadColumnLayout(Path.ChangeExtension(DataGridColumnsIniFile.m_sDataGridColumnsIniFile, ".json"), S_OPENPROJFILEDLG_PROD, ProjectColumns) + EgwWPFBaseLib.EgwDataGrid.ReadColumnLayout(DataGridColumnsIniFile.m_sDataGridColumnsIniFile, S_OPENPROJFILEDLG_PROD, ProjectColumns) ' carico campi su cui eseguire il filtro di ricerca m_BTLDateTypeList = New List(Of String)({CreateDate_Msg}) m_SelBTLDateType = BTLDateTypes.CREATEDATE @@ -461,7 +461,7 @@ Public MustInherit Class OpenProjectFileDialogVM Friend Function VerifySelected() As Boolean ' Salvo modifiche a colonne - EgwWPFBaseLib.EgwDataGrid.WriteColumnLayout(Path.ChangeExtension(DataGridColumnsIniFile.m_sDataGridColumnsIniFile, ".json"), S_OPENPROJFILEDLG_PROD, ProjectColumns) + EgwWPFBaseLib.EgwDataGrid.WriteColumnLayout(DataGridColumnsIniFile.m_sDataGridColumnsIniFile, S_OPENPROJFILEDLG_PROD, ProjectColumns) If IsNothing(SelProject) Then Return False Dim AllFilesInDir As IEnumerable(Of String) = Nothing If m_ProjectType = Core.ConstBeam.ProjectType.PROD Then diff --git a/EgtBEAMWALL.DataLayer/Properties/AssemblyInfo.cs b/EgtBEAMWALL.DataLayer/Properties/AssemblyInfo.cs index 96447e82..52c2ddec 100644 --- a/EgtBEAMWALL.DataLayer/Properties/AssemblyInfo.cs +++ b/EgtBEAMWALL.DataLayer/Properties/AssemblyInfo.cs @@ -32,5 +32,5 @@ using System.Runtime.InteropServices; // You can specify all the values or you can default the Build and Revision Numbers // by using the '*' as shown below: // [assembly: AssemblyVersion("1.0.*")] -[assembly: AssemblyVersion("3.1.1.5")] -[assembly: AssemblyFileVersion("3.1.1.5")] +[assembly: AssemblyVersion("3.1.1.6")] +[assembly: AssemblyFileVersion("3.1.1.6")] diff --git a/EgtBEAMWALL.Optimizer/BTLDataWnd/BTLDataWndVM.vb b/EgtBEAMWALL.Optimizer/BTLDataWnd/BTLDataWndVM.vb index 28df3b9d..c57a1b1b 100644 --- a/EgtBEAMWALL.Optimizer/BTLDataWnd/BTLDataWndVM.vb +++ b/EgtBEAMWALL.Optimizer/BTLDataWnd/BTLDataWndVM.vb @@ -739,7 +739,7 @@ Public Class BTLDataWndVM End If End Sub - Friend Sub SaveInfoBTL() + Friend Sub SaveInfoBTL(nType As BWType) Dim AISetupDirPath As String = Map.refMainWindowVM.MainWindowM.GetAISetupDirPath(nType, True) Dim sDefaultConfigFile As String = String.Empty Dim sTmpStrategySetup As String = String.Empty @@ -813,7 +813,7 @@ Public Class BTLDataWndVM Return End If Else - SaveInfoBTL() + SaveInfoBTL(ProjectManagerVM.CurrProd.nType) End If Map.refLeftPanelVM.ResetCalc() Map.refSceneHostVM.SaveProject() diff --git a/EgtBEAMWALL.Optimizer/GeneralParametersStrategy/GeneralParametersStrategyVM.vb b/EgtBEAMWALL.Optimizer/GeneralParametersStrategy/GeneralParametersStrategyVM.vb index b2c47f87..012cab2d 100644 --- a/EgtBEAMWALL.Optimizer/GeneralParametersStrategy/GeneralParametersStrategyVM.vb +++ b/EgtBEAMWALL.Optimizer/GeneralParametersStrategy/GeneralParametersStrategyVM.vb @@ -821,7 +821,7 @@ Public Class ListGenericParameter Return m_SelValue End Get Set(value As ToolParameter) - If Not IsNothing(value) Then + If Not IsNothing(value) AndAlso Not IsNothing(m_SelValue) Then If m_SelValue.sUUID <> value.sUUID Then Map.refStrategyManagerVM.SetbIsModifyStrategy(True) SetbIsListModify(True) diff --git a/EgtBEAMWALL.Optimizer/ItemParamList/BTLPartListV.xaml b/EgtBEAMWALL.Optimizer/ItemParamList/BTLPartListV.xaml index 55afef78..7aa157da 100644 --- a/EgtBEAMWALL.Optimizer/ItemParamList/BTLPartListV.xaml +++ b/EgtBEAMWALL.Optimizer/ItemParamList/BTLPartListV.xaml @@ -52,8 +52,8 @@ Style="{StaticResource BTLPartList_Expander}"> - +