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
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)
End Function
@ -1210,7 +1210,6 @@ Public Class frmMain
End If
Catch ex As Exception
LOGGER.Error(ex)
LOGGER.Info("Unexpected Error in Column_inGridViewLayout: " & ex.Message)
Return Not False
End Try

View File

@ -657,7 +657,7 @@ Public Class frmValidatorSearch
End Sub
Private Function Get_DocGrid_Layout_Filename(oIndex As Integer)
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)
Return oPath
End Function