Common: ObjectPropertyDialog improvements, DocumentResultList Improvements

2022-03-23 16:33:53 +01:00
parent 53e702374b
commit 684b3f63ac
18 changed files with 950 additions and 764 deletions
--- a/GUIs.Common/frmDocumentResultList.Designer.vb
+++ b/GUIs.Common/frmDocumentResultList.Designer.vb
@@ -21,6 +21,7 @@ Partial Class frmDocumentResultList
    Private Sub InitializeComponent()
        Me.components = New System.ComponentModel.Container()
        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmDocumentResultList))
+        Dim PushTransition1 As DevExpress.Utils.Animation.PushTransition = New DevExpress.Utils.Animation.PushTransition()
        Me.SplitContainerControl1 = New DevExpress.XtraEditors.SplitContainerControl()
        Me.GridControl1 = New DevExpress.XtraGrid.GridControl()
        Me.GridView1 = New DevExpress.XtraGrid.Views.BandedGrid.BandedGridView()
@@ -57,23 +58,25 @@ Partial Class frmDocumentResultList
        Me.chkGridShowQuickfilter = New DevExpress.XtraBars.BarCheckItem()
        Me.chkGridShowGrouping = New DevExpress.XtraBars.BarCheckItem()
        Me.chkGridShowTitle = New DevExpress.XtraBars.BarCheckItem()
+        Me.MenuItemSaveProperties = New DevExpress.XtraBars.BarButtonItem()
+        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.RibbonPage4 = New DevExpress.XtraBars.Ribbon.RibbonPage()
        Me.RibbonPageGroup3 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
-        Me.RibbonPageGroup7 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
        Me.RibbonPageGroupFilesystem = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
        Me.RibbonPage3 = New DevExpress.XtraBars.Ribbon.RibbonPage()
        Me.RibbonPageGroup4 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
        Me.RibbonPageGroup8 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
        Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
        Me.RibbonPageGroup_Navigation = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
-        Me.RibbonPageGroup5 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
-        Me.RibbonPageExport = New DevExpress.XtraBars.Ribbon.RibbonPage()
-        Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
-        Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
-        Me.RibbonPageGroup_Layout = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
-        Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
        Me.RibbonPageGroup9 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonPageGroupExport = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonPageGroup5 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
+        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.RibbonStatusBar = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
@@ -183,12 +186,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.BarButtonResetLayout, Me.labelCriticalError, Me.labelWarning, Me.MenuItemFileOpen, Me.MenuItemPropertiesIDB, Me.MenuItemFolderOpen, Me.MenuItemFilepathCopy, Me.MenuItemFolderpathCopy, Me.MenuItemPropertiesECM, Me.MenuItemsOpenFileZooFlow, Me.MenuItemPropertiesZooFlow, Me.ButtonRefresh, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3, Me.BarButtonItem4, Me.BarButtonItem5, Me.BarButtonItem6, Me.BarButtonItem7, Me.BarButtonItem8, Me.BarButtonItem9, Me.BarButtonItem10, Me.chkGridShowQuickfilter, Me.chkGridShowGrouping, Me.chkGridShowTitle})
+        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.BarButtonResetLayout, Me.labelCriticalError, Me.labelWarning, Me.MenuItemFileOpen, Me.MenuItemPropertiesIDB, Me.MenuItemFolderOpen, Me.MenuItemFilepathCopy, Me.MenuItemFolderpathCopy, Me.MenuItemPropertiesECM, Me.MenuItemsOpenFileZooFlow, Me.MenuItemPropertiesZooFlow, Me.ButtonRefresh, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3, Me.BarButtonItem4, Me.BarButtonItem5, Me.BarButtonItem6, Me.BarButtonItem7, Me.BarButtonItem8, Me.BarButtonItem9, Me.BarButtonItem10, Me.chkGridShowQuickfilter, Me.chkGridShowGrouping, Me.chkGridShowTitle, Me.MenuItemSaveProperties, Me.BarButtonItem11, Me.BarWorkspaceMenuItem1})
        resources.ApplyResources(Me.RibbonControl, "RibbonControl")
-        Me.RibbonControl.MaxItemId = 43
+        Me.RibbonControl.MaxItemId = 46
        Me.RibbonControl.Name = "RibbonControl"
        Me.RibbonControl.PageCategories.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageCategory() {Me.RibbonPageCategoryFile})
-        Me.RibbonControl.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1, Me.RibbonPageExport, Me.RibbonPage2})
+        Me.RibbonControl.PageHeaderItemLinks.Add(Me.BarWorkspaceMenuItem1)
+        Me.RibbonControl.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1, Me.RibbonPage2})
        Me.RibbonControl.RepositoryItems.AddRange(New DevExpress.XtraEditors.Repository.RepositoryItem() {Me.RepositoryItemTextEdit1, Me.RepositoryItemTextEdit2})
        Me.RibbonControl.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
        Me.RibbonControl.ShowToolbarCustomizeItem = False
@@ -404,20 +408,49 @@ Partial Class frmDocumentResultList
        '
        resources.ApplyResources(Me.chkGridShowQuickfilter, "chkGridShowQuickfilter")
        Me.chkGridShowQuickfilter.Id = 40
+        Me.chkGridShowQuickfilter.ImageOptions.SvgImage = Global.DigitalData.GUIs.Common.My.Resources.Resources.filterquery
        Me.chkGridShowQuickfilter.Name = "chkGridShowQuickfilter"
        '
        'chkGridShowGrouping
        '
        resources.ApplyResources(Me.chkGridShowGrouping, "chkGridShowGrouping")
        Me.chkGridShowGrouping.Id = 41
+        Me.chkGridShowGrouping.ImageOptions.SvgImage = Global.DigitalData.GUIs.Common.My.Resources.Resources.groupheader
        Me.chkGridShowGrouping.Name = "chkGridShowGrouping"
        '
        'chkGridShowTitle
        '
        resources.ApplyResources(Me.chkGridShowTitle, "chkGridShowTitle")
        Me.chkGridShowTitle.Id = 42
+        Me.chkGridShowTitle.ImageOptions.SvgImage = Global.DigitalData.GUIs.Common.My.Resources.Resources.title
        Me.chkGridShowTitle.Name = "chkGridShowTitle"
        '
+        'MenuItemSaveProperties
+        '
+        resources.ApplyResources(Me.MenuItemSaveProperties, "MenuItemSaveProperties")
+        Me.MenuItemSaveProperties.Id = 43
+        Me.MenuItemSaveProperties.ImageOptions.SvgImage = Global.DigitalData.GUIs.Common.My.Resources.Resources.save1
+        Me.MenuItemSaveProperties.Name = "MenuItemSaveProperties"
+        '
+        'BarButtonItem11
+        '
+        resources.ApplyResources(Me.BarButtonItem11, "BarButtonItem11")
+        Me.BarButtonItem11.Id = 44
+        Me.BarButtonItem11.ImageOptions.SvgImage = Global.DigitalData.GUIs.Common.My.Resources.Resources.columnheaders
+        Me.BarButtonItem11.Name = "BarButtonItem11"
+        '
+        'BarWorkspaceMenuItem1
+        '
+        resources.ApplyResources(Me.BarWorkspaceMenuItem1, "BarWorkspaceMenuItem1")
+        Me.BarWorkspaceMenuItem1.Id = 45
+        Me.BarWorkspaceMenuItem1.Name = "BarWorkspaceMenuItem1"
+        Me.BarWorkspaceMenuItem1.WorkspaceManager = Me.WorkspaceManager1
+        '
+        'WorkspaceManager1
+        '
+        Me.WorkspaceManager1.TargetControl = Me
+        Me.WorkspaceManager1.TransitionType = PushTransition1
+        '
        'RibbonPageCategoryFile
        '
        Me.RibbonPageCategoryFile.Appearance.BackColor = System.Drawing.Color.DarkGreen
@@ -430,22 +463,18 @@ Partial Class frmDocumentResultList
        '
        Me.RibbonPage4.Appearance.BackColor = System.Drawing.Color.Green
        Me.RibbonPage4.Appearance.Options.UseBackColor = True
-        Me.RibbonPage4.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup3, Me.RibbonPageGroup7, Me.RibbonPageGroupFilesystem})
+        Me.RibbonPage4.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup3, Me.RibbonPageGroupFilesystem})
        Me.RibbonPage4.Name = "RibbonPage4"
        resources.ApplyResources(Me.RibbonPage4, "RibbonPage4")
        '
        'RibbonPageGroup3
        '
        Me.RibbonPageGroup3.ItemLinks.Add(Me.MenuItemFileOpen)
+        Me.RibbonPageGroup3.ItemLinks.Add(Me.MenuItemSaveProperties)
+        Me.RibbonPageGroup3.ItemLinks.Add(Me.MenuItemPropertiesECM)
        Me.RibbonPageGroup3.Name = "RibbonPageGroup3"
        resources.ApplyResources(Me.RibbonPageGroup3, "RibbonPageGroup3")
        '
-        'RibbonPageGroup7
-        '
-        Me.RibbonPageGroup7.ItemLinks.Add(Me.MenuItemPropertiesECM, True)
-        Me.RibbonPageGroup7.Name = "RibbonPageGroup7"
-        resources.ApplyResources(Me.RibbonPageGroup7, "RibbonPageGroup7")
-        '
        'RibbonPageGroupFilesystem
        '
        Me.RibbonPageGroupFilesystem.ItemLinks.Add(Me.MenuItemFolderOpen)
@@ -476,7 +505,7 @@ Partial Class frmDocumentResultList
        '
        'RibbonPage1
        '
-        Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup_Navigation, Me.RibbonPageGroup5})
+        Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup_Navigation, Me.RibbonPageGroup9, Me.RibbonPageGroupExport, Me.RibbonPageGroup5})
        Me.RibbonPage1.Name = "RibbonPage1"
        resources.ApplyResources(Me.RibbonPage1, "RibbonPage1")
        '
@@ -487,6 +516,23 @@ Partial Class frmDocumentResultList
        Me.RibbonPageGroup_Navigation.Name = "RibbonPageGroup_Navigation"
        resources.ApplyResources(Me.RibbonPageGroup_Navigation, "RibbonPageGroup_Navigation")
        '
+        'RibbonPageGroup9
+        '
+        Me.RibbonPageGroup9.Alignment = DevExpress.XtraBars.Ribbon.RibbonPageGroupAlignment.Far
+        Me.RibbonPageGroup9.ItemLinks.Add(Me.chkGridShowQuickfilter)
+        Me.RibbonPageGroup9.ItemLinks.Add(Me.chkGridShowGrouping)
+        Me.RibbonPageGroup9.ItemLinks.Add(Me.chkGridShowTitle)
+        Me.RibbonPageGroup9.ItemLinks.Add(Me.BarButtonItem11)
+        Me.RibbonPageGroup9.Name = "RibbonPageGroup9"
+        resources.ApplyResources(Me.RibbonPageGroup9, "RibbonPageGroup9")
+        '
+        'RibbonPageGroupExport
+        '
+        Me.RibbonPageGroupExport.Alignment = DevExpress.XtraBars.Ribbon.RibbonPageGroupAlignment.Far
+        Me.RibbonPageGroupExport.ItemLinks.Add(Me.BarButtonItemExportGrid1)
+        Me.RibbonPageGroupExport.Name = "RibbonPageGroupExport"
+        resources.ApplyResources(Me.RibbonPageGroupExport, "RibbonPageGroupExport")
+        '
        'RibbonPageGroup5
        '
        Me.RibbonPageGroup5.Alignment = DevExpress.XtraBars.Ribbon.RibbonPageGroupAlignment.Far
@@ -494,31 +540,12 @@ Partial Class frmDocumentResultList
        Me.RibbonPageGroup5.Name = "RibbonPageGroup5"
        resources.ApplyResources(Me.RibbonPageGroup5, "RibbonPageGroup5")
        '
-        'RibbonPageExport
-        '
-        Me.RibbonPageExport.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup2})
-        Me.RibbonPageExport.Name = "RibbonPageExport"
-        resources.ApplyResources(Me.RibbonPageExport, "RibbonPageExport")
-        '
-        'RibbonPageGroup2
-        '
-        Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItemExportGrid1)
-        Me.RibbonPageGroup2.Name = "RibbonPageGroup2"
-        resources.ApplyResources(Me.RibbonPageGroup2, "RibbonPageGroup2")
-        '
        'RibbonPage2
        '
-        Me.RibbonPage2.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup9, Me.RibbonPageGroup_Layout})
+        Me.RibbonPage2.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup_Layout})
        Me.RibbonPage2.Name = "RibbonPage2"
        resources.ApplyResources(Me.RibbonPage2, "RibbonPage2")
        '
-        '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")
-        '
        'RibbonPageGroup1
        '
        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonResetLayout)
@@ -526,13 +553,12 @@ Partial Class frmDocumentResultList
        Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
        resources.ApplyResources(Me.RibbonPageGroup1, "RibbonPageGroup1")
        '
-        'RibbonPageGroup9
+        'RibbonPageGroup_Layout
        '
-        Me.RibbonPageGroup9.ItemLinks.Add(Me.chkGridShowQuickfilter)
-        Me.RibbonPageGroup9.ItemLinks.Add(Me.chkGridShowGrouping)
-        Me.RibbonPageGroup9.ItemLinks.Add(Me.chkGridShowTitle)
-        Me.RibbonPageGroup9.Name = "RibbonPageGroup9"
-        resources.ApplyResources(Me.RibbonPageGroup9, "RibbonPageGroup9")
+        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
        '
@@ -796,8 +822,7 @@ Partial Class frmDocumentResultList
    Friend WithEvents ButtonRefresh As DevExpress.XtraBars.BarButtonItem
    Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage
    Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
-    Friend WithEvents RibbonPageExport As DevExpress.XtraBars.Ribbon.RibbonPage
-    Friend WithEvents RibbonPageGroup2 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents RibbonPageGroupExport As DevExpress.XtraBars.Ribbon.RibbonPageGroup
    Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
    Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem
    Friend WithEvents BarButtonItem3 As DevExpress.XtraBars.BarButtonItem
@@ -808,7 +833,6 @@ Partial Class frmDocumentResultList
    Friend WithEvents RibbonPageGroupFilesystem As DevExpress.XtraBars.Ribbon.RibbonPageGroup
    Friend WithEvents RibbonPageGroup5 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
    Friend WithEvents RibbonPageGroup6 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
-    Friend WithEvents RibbonPageGroup7 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
    Friend WithEvents DockManager1 As DevExpress.XtraBars.Docking.DockManager
    Friend WithEvents DockPanelDocViewer As DevExpress.XtraBars.Docking.DockPanel
    Friend WithEvents DockPanel1_Container As DevExpress.XtraBars.Docking.ControlContainer
@@ -831,4 +855,8 @@ Partial Class frmDocumentResultList
    Friend WithEvents chkGridShowTitle As DevExpress.XtraBars.BarCheckItem
    Friend WithEvents RibbonPageGroup8 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
 End Class