Common: Rework Ribbon controls and layout, add Fontsize Setting

GUIs.Common/DocumentResultList/Config.vb

@@ -8,6 +8,7 @@ Namespace DocumentResultList
         Public Property SplitContainer1Horizontal As Boolean = True
         Public Property SplitContainer2Distance As Integer = 250
         Public Property SplitContainer2Horizontal As Boolean = False
+        Public Property GridFontSizeDelta As Integer = 0
     End Class
 
 End Namespace

GUIs.Common/DocumentResultList/Layout.vb

@@ -32,6 +32,10 @@ Namespace DocumentResultList
             End Try
         End Sub
 
+        Public Async Function Workspace_SaveAsync(pWorkspaceManager As WorkspaceManager) As Task
+            Await Task.Run(Sub() Workspace_Save(pWorkspaceManager))
+        End Function
+
         Public Sub Workspace_Restore(pWorkspaceManager As WorkspaceManager)
             Try
                 Dim oFileName = GetWorkspace_LayoutName()
@@ -54,6 +58,10 @@ Namespace DocumentResultList
             End Try
         End Sub
 
+        Public Async Function DockManager_SaveLayoutAsync(pDockManager As DockManager) As Task
+            Await Task.Run(Sub() DockManager_SaveLayout(pDockManager))
+        End Function
+
         Public Sub DockManager_RestoreLayout(pDockManager As DockManager)
             Try
                 Dim oFilename As String = GetDockmanager_LayoutName()
@@ -81,13 +89,19 @@ Namespace DocumentResultList
         Public Sub GridView_SaveLayout(pGridView As GridView)
             Try
                 Dim oFileName As String = GetGrid_LayoutName(pGridView)
-                pGridView.SaveLayoutToXml(oFileName, OptionsLayoutBase.FullLayout)
+                Using oStream = New IO.FileStream(oFileName, IO.FileMode.Open)
+                    pGridView.SaveLayoutToStream(oStream, OptionsLayoutBase.FullLayout)
+                End Using
             Catch ex As Exception
                 Logger.Error(ex)
                 Logger.Info("Error while saving GridLayout: " & ex.Message)
             End Try
         End Sub
 
+        Public Async Function GridView_SaveLayoutAsync(pGridView As GridView) As Task
+            Await Task.Run(Sub() GridView_SaveLayout(pGridView))
+        End Function
+
         Public Function GetDockmanager_LayoutName() As String
             Dim Filename As String = $"DockManagerDocResult_UserLayout.xml"
             Dim oDirectory As String = IO.Path.GetDirectoryName(Config.UserConfigPath)

GUIs.Common/frmDocumentResultList.Designer.vb

@@ -62,24 +62,20 @@ Partial Class frmDocumentResultList
         Me.BarButtonItem11 = New DevExpress.XtraBars.BarButtonItem()
         Me.BarWorkspaceMenuItem1 = New DevExpress.XtraBars.BarWorkspaceMenuItem()
         Me.WorkspaceManager1 = New DevExpress.Utils.WorkspaceManager(Me.components)
-        Me.RibbonPageCategoryFile = New DevExpress.XtraBars.Ribbon.RibbonPageCategory()
+        Me.BarEditItemGridFontSize = New DevExpress.XtraBars.BarEditItem()
-        Me.RibbonPageActions1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
+        Me.cmbGridFontSize = New DevExpress.XtraEditors.Repository.RepositoryItemComboBox()
-        Me.RibbonPageGroup3 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
-        Me.RibbonPageGroupFilesystem = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
-        Me.RibbonPageActions2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
-        Me.RibbonPageGroup4 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
-        Me.RibbonPageGroup8 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
-        Me.RibbonPageCategoryAttribute = New DevExpress.XtraBars.Ribbon.RibbonPageCategory()
-        Me.RibbonPageAttribute = New DevExpress.XtraBars.Ribbon.RibbonPage()
-        Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
         Me.RibbonPageStart = New DevExpress.XtraBars.Ribbon.RibbonPage()
         Me.RibbonPageGroup_Navigation = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
         Me.RibbonPageGroupExport = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
         Me.RibbonPageGroup5 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonPageGroupDocument = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonPageGroupFilesystem = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonPageGroupCheckInOut = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonPageGroupWorkflow = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonPageGroupAttribute = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
         Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
         Me.RibbonPageGroup9 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
         Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
-        Me.RibbonPageGroup_Layout = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
         Me.RepositoryItemTextEdit1 = New DevExpress.XtraEditors.Repository.RepositoryItemTextEdit()
         Me.RepositoryItemTextEdit2 = New DevExpress.XtraEditors.Repository.RepositoryItemTextEdit()
         Me.RepositoryItemSearchControl1 = New DevExpress.XtraEditors.Repository.RepositoryItemSearchControl()
@@ -123,6 +119,7 @@ Partial Class frmDocumentResultList
         CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.GridView1, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.RibbonControl, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.cmbGridFontSize, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.RepositoryItemTextEdit1, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.RepositoryItemTextEdit2, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.RepositoryItemSearchControl1, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -216,14 +213,13 @@ Partial Class frmDocumentResultList
         'RibbonControl
         '
         Me.RibbonControl.ExpandCollapseItem.Id = 0
-        Me.RibbonControl.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl.ExpandCollapseItem, Me.RibbonControl.SearchEditItem, Me.SwitchMainContainerHorizontal, Me.SwitchDetailContainerHorizontal, Me.BarButtonItemExportGrid1, Me.BarStaticItem1, Me.labelResultCount, Me.BarButtonBack, Me.BarButtonResetGridLayout, Me.labelCriticalError, Me.labelWarning, Me.MenuItemFileOpen, Me.MenuItemPropertiesIDB, Me.MenuItemFolderOpen, Me.MenuItemFilepathCopy, Me.MenuItemFolderpathCopy, Me.MenuItemProperties, Me.MenuItemsOpenFileZooFlow, Me.MenuItemPropertiesZooFlow, Me.ButtonRefresh, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3, Me.BarButtonItem4, Me.BarButtonItem5, Me.BarButtonResetWindowLayout, Me.MenuItemStartAdhocWorkflow, Me.MenuItemCheckInFile, Me.MenuItemCheckOutFile, Me.MenuItemVersionFile, Me.chkGridShowQuickfilter, Me.chkGridShowGrouping, Me.chkGridShowTitle, Me.MenuItemSaveProperties, Me.BarButtonItem11, Me.BarWorkspaceMenuItem1})
+        Me.RibbonControl.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl.ExpandCollapseItem, Me.RibbonControl.SearchEditItem, Me.SwitchMainContainerHorizontal, Me.SwitchDetailContainerHorizontal, Me.BarButtonItemExportGrid1, Me.BarStaticItem1, Me.labelResultCount, Me.BarButtonBack, Me.BarButtonResetGridLayout, Me.labelCriticalError, Me.labelWarning, Me.MenuItemFileOpen, Me.MenuItemPropertiesIDB, Me.MenuItemFolderOpen, Me.MenuItemFilepathCopy, Me.MenuItemFolderpathCopy, Me.MenuItemProperties, Me.MenuItemsOpenFileZooFlow, Me.MenuItemPropertiesZooFlow, Me.ButtonRefresh, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3, Me.BarButtonItem4, Me.BarButtonItem5, Me.BarButtonResetWindowLayout, Me.MenuItemStartAdhocWorkflow, Me.MenuItemCheckInFile, Me.MenuItemCheckOutFile, Me.MenuItemVersionFile, Me.chkGridShowQuickfilter, Me.chkGridShowGrouping, Me.chkGridShowTitle, Me.MenuItemSaveProperties, Me.BarButtonItem11, Me.BarWorkspaceMenuItem1, Me.BarEditItemGridFontSize})
         resources.ApplyResources(Me.RibbonControl, "RibbonControl")
-        Me.RibbonControl.MaxItemId = 49
+        Me.RibbonControl.MaxItemId = 53
         Me.RibbonControl.Name = "RibbonControl"
-        Me.RibbonControl.PageCategories.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageCategory() {Me.RibbonPageCategoryFile, Me.RibbonPageCategoryAttribute})
         Me.RibbonControl.PageHeaderItemLinks.Add(Me.BarWorkspaceMenuItem1)
         Me.RibbonControl.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPageStart, Me.RibbonPage2})
-        Me.RibbonControl.RepositoryItems.AddRange(New DevExpress.XtraEditors.Repository.RepositoryItem() {Me.RepositoryItemTextEdit1, Me.RepositoryItemTextEdit2, Me.RepositoryItemSearchControl1})
+        Me.RibbonControl.RepositoryItems.AddRange(New DevExpress.XtraEditors.Repository.RepositoryItem() {Me.RepositoryItemTextEdit1, Me.RepositoryItemTextEdit2, Me.RepositoryItemSearchControl1, Me.cmbGridFontSize})
         Me.RibbonControl.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
         Me.RibbonControl.ShowToolbarCustomizeItem = False
         Me.RibbonControl.StatusBar = Me.RibbonStatusBar
@@ -278,7 +274,7 @@ Partial Class frmDocumentResultList
         '
         resources.ApplyResources(Me.BarButtonResetGridLayout, "BarButtonResetGridLayout")
         Me.BarButtonResetGridLayout.Id = 10
-        Me.BarButtonResetGridLayout.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonResetLayout.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonResetGridLayout.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonResetGridLayout.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
         Me.BarButtonResetGridLayout.Name = "BarButtonResetGridLayout"
         Me.BarButtonResetGridLayout.Visibility = DevExpress.XtraBars.BarItemVisibility.OnlyInCustomizing
         '
@@ -485,78 +481,22 @@ Partial Class frmDocumentResultList
         Me.WorkspaceManager1.TargetControl = Me
         Me.WorkspaceManager1.TransitionType = FadeTransition1
         '
-        'RibbonPageCategoryFile
+        'BarEditItemGridFontSize
         '
-        Me.RibbonPageCategoryFile.Appearance.BackColor = System.Drawing.Color.DarkGreen
+        resources.ApplyResources(Me.BarEditItemGridFontSize, "BarEditItemGridFontSize")
-        Me.RibbonPageCategoryFile.Appearance.Options.UseBackColor = True
+        Me.BarEditItemGridFontSize.Edit = Me.cmbGridFontSize
-        Me.RibbonPageCategoryFile.Name = "RibbonPageCategoryFile"
+        Me.BarEditItemGridFontSize.Id = 52
-        Me.RibbonPageCategoryFile.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPageActions1, Me.RibbonPageActions2})
+        Me.BarEditItemGridFontSize.Name = "BarEditItemGridFontSize"
-        resources.ApplyResources(Me.RibbonPageCategoryFile, "RibbonPageCategoryFile")
         '
-        'RibbonPageActions1
+        'cmbGridFontSize
         '
-        Me.RibbonPageActions1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup3, Me.RibbonPageGroupFilesystem})
+        resources.ApplyResources(Me.cmbGridFontSize, "cmbGridFontSize")
-        Me.RibbonPageActions1.Name = "RibbonPageActions1"
+        Me.cmbGridFontSize.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(CType(resources.GetObject("cmbGridFontSize.Buttons"), DevExpress.XtraEditors.Controls.ButtonPredefines))})
-        resources.ApplyResources(Me.RibbonPageActions1, "RibbonPageActions1")
+        Me.cmbGridFontSize.Name = "cmbGridFontSize"
-        '
-        'RibbonPageGroup3
-        '
-        Me.RibbonPageGroup3.ItemLinks.Add(Me.MenuItemFileOpen)
-        Me.RibbonPageGroup3.ItemLinks.Add(Me.MenuItemProperties)
-        Me.RibbonPageGroup3.Name = "RibbonPageGroup3"
-        resources.ApplyResources(Me.RibbonPageGroup3, "RibbonPageGroup3")
-        '
-        'RibbonPageGroupFilesystem
-        '
-        Me.RibbonPageGroupFilesystem.ItemLinks.Add(Me.MenuItemFolderOpen)
-        Me.RibbonPageGroupFilesystem.ItemLinks.Add(Me.MenuItemFilepathCopy)
-        Me.RibbonPageGroupFilesystem.ItemLinks.Add(Me.MenuItemFolderpathCopy)
-        Me.RibbonPageGroupFilesystem.Name = "RibbonPageGroupFilesystem"
-        resources.ApplyResources(Me.RibbonPageGroupFilesystem, "RibbonPageGroupFilesystem")
-        '
-        'RibbonPageActions2
-        '
-        Me.RibbonPageActions2.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup4, Me.RibbonPageGroup8})
-        Me.RibbonPageActions2.Name = "RibbonPageActions2"
-        resources.ApplyResources(Me.RibbonPageActions2, "RibbonPageActions2")
-        '
-        'RibbonPageGroup4
-        '
-        Me.RibbonPageGroup4.ItemLinks.Add(Me.MenuItemStartAdhocWorkflow)
-        Me.RibbonPageGroup4.Name = "RibbonPageGroup4"
-        resources.ApplyResources(Me.RibbonPageGroup4, "RibbonPageGroup4")
-        '
-        'RibbonPageGroup8
-        '
-        Me.RibbonPageGroup8.ItemLinks.Add(Me.MenuItemCheckOutFile)
-        Me.RibbonPageGroup8.ItemLinks.Add(Me.MenuItemCheckInFile)
-        Me.RibbonPageGroup8.ItemLinks.Add(Me.MenuItemVersionFile)
-        Me.RibbonPageGroup8.Name = "RibbonPageGroup8"
-        resources.ApplyResources(Me.RibbonPageGroup8, "RibbonPageGroup8")
-        '
-        'RibbonPageCategoryAttribute
-        '
-        Me.RibbonPageCategoryAttribute.Appearance.BackColor = System.Drawing.Color.DodgerBlue
-        Me.RibbonPageCategoryAttribute.Appearance.Options.UseBackColor = True
-        Me.RibbonPageCategoryAttribute.Name = "RibbonPageCategoryAttribute"
-        Me.RibbonPageCategoryAttribute.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPageAttribute})
-        resources.ApplyResources(Me.RibbonPageCategoryAttribute, "RibbonPageCategoryAttribute")
-        '
-        'RibbonPageAttribute
-        '
-        Me.RibbonPageAttribute.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup2})
-        Me.RibbonPageAttribute.Name = "RibbonPageAttribute"
-        resources.ApplyResources(Me.RibbonPageAttribute, "RibbonPageAttribute")
-        '
-        'RibbonPageGroup2
-        '
-        Me.RibbonPageGroup2.ItemLinks.Add(Me.MenuItemSaveProperties)
-        Me.RibbonPageGroup2.Name = "RibbonPageGroup2"
-        resources.ApplyResources(Me.RibbonPageGroup2, "RibbonPageGroup2")
         '
         'RibbonPageStart
         '
-        Me.RibbonPageStart.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup_Navigation, Me.RibbonPageGroupExport, Me.RibbonPageGroup5})
+        Me.RibbonPageStart.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup_Navigation, Me.RibbonPageGroupExport, Me.RibbonPageGroup5, Me.RibbonPageGroupDocument, Me.RibbonPageGroupFilesystem, Me.RibbonPageGroupCheckInOut, Me.RibbonPageGroupWorkflow, Me.RibbonPageGroupAttribute})
         Me.RibbonPageStart.Name = "RibbonPageStart"
         resources.ApplyResources(Me.RibbonPageStart, "RibbonPageStart")
         '
@@ -581,9 +521,44 @@ Partial Class frmDocumentResultList
         Me.RibbonPageGroup5.Name = "RibbonPageGroup5"
         resources.ApplyResources(Me.RibbonPageGroup5, "RibbonPageGroup5")
         '
+        'RibbonPageGroupDocument
+        '
+        Me.RibbonPageGroupDocument.ItemLinks.Add(Me.MenuItemFileOpen)
+        Me.RibbonPageGroupDocument.ItemLinks.Add(Me.MenuItemProperties)
+        Me.RibbonPageGroupDocument.Name = "RibbonPageGroupDocument"
+        resources.ApplyResources(Me.RibbonPageGroupDocument, "RibbonPageGroupDocument")
+        '
+        'RibbonPageGroupFilesystem
+        '
+        Me.RibbonPageGroupFilesystem.ItemLinks.Add(Me.MenuItemFolderOpen)
+        Me.RibbonPageGroupFilesystem.ItemLinks.Add(Me.MenuItemFilepathCopy)
+        Me.RibbonPageGroupFilesystem.ItemLinks.Add(Me.MenuItemFolderpathCopy)
+        Me.RibbonPageGroupFilesystem.Name = "RibbonPageGroupFilesystem"
+        resources.ApplyResources(Me.RibbonPageGroupFilesystem, "RibbonPageGroupFilesystem")
+        '
+        'RibbonPageGroupCheckInOut
+        '
+        Me.RibbonPageGroupCheckInOut.ItemLinks.Add(Me.MenuItemCheckOutFile)
+        Me.RibbonPageGroupCheckInOut.ItemLinks.Add(Me.MenuItemCheckInFile)
+        Me.RibbonPageGroupCheckInOut.ItemLinks.Add(Me.MenuItemVersionFile)
+        Me.RibbonPageGroupCheckInOut.Name = "RibbonPageGroupCheckInOut"
+        resources.ApplyResources(Me.RibbonPageGroupCheckInOut, "RibbonPageGroupCheckInOut")
+        '
+        'RibbonPageGroupWorkflow
+        '
+        Me.RibbonPageGroupWorkflow.ItemLinks.Add(Me.MenuItemStartAdhocWorkflow)
+        Me.RibbonPageGroupWorkflow.Name = "RibbonPageGroupWorkflow"
+        resources.ApplyResources(Me.RibbonPageGroupWorkflow, "RibbonPageGroupWorkflow")
+        '
+        'RibbonPageGroupAttribute
+        '
+        Me.RibbonPageGroupAttribute.ItemLinks.Add(Me.MenuItemSaveProperties)
+        Me.RibbonPageGroupAttribute.Name = "RibbonPageGroupAttribute"
+        resources.ApplyResources(Me.RibbonPageGroupAttribute, "RibbonPageGroupAttribute")
+        '
         'RibbonPage2
         '
-        Me.RibbonPage2.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup9, Me.RibbonPageGroup1, Me.RibbonPageGroup_Layout})
+        Me.RibbonPage2.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup9, Me.RibbonPageGroup1})
         Me.RibbonPage2.Name = "RibbonPage2"
         resources.ApplyResources(Me.RibbonPage2, "RibbonPage2")
         '
@@ -593,6 +568,9 @@ Partial Class frmDocumentResultList
         Me.RibbonPageGroup9.ItemLinks.Add(Me.chkGridShowGrouping)
         Me.RibbonPageGroup9.ItemLinks.Add(Me.chkGridShowTitle)
         Me.RibbonPageGroup9.ItemLinks.Add(Me.BarButtonItem11)
+        Me.RibbonPageGroup9.ItemLinks.Add(Me.SwitchDetailContainerHorizontal)
+        Me.RibbonPageGroup9.ItemLinks.Add(Me.SwitchMainContainerHorizontal)
+        Me.RibbonPageGroup9.ItemLinks.Add(Me.BarEditItemGridFontSize)
         Me.RibbonPageGroup9.Name = "RibbonPageGroup9"
         resources.ApplyResources(Me.RibbonPageGroup9, "RibbonPageGroup9")
         '
@@ -604,13 +582,6 @@ Partial Class frmDocumentResultList
         Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
         resources.ApplyResources(Me.RibbonPageGroup1, "RibbonPageGroup1")
         '
-        'RibbonPageGroup_Layout
-        '
-        Me.RibbonPageGroup_Layout.ItemLinks.Add(Me.SwitchMainContainerHorizontal)
-        Me.RibbonPageGroup_Layout.ItemLinks.Add(Me.SwitchDetailContainerHorizontal)
-        Me.RibbonPageGroup_Layout.Name = "RibbonPageGroup_Layout"
-        resources.ApplyResources(Me.RibbonPageGroup_Layout, "RibbonPageGroup_Layout")
-        '
         'RepositoryItemTextEdit1
         '
         resources.ApplyResources(Me.RepositoryItemTextEdit1, "RepositoryItemTextEdit1")
@@ -829,7 +800,7 @@ Partial Class frmDocumentResultList
         Me.LayoutControlItem1.Name = "LayoutControlItem1"
         Me.LayoutControlItem1.Size = New System.Drawing.Size(224, 24)
         resources.ApplyResources(Me.LayoutControlItem1, "LayoutControlItem1")
-        Me.LayoutControlItem1.TextSize = New System.Drawing.Size(137, 13)
+        Me.LayoutControlItem1.TextSize = New System.Drawing.Size(126, 13)
         '
         'LayoutControlItem2
         '
@@ -838,7 +809,7 @@ Partial Class frmDocumentResultList
         Me.LayoutControlItem2.Name = "LayoutControlItem2"
         Me.LayoutControlItem2.Size = New System.Drawing.Size(224, 24)
         resources.ApplyResources(Me.LayoutControlItem2, "LayoutControlItem2")
-        Me.LayoutControlItem2.TextSize = New System.Drawing.Size(137, 13)
+        Me.LayoutControlItem2.TextSize = New System.Drawing.Size(126, 13)
         '
         'EmptySpaceItem1
         '
@@ -913,6 +884,7 @@ Partial Class frmDocumentResultList
         CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.GridView1, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.RibbonControl, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.cmbGridFontSize, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.RepositoryItemTextEdit1, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.RepositoryItemTextEdit2, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.RepositoryItemSearchControl1, System.ComponentModel.ISupportInitialize).EndInit()
@@ -954,7 +926,6 @@ Partial Class frmDocumentResultList
 
     Friend WithEvents RibbonControl As DevExpress.XtraBars.Ribbon.RibbonControl
     Friend WithEvents RibbonPageStart As DevExpress.XtraBars.Ribbon.RibbonPage
-    Friend WithEvents RibbonPageGroup_Layout As DevExpress.XtraBars.Ribbon.RibbonPageGroup
     Friend WithEvents RibbonStatusBar As DevExpress.XtraBars.Ribbon.RibbonStatusBar
     Friend WithEvents SwitchMainContainerHorizontal As DevExpress.XtraBars.BarToggleSwitchItem
     Friend WithEvents SwitchDetailContainerHorizontal As DevExpress.XtraBars.BarToggleSwitchItem
@@ -998,8 +969,7 @@ Partial Class frmDocumentResultList
     Friend WithEvents BarButtonItem3 As DevExpress.XtraBars.BarButtonItem
     Friend WithEvents BarButtonItem4 As DevExpress.XtraBars.BarButtonItem
     Friend WithEvents BarButtonItem5 As DevExpress.XtraBars.BarButtonItem
-    Friend WithEvents RibbonPageActions1 As DevExpress.XtraBars.Ribbon.RibbonPage
+    Friend WithEvents RibbonPageGroupDocument As DevExpress.XtraBars.Ribbon.RibbonPageGroup
-    Friend WithEvents RibbonPageGroup3 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
     Friend WithEvents RibbonPageGroupFilesystem As DevExpress.XtraBars.Ribbon.RibbonPageGroup
     Friend WithEvents RibbonPageGroup5 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
     Friend WithEvents RibbonPageGroup6 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
@@ -1012,9 +982,7 @@ Partial Class frmDocumentResultList
     Friend WithEvents DockPanel2_Container As DevExpress.XtraBars.Docking.ControlContainer
     Friend WithEvents BarButtonResetWindowLayout As DevExpress.XtraBars.BarButtonItem
     Friend WithEvents CtrlObjectPropertyDialog As ctrlObjectPropertyDialog
-    Friend WithEvents RibbonPageCategoryFile As DevExpress.XtraBars.Ribbon.RibbonPageCategory
+    Friend WithEvents RibbonPageGroupWorkflow As DevExpress.XtraBars.Ribbon.RibbonPageGroup
-    Friend WithEvents RibbonPageActions2 As DevExpress.XtraBars.Ribbon.RibbonPage
-    Friend WithEvents RibbonPageGroup4 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
     Friend WithEvents MenuItemStartAdhocWorkflow As DevExpress.XtraBars.BarButtonItem
     Friend WithEvents MenuItemCheckInFile As DevExpress.XtraBars.BarButtonItem
     Friend WithEvents MenuItemCheckOutFile As DevExpress.XtraBars.BarButtonItem
@@ -1023,15 +991,13 @@ Partial Class frmDocumentResultList
     Friend WithEvents chkGridShowQuickfilter As DevExpress.XtraBars.BarCheckItem
     Friend WithEvents chkGridShowGrouping As DevExpress.XtraBars.BarCheckItem
     Friend WithEvents chkGridShowTitle As DevExpress.XtraBars.BarCheckItem
-    Friend WithEvents RibbonPageGroup8 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents RibbonPageGroupCheckInOut As DevExpress.XtraBars.Ribbon.RibbonPageGroup
     Friend WithEvents RibbonPageGroup9 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
     Friend WithEvents MenuItemSaveProperties As DevExpress.XtraBars.BarButtonItem
     Friend WithEvents BarButtonItem11 As DevExpress.XtraBars.BarButtonItem
     Friend WithEvents BarWorkspaceMenuItem1 As DevExpress.XtraBars.BarWorkspaceMenuItem
     Friend WithEvents WorkspaceManager1 As DevExpress.Utils.WorkspaceManager
-    Friend WithEvents RibbonPageCategoryAttribute As DevExpress.XtraBars.Ribbon.RibbonPageCategory
+    Friend WithEvents RibbonPageGroupAttribute As DevExpress.XtraBars.Ribbon.RibbonPageGroup
-    Friend WithEvents RibbonPageAttribute As DevExpress.XtraBars.Ribbon.RibbonPage
-    Friend WithEvents RibbonPageGroup2 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
     Friend WithEvents DockPanelStatus As DevExpress.XtraBars.Docking.DockPanel
     Friend WithEvents ControlContainer1 As DevExpress.XtraBars.Docking.ControlContainer
     Friend WithEvents panelContainerStatus As DevExpress.XtraBars.Docking.DockPanel
@@ -1044,4 +1010,6 @@ Partial Class frmDocumentResultList
     Friend WithEvents LayoutControlItem2 As DevExpress.XtraLayout.LayoutControlItem
     Friend WithEvents EmptySpaceItem1 As DevExpress.XtraLayout.EmptySpaceItem
     Friend WithEvents RepositoryItemSearchControl1 As DevExpress.XtraEditors.Repository.RepositoryItemSearchControl
+    Friend WithEvents BarEditItemGridFontSize As DevExpress.XtraBars.BarEditItem
+    Friend WithEvents cmbGridFontSize As DevExpress.XtraEditors.Repository.RepositoryItemComboBox
 End Class

GUIs.Common/frmDocumentResultList.resx

@@ -253,9 +253,9 @@
 </value>
   </data>
   <data name="BarButtonResetGridLayout.Caption" xml:space="preserve">
-    <value>Aktives Tabellen Layout zurücksetzen</value>
+    <value>Tabellenlayout zurücksetzen</value>
   </data>
-  <data name="BarButtonResetLayout.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+  <data name="BarButtonResetGridLayout.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
         AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
         LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
@@ -445,7 +445,7 @@
     <value>BarButtonItem5</value>
   </data>
   <data name="BarButtonResetWindowLayout.Caption" xml:space="preserve">
-    <value>Fenster Layout zurücksetzen</value>
+    <value>Fensterlayout zurücksetzen</value>
   </data>
   <data name="MenuItemStartAdhocWorkflow.Caption" xml:space="preserve">
     <value>Adhoc Workflow starten</value>
@@ -503,7 +503,7 @@
     <value>DocumentViewer1</value>
   </data>
   <data name="&gt;&gt;DocumentViewer1.Type" xml:space="preserve">
-    <value>DigitalData.Controls.DocumentViewer.DocumentViewer, DigitalData.Controls.DocumentViewer, Version=1.6.8.0, Culture=neutral, PublicKeyToken=null</value>
+    <value>DigitalData.Controls.DocumentViewer.DocumentViewer, DigitalData.Controls.DocumentViewer, Version=1.7.0.0, Culture=neutral, PublicKeyToken=null</value>
   </data>
   <data name="&gt;&gt;DocumentViewer1.Parent" xml:space="preserve">
     <value>DockPanel1_Container</value>
@@ -554,10 +554,10 @@
     <value>0</value>
   </data>
   <data name="txtCheckedOutWho.Location" type="System.Drawing.Point, System.Drawing">
-    <value>173, 45</value>
+    <value>162, 45</value>
   </data>
   <data name="txtCheckedOutWho.Size" type="System.Drawing.Size, System.Drawing">
-    <value>71, 20</value>
+    <value>82, 20</value>
   </data>
   <data name="txtCheckedOutWho.TabIndex" type="System.Int32, mscorlib">
     <value>4</value>
@@ -578,7 +578,7 @@
     <value />
   </data>
   <data name="dateCheckedOutWhen.Location" type="System.Drawing.Point, System.Drawing">
-    <value>173, 69</value>
+    <value>162, 69</value>
   </data>
   <assembly alias="DevExpress.Utils.v21.2" name="DevExpress.Utils.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
   <data name="dateCheckedOutWhen.Properties.Buttons" type="DevExpress.XtraEditors.Controls.ButtonPredefines, DevExpress.Utils.v21.2">
@@ -588,7 +588,7 @@
     <value>Combo</value>
   </data>
   <data name="dateCheckedOutWhen.Size" type="System.Drawing.Size, System.Drawing">
-    <value>71, 20</value>
+    <value>82, 20</value>
   </data>
   <data name="dateCheckedOutWhen.TabIndex" type="System.Int32, mscorlib">
     <value>5</value>
@@ -1135,65 +1135,17 @@
   <data name="&gt;&gt;WorkspaceManager1.Type" xml:space="preserve">
     <value>DevExpress.Utils.WorkspaceManager, DevExpress.Utils.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
-  <data name="&gt;&gt;RibbonPageCategoryFile.Name" xml:space="preserve">
+  <data name="&gt;&gt;BarEditItemGridFontSize.Name" xml:space="preserve">
-    <value>RibbonPageCategoryFile</value>
+    <value>BarEditItemGridFontSize</value>
   </data>
-  <data name="&gt;&gt;RibbonPageCategoryFile.Type" xml:space="preserve">
+  <data name="&gt;&gt;BarEditItemGridFontSize.Type" xml:space="preserve">
-    <value>DevExpress.XtraBars.Ribbon.RibbonPageCategory, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+    <value>DevExpress.XtraBars.BarEditItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
-  <data name="&gt;&gt;RibbonPageActions1.Name" xml:space="preserve">
+  <data name="&gt;&gt;cmbGridFontSize.Name" xml:space="preserve">
-    <value>RibbonPageActions1</value>
+    <value>cmbGridFontSize</value>
   </data>
-  <data name="&gt;&gt;RibbonPageActions1.Type" xml:space="preserve">
+  <data name="&gt;&gt;cmbGridFontSize.Type" xml:space="preserve">
-    <value>DevExpress.XtraBars.Ribbon.RibbonPage, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+    <value>DevExpress.XtraEditors.Repository.RepositoryItemComboBox, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
-  <data name="&gt;&gt;RibbonPageGroup3.Name" xml:space="preserve">
-    <value>RibbonPageGroup3</value>
-  </data>
-  <data name="&gt;&gt;RibbonPageGroup3.Type" xml:space="preserve">
-    <value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
-  <data name="&gt;&gt;RibbonPageGroupFilesystem.Name" xml:space="preserve">
-    <value>RibbonPageGroupFilesystem</value>
-  </data>
-  <data name="&gt;&gt;RibbonPageGroupFilesystem.Type" xml:space="preserve">
-    <value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
-  <data name="&gt;&gt;RibbonPageActions2.Name" xml:space="preserve">
-    <value>RibbonPageActions2</value>
-  </data>
-  <data name="&gt;&gt;RibbonPageActions2.Type" xml:space="preserve">
-    <value>DevExpress.XtraBars.Ribbon.RibbonPage, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
-  <data name="&gt;&gt;RibbonPageGroup4.Name" xml:space="preserve">
-    <value>RibbonPageGroup4</value>
-  </data>
-  <data name="&gt;&gt;RibbonPageGroup4.Type" xml:space="preserve">
-    <value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
-  <data name="&gt;&gt;RibbonPageGroup8.Name" xml:space="preserve">
-    <value>RibbonPageGroup8</value>
-  </data>
-  <data name="&gt;&gt;RibbonPageGroup8.Type" xml:space="preserve">
-    <value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
-  <data name="&gt;&gt;RibbonPageCategoryAttribute.Name" xml:space="preserve">
-    <value>RibbonPageCategoryAttribute</value>
-  </data>
-  <data name="&gt;&gt;RibbonPageCategoryAttribute.Type" xml:space="preserve">
-    <value>DevExpress.XtraBars.Ribbon.RibbonPageCategory, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
-  <data name="&gt;&gt;RibbonPageAttribute.Name" xml:space="preserve">
-    <value>RibbonPageAttribute</value>
-  </data>
-  <data name="&gt;&gt;RibbonPageAttribute.Type" xml:space="preserve">
-    <value>DevExpress.XtraBars.Ribbon.RibbonPage, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
-  <data name="&gt;&gt;RibbonPageGroup2.Name" xml:space="preserve">
-    <value>RibbonPageGroup2</value>
-  </data>
-  <data name="&gt;&gt;RibbonPageGroup2.Type" xml:space="preserve">
-    <value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
   <data name="&gt;&gt;RibbonPageStart.Name" xml:space="preserve">
     <value>RibbonPageStart</value>
@@ -1219,6 +1171,36 @@
   <data name="&gt;&gt;RibbonPageGroup5.Type" xml:space="preserve">
     <value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
+  <data name="&gt;&gt;RibbonPageGroupDocument.Name" xml:space="preserve">
+    <value>RibbonPageGroupDocument</value>
+  </data>
+  <data name="&gt;&gt;RibbonPageGroupDocument.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;RibbonPageGroupFilesystem.Name" xml:space="preserve">
+    <value>RibbonPageGroupFilesystem</value>
+  </data>
+  <data name="&gt;&gt;RibbonPageGroupFilesystem.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;RibbonPageGroupCheckInOut.Name" xml:space="preserve">
+    <value>RibbonPageGroupCheckInOut</value>
+  </data>
+  <data name="&gt;&gt;RibbonPageGroupCheckInOut.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;RibbonPageGroupWorkflow.Name" xml:space="preserve">
+    <value>RibbonPageGroupWorkflow</value>
+  </data>
+  <data name="&gt;&gt;RibbonPageGroupWorkflow.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;RibbonPageGroupAttribute.Name" xml:space="preserve">
+    <value>RibbonPageGroupAttribute</value>
+  </data>
+  <data name="&gt;&gt;RibbonPageGroupAttribute.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
   <data name="&gt;&gt;RibbonPage2.Name" xml:space="preserve">
     <value>RibbonPage2</value>
   </data>
@@ -1237,12 +1219,6 @@
   <data name="&gt;&gt;RibbonPageGroup1.Type" xml:space="preserve">
     <value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
-  <data name="&gt;&gt;RibbonPageGroup_Layout.Name" xml:space="preserve">
-    <value>RibbonPageGroup_Layout</value>
-  </data>
-  <data name="&gt;&gt;RibbonPageGroup_Layout.Type" xml:space="preserve">
-    <value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
   <data name="&gt;&gt;RepositoryItemTextEdit1.Name" xml:space="preserve">
     <value>RepositoryItemTextEdit1</value>
   </data>
@@ -1345,39 +1321,21 @@
   <data name="&gt;&gt;$this.Type" xml:space="preserve">
     <value>DevExpress.XtraBars.Ribbon.RibbonForm, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
+  <data name="BarEditItemGridFontSize.Caption" xml:space="preserve">
+    <value>Schriftgröße</value>
+  </data>
+  <data name="cmbGridFontSize.AutoHeight" type="System.Boolean, mscorlib">
+    <value>False</value>
+  </data>
+  <data name="cmbGridFontSize.Buttons" type="DevExpress.XtraEditors.Controls.ButtonPredefines, DevExpress.Utils.v21.2">
+    <value>Combo</value>
+  </data>
+  <data name="BarEditItemGridFontSize.EditWidth" type="System.Int32, mscorlib">
+    <value>100</value>
+  </data>
   <data name="RibbonControl.Location" type="System.Drawing.Point, System.Drawing">
     <value>0, 0</value>
   </data>
-  <data name="RibbonPageGroup3.Text" xml:space="preserve">
-    <value>Dokument</value>
-  </data>
-  <data name="RibbonPageGroupFilesystem.Text" xml:space="preserve">
-    <value>Dateien und Ordner</value>
-  </data>
-  <data name="RibbonPageActions1.Text" xml:space="preserve">
-    <value>Aktionen 1</value>
-  </data>
-  <data name="RibbonPageGroup4.Text" xml:space="preserve">
-    <value>Workflow</value>
-  </data>
-  <data name="RibbonPageGroup8.Text" xml:space="preserve">
-    <value>Bearbeiten</value>
-  </data>
-  <data name="RibbonPageActions2.Text" xml:space="preserve">
-    <value>Aktionen 2</value>
-  </data>
-  <data name="RibbonPageCategoryFile.Text" xml:space="preserve">
-    <value>Datei</value>
-  </data>
-  <data name="RibbonPageGroup2.Text" xml:space="preserve">
-    <value>Attribute</value>
-  </data>
-  <data name="RibbonPageAttribute.Text" xml:space="preserve">
-    <value>Aktionen</value>
-  </data>
-  <data name="RibbonPageCategoryAttribute.Text" xml:space="preserve">
-    <value>Attribute</value>
-  </data>
   <data name="RibbonPageGroup_Navigation.Text" xml:space="preserve">
     <value>Navigation</value>
   </data>
@@ -1387,18 +1345,30 @@
   <data name="RibbonPageGroup5.Text" xml:space="preserve">
     <value>Aktualisieren</value>
   </data>
+  <data name="RibbonPageGroupDocument.Text" xml:space="preserve">
+    <value>Dokument</value>
+  </data>
+  <data name="RibbonPageGroupFilesystem.Text" xml:space="preserve">
+    <value>Dateien und Ordner</value>
+  </data>
+  <data name="RibbonPageGroupCheckInOut.Text" xml:space="preserve">
+    <value>Bearbeiten</value>
+  </data>
+  <data name="RibbonPageGroupWorkflow.Text" xml:space="preserve">
+    <value>Workflow</value>
+  </data>
+  <data name="RibbonPageGroupAttribute.Text" xml:space="preserve">
+    <value>Attribute</value>
+  </data>
   <data name="RibbonPageStart.Text" xml:space="preserve">
     <value>Start</value>
   </data>
   <data name="RibbonPageGroup9.Text" xml:space="preserve">
-    <value>Tabellen Einstellungen</value>
+    <value>Tabelle</value>
   </data>
   <data name="RibbonPageGroup1.Text" xml:space="preserve">
     <value>Zurücksetzen</value>
   </data>
-  <data name="RibbonPageGroup_Layout.Text" xml:space="preserve">
-    <value>Layout</value>
-  </data>
   <data name="RibbonPage2.Text" xml:space="preserve">
     <value>Layout</value>
   </data>

GUIs.Common/frmDocumentResultList.vb

@@ -172,9 +172,26 @@ Public Class frmDocumentResultList
                 RibbonPageGroupFilesystem.Visible = False
             End If
 
+            Dim oFontSizeDeltaList = New List(Of FontSetting) From {
+                New FontSetting With {.Title = "Normal", .Value = 0},
+                New FontSetting With {.Title = "Groß", .Value = 1},
+                New FontSetting With {.Title = "Größer", .Value = 2},
+                New FontSetting With {.Title = "Noch Größer", .Value = 3}
+            }
+            cmbGridFontSize.Items.Clear()
+            cmbGridFontSize.Items.AddRange(oFontSizeDeltaList)
+            BarEditItemGridFontSize.EditValue = oFontSizeDeltaList.
+                Where(Function(delta) delta.Value = Config.Config.GridFontSizeDelta).
+                FirstOrDefault()
+
             If OperationMode = OperationMode.NoAppServer Then
-                RibbonPageCategoryAttribute.Visible = False
+                'RibbonPageCategoryAttribute.Visible = False
-                RibbonPageActions2.Visible = False
+                'RibbonPageActions2.Visible = False
+                RibbonPageGroupCheckInOut.Visible = False
+                RibbonPageGroupWorkflow.Visible = False
+                RibbonPageGroupAttribute.Visible = False
+            Else
+                RibbonPageGroupFilesystem.Visible = False
             End If
 
             If OperationMode = OperationMode.ZooFlow Or OperationMode = OperationMode.WithAppServer Then
@@ -206,6 +223,16 @@ Public Class frmDocumentResultList
         End Try
     End Sub
 
+
+    Public Class FontSetting
+        Public Property Title As String
+        Public Property Value As Integer
+
+        Public Overrides Function ToString() As String
+            Return Title
+        End Function
+    End Class
+
     Private Sub frmDocumentResultList_Closing(sender As Object, e As CancelEventArgs) Handles Me.FormClosing
         Try
             LayoutManager.GridView_SaveLayout(_ActiveGrid.MainView)
@@ -231,12 +258,6 @@ Public Class frmDocumentResultList
                 Dim oFullPath = oRow.ItemEx(ColumnFilepath, "")
                 Dim oDocument As DocumentResultList.Document = Nothing
 
-                ' Show Ribbon Category
-                If RibbonPageCategoryFile.Visible = False Then
-                    RibbonPageCategoryFile.Visible = True
-                    RibbonControl.SelectedPage = RibbonPageActions1
-                End If
-
                 ' Load DocumentInfo 
                 oDocument = Documentloader.Load(oObjectId, oFullPath)
 
@@ -285,9 +306,18 @@ Public Class frmDocumentResultList
     Private Function UpdateRibbonActions(pDocument As DocumentResultList.Document) As Boolean
         Try
             If pDocument Is Nothing Then
-                RibbonPageCategoryFile.Visible = False
+                RibbonPageGroupFilesystem.Enabled = False
-                RibbonControl.SelectedPage = RibbonPageStart
+                RibbonPageGroupDocument.Enabled = False
+                RibbonPageGroupCheckInOut.Enabled = False
+                RibbonPageGroupWorkflow.Enabled = False
+                RibbonPageGroupAttribute.Enabled = False
                 Return True
+            Else
+                RibbonPageGroupFilesystem.Enabled = True
+                RibbonPageGroupDocument.Enabled = True
+                RibbonPageGroupCheckInOut.Enabled = True
+                RibbonPageGroupWorkflow.Enabled = True
+                RibbonPageGroupAttribute.Enabled = True
             End If
 
             ' Hide Export and filesystem options for view only right
@@ -1052,12 +1082,11 @@ Public Class frmDocumentResultList
     End Sub
 
     Private Sub CtrlObjectPropertyDialog_Enter(sender As Object, e As EventArgs) Handles CtrlObjectPropertyDialog.Enter
-        RibbonPageCategoryAttribute.Visible = True
+        RibbonPageGroupAttribute.Enabled = True
-        RibbonControl.SelectedPage = RibbonPageAttribute
     End Sub
 
     Private Sub CtrlObjectPropertyDialog_Leave(sender As Object, e As EventArgs) Handles CtrlObjectPropertyDialog.Leave
-        RibbonPageCategoryAttribute.Visible = False
+        RibbonPageGroupAttribute.Enabled = True
     End Sub
 
     Private Sub GridView1_RowStyle(sender As Object, e As RowStyleEventArgs) Handles GridView1.RowStyle
@@ -1074,4 +1103,11 @@ Public Class frmDocumentResultList
         End If
 
     End Sub
+
+    Private Sub BarEditItemGridFontSize_EditValueChanged(sender As Object, e As EventArgs) Handles BarEditItemGridFontSize.EditValueChanged
+        Config.Config.GridFontSizeDelta = DirectCast(BarEditItemGridFontSize.EditValue, FontSetting).Value
+        Config.Save()
+
+        GridBuilder.WithFontSizeDelta(Config.Config.GridFontSizeDelta)
+    End Sub
 End Class