AppStd/TaskFlow
8
1
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

jj: fix resetting layout, remove .default layout file

Browse Source
This commit is contained in:
Jonathan Jenne 2018-09-17 15:36:47 +02:00
parent 240657097c
commit f8f2ee098d
2 changed files with 20 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
app/.vs/DD_PM_WINDREAM/DesignTimeBuild/.dtbcache
View File

Binary file not shown.

32
app/DD_PM_WINDREAM/frmMain.vb
View File

@ -186,12 +186,6 @@ Public Class frmMain
Private Sub SaveGridLayout()
Try
Dim xml As String = GetXML_LayoutName()
Dim xmlDefault = xml & ".default"
If IO.File.Exists(xmlDefault) = False Then
GridView_Docs.SaveLayoutToXml(xmlDefault, OptionsLayoutBase.FullLayout)
End If
GridView_Docs.SaveLayoutToXml(xml, OptionsLayoutBase.FullLayout)
Catch ex As Exception
ClassLogger.Add("Error while saving GridLayout: " & ex.Message)
@ -210,10 +204,24 @@ Public Class frmMain
Private Sub ResetLayout()
Try
Dim xml As String = GetXML_LayoutName()
Dim xmlDefault = xml & ".default"
IO.File.Delete(xml)
GridView_Docs.RestoreLayoutFromXml(xmlDefault, OptionsLayoutBase.FullLayout)
GridView_Docs.Columns.Clear()
GridView_Docs.PopulateColumns()
GridView_Docs.Columns.Item("PROFILE_ID").Visible = False
GridView_Docs.Columns.Item("GUID").Visible = False
GridView_Docs.Columns.Item("FULL_FILE_PATH").Visible = False
GridView_Docs.Columns.Item("DOC_ID").Visible = False
GridView_Docs.Columns.Item("TL_STATE").Visible = False
GridView_Docs.Columns.Item("ICON").MaxWidth = 24
GridView_Docs.Columns.Item("ICON").MinWidth = 24
GridView_Docs.Columns.Item("ICON").AppearanceCell.BackColor = Color.White
GridView_Docs.Columns.Item("ICON").Fixed = FixedStyle.Left
GridView_Docs.Columns("Last edited").DisplayFormat.FormatType = FormatType.DateTime
GridView_Docs.Columns("Last edited").DisplayFormat.FormatString = "dd.MM.yyyy HH:MM:ss"
GridView_Docs.Columns.Item("PROFILE_GROUP_TEXT").Visible = False
GridView_Docs.Columns.Item("PROFILE_GROUP_COLOR").Visible = False
Catch ex As Exception
ClassLogger.Add("Error while resetting layout: " & ex.Message)
End Try
@ -1100,10 +1108,9 @@ Public Class frmMain
GridView_Docs.Columns.Item("PROFILE_GROUP_TEXT").GroupIndex = 0
GridView_Docs.Columns.Item("PROFILE_GROUP_TEXT").Visible = False
GridView_Docs.Columns.Item("PROFILE_GROUP_COLOR").Visible = False
For I = 0 To GridView_Docs.GroupCount - 1
Dim v = GridView_Docs.GroupedColumns(I).ToString
Dim ii = Nothing
GridView_Docs.GroupedColumns(I).Tag = GridView_Docs.Columns.Item("PROFILE_ID")
For index = 0 To GridView_Docs.GroupCount - 1
Dim v = GridView_Docs.GroupedColumns(index).ToString
GridView_Docs.GroupedColumns(index).Tag = GridView_Docs.Columns.Item("PROFILE_ID")
Next
GridView_Docs.Columns.Item("PROFILE_ID").Visible = False
@ -1200,6 +1207,7 @@ Public Class frmMain
Private Sub TabellenlayoutZurücksetzenToolStripMenuItem_Click_1(sender As Object, e As EventArgs) Handles TabellenlayoutZurücksetzenToolStripMenuItem.Click
' Layout zurücksetzen
ResetLayout()
SaveGridLayout()
' Ansicht neu laden
Load_Profile_items()