MS Config Layout Sprache

This commit is contained in:
SchreiberM 2023-03-31 12:42:23 +02:00
parent 14c99e7961
commit ebc6d21caf
2 changed files with 2 additions and 3 deletions

View File

@ -605,7 +605,7 @@ Public Class frmMain
End Function End Function
Private Function GetXML_LayoutName() Private Function GetXML_LayoutName()
Dim Filename As String = String.Format("DevExpressGridViewOverview_UserLayout_{0}.xml", GRID_LOAD_TYPE) Dim Filename As String = String.Format("DevExpressGridViewOverview_UserLayout_{0}_{1}.xml", GRID_LOAD_TYPE, USER_LANGUAGE)
Return System.IO.Path.Combine(CONFIG.UserConfigPath.Replace("UserConfig.xml", ""), Filename) Return System.IO.Path.Combine(CONFIG.UserConfigPath.Replace("UserConfig.xml", ""), Filename)
End Function End Function
@ -1210,7 +1210,6 @@ Public Class frmMain
End If End If
Catch ex As Exception Catch ex As Exception
LOGGER.Error(ex)
LOGGER.Info("Unexpected Error in Column_inGridViewLayout: " & ex.Message) LOGGER.Info("Unexpected Error in Column_inGridViewLayout: " & ex.Message)
Return Not False Return Not False
End Try End Try

View File

@ -657,7 +657,7 @@ Public Class frmValidatorSearch
End Sub End Sub
Private Function Get_DocGrid_Layout_Filename(oIndex As Integer) Private Function Get_DocGrid_Layout_Filename(oIndex As Integer)
Dim oUserConfigPath = CONFIG.UserConfigPath.Replace("UserConfig.xml", "") Dim oUserConfigPath = CONFIG.UserConfigPath.Replace("UserConfig.xml", "")
Dim oFilename As String = String.Format("GridViewDoc_Search-{0}-{1}-UserLayout.xml", oIndex, CURRENT_ProfilGUID) Dim oFilename As String = String.Format("GridViewDoc_Search-{0}-{1}-{2}-UserLayout.xml", oIndex, CURRENT_ProfilGUID, USER_LANGUAGE)
Dim oPath = System.IO.Path.Combine(oUserConfigPath, oFilename) Dim oPath = System.IO.Path.Combine(oUserConfigPath, oFilename)
Return oPath Return oPath
End Function End Function