Common/DocumentResultList: Refactor file loading, add zooflow file loading

2021-12-17 16:40:25 +01:00
parent 8d19f70abc
commit 1b6a69b24f
14 changed files with 823 additions and 516 deletions
--- a/GUIs.Common/DocumentResultList/frmDocumentResultList.Designer.vb
+++ b/GUIs.Common/DocumentResultList/frmDocumentResultList.Designer.vb
@@ -32,9 +32,7 @@ Partial Class frmDocumentResultList
        Me.BarStaticItem1 = New DevExpress.XtraBars.BarStaticItem()
        Me.labelResultCount = New DevExpress.XtraBars.BarStaticItem()
        Me.BarButtonBack = New DevExpress.XtraBars.BarButtonItem()
-        Me.BarButtonItem5 = New DevExpress.XtraBars.BarButtonItem()
-        Me.RepositoryItemTextEdit1 = New DevExpress.XtraEditors.Repository.RepositoryItemTextEdit()
-        Me.RepositoryItemTextEdit2 = New DevExpress.XtraEditors.Repository.RepositoryItemTextEdit()
+        Me.BarButtonResetLayout = New DevExpress.XtraBars.BarButtonItem()
        Me.labelCriticalError = New DevExpress.XtraBars.BarStaticItem()
        Me.labelWarning = New DevExpress.XtraBars.BarStaticItem()
        Me.MenuItemFileOpen = New DevExpress.XtraBars.BarButtonItem()
@@ -43,10 +41,14 @@ Partial Class frmDocumentResultList
        Me.MenuItemFilepathCopy = New DevExpress.XtraBars.BarButtonItem()
        Me.MenuItemFolderpathCopy = New DevExpress.XtraBars.BarButtonItem()
        Me.MenuItemPropertiesECM = New DevExpress.XtraBars.BarButtonItem()
+        Me.MenuItemsOpenFileZooFlow = New DevExpress.XtraBars.BarButtonItem()
+        Me.MenuItemPropertiesZooFlow = New DevExpress.XtraBars.BarButtonItem()
        Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
        Me.RibbonPageGroup_Navigation = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
        Me.RibbonPageGroup_Layout = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
        Me.RibbonPageGroup_Export = 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()
        Me.SplitContainerControl2 = New DevExpress.XtraEditors.SplitContainerControl()
        Me.GridControl2 = New DevExpress.XtraGrid.GridControl()
@@ -61,7 +63,12 @@ Partial Class frmDocumentResultList
        Me.MenuFullAccess_IDB = New DevExpress.XtraBars.PopupMenu(Me.components)
        Me.MenuViewAccess_IDB = New DevExpress.XtraBars.PopupMenu(Me.components)
        Me.MenuFullAccess_EDM = New DevExpress.XtraBars.PopupMenu(Me.components)
+        Me.MenuFullAccess_ZOOFLOW = New DevExpress.XtraBars.PopupMenu(Me.components)
        CType(Me.SplitContainerControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.SplitContainerControl1.Panel1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SplitContainerControl1.Panel1.SuspendLayout()
+        CType(Me.SplitContainerControl1.Panel2, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SplitContainerControl1.Panel2.SuspendLayout()
        Me.SplitContainerControl1.SuspendLayout()
        CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.GridView1, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -69,16 +76,25 @@ Partial Class frmDocumentResultList
        CType(Me.RepositoryItemTextEdit1, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.RepositoryItemTextEdit2, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.SplitContainerControl2, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.SplitContainerControl2.Panel1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SplitContainerControl2.Panel1.SuspendLayout()
+        CType(Me.SplitContainerControl2.Panel2, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SplitContainerControl2.Panel2.SuspendLayout()
        Me.SplitContainerControl2.SuspendLayout()
        CType(Me.GridControl2, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.GridView2, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.GridControl3, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.GridView3, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.SplitContainerControl3, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.SplitContainerControl3.Panel1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SplitContainerControl3.Panel1.SuspendLayout()
+        CType(Me.SplitContainerControl3.Panel2, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SplitContainerControl3.Panel2.SuspendLayout()
        Me.SplitContainerControl3.SuspendLayout()
        CType(Me.MenuFullAccess_IDB, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.MenuViewAccess_IDB, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.MenuFullAccess_EDM, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.MenuFullAccess_ZOOFLOW, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.SuspendLayout()
        '
        'SplitContainerControl1
@@ -86,8 +102,14 @@ Partial Class frmDocumentResultList
        Me.SplitContainerControl1.CollapsePanel = DevExpress.XtraEditors.SplitCollapsePanel.Panel2
        resources.ApplyResources(Me.SplitContainerControl1, "SplitContainerControl1")
        Me.SplitContainerControl1.Name = "SplitContainerControl1"
+        '
+        'SplitContainerControl1.Panel1
+        '
        Me.SplitContainerControl1.Panel1.Controls.Add(Me.GridControl1)
        resources.ApplyResources(Me.SplitContainerControl1.Panel1, "SplitContainerControl1.Panel1")
+        '
+        'SplitContainerControl1.Panel2
+        '
        Me.SplitContainerControl1.Panel2.Controls.Add(Me.SplitContainerControl2)
        resources.ApplyResources(Me.SplitContainerControl1.Panel2, "SplitContainerControl1.Panel2")
        Me.SplitContainerControl1.SplitterPosition = 382
@@ -128,9 +150,9 @@ 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.BarButtonItem5, Me.labelCriticalError, Me.labelWarning, Me.MenuItemFileOpen, Me.MenuItemPropertiesIDB, Me.MenuItemFolderOpen, Me.MenuItemFilepathCopy, Me.MenuItemFolderpathCopy, Me.MenuItemPropertiesECM})
+        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})
        resources.ApplyResources(Me.RibbonControl, "RibbonControl")
-        Me.RibbonControl.MaxItemId = 27
+        Me.RibbonControl.MaxItemId = 29
        Me.RibbonControl.Name = "RibbonControl"
        Me.RibbonControl.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
        Me.RibbonControl.RepositoryItems.AddRange(New DevExpress.XtraEditors.Repository.RepositoryItem() {Me.RepositoryItemTextEdit1, Me.RepositoryItemTextEdit2})
@@ -183,23 +205,13 @@ Partial Class frmDocumentResultList
        Me.BarButtonBack.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonBack.ImageOptions.LargeImage"), System.Drawing.Image)
        Me.BarButtonBack.Name = "BarButtonBack"
        '
-        'BarButtonItem5
+        'BarButtonResetLayout
        '
-        resources.ApplyResources(Me.BarButtonItem5, "BarButtonItem5")
-        Me.BarButtonItem5.Id = 10
-        Me.BarButtonItem5.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem5.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
-        Me.BarButtonItem5.Name = "BarButtonItem5"
-        Me.BarButtonItem5.Visibility = DevExpress.XtraBars.BarItemVisibility.OnlyInCustomizing
-        '
-        'RepositoryItemTextEdit1
-        '
-        resources.ApplyResources(Me.RepositoryItemTextEdit1, "RepositoryItemTextEdit1")
-        Me.RepositoryItemTextEdit1.Name = "RepositoryItemTextEdit1"
-        '
-        'RepositoryItemTextEdit2
-        '
-        resources.ApplyResources(Me.RepositoryItemTextEdit2, "RepositoryItemTextEdit2")
-        Me.RepositoryItemTextEdit2.Name = "RepositoryItemTextEdit2"
+        resources.ApplyResources(Me.BarButtonResetLayout, "BarButtonResetLayout")
+        Me.BarButtonResetLayout.Id = 10
+        Me.BarButtonResetLayout.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem5.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonResetLayout.Name = "BarButtonResetLayout"
+        Me.BarButtonResetLayout.Visibility = DevExpress.XtraBars.BarItemVisibility.OnlyInCustomizing
        '
        'labelCriticalError
        '
@@ -231,7 +243,7 @@ Partial Class frmDocumentResultList
        '
        resources.ApplyResources(Me.MenuItemFileOpen, "MenuItemFileOpen")
        Me.MenuItemFileOpen.Id = 16
-        Me.MenuItemFileOpen.ImageOptions.SvgImage = CType(resources.GetObject("MenuItemFileOpen.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.MenuItemFileOpen.ImageOptions.SvgImage = Global.DigitalData.GUIs.Common.My.Resources.Resources.singlepageview
        Me.MenuItemFileOpen.Name = "MenuItemFileOpen"
        '
        'MenuItemPropertiesIDB
@@ -269,6 +281,20 @@ Partial Class frmDocumentResultList
        Me.MenuItemPropertiesECM.ImageOptions.SvgImage = CType(resources.GetObject("MenuItemPropertiesECM.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
        Me.MenuItemPropertiesECM.Name = "MenuItemPropertiesECM"
        '
+        'MenuItemsOpenFileZooFlow
+        '
+        resources.ApplyResources(Me.MenuItemsOpenFileZooFlow, "MenuItemsOpenFileZooFlow")
+        Me.MenuItemsOpenFileZooFlow.Id = 27
+        Me.MenuItemsOpenFileZooFlow.ImageOptions.SvgImage = Global.DigitalData.GUIs.Common.My.Resources.Resources.singlepageview1
+        Me.MenuItemsOpenFileZooFlow.Name = "MenuItemsOpenFileZooFlow"
+        '
+        'MenuItemPropertiesZooFlow
+        '
+        resources.ApplyResources(Me.MenuItemPropertiesZooFlow, "MenuItemPropertiesZooFlow")
+        Me.MenuItemPropertiesZooFlow.Id = 28
+        Me.MenuItemPropertiesZooFlow.ImageOptions.SvgImage = Global.DigitalData.GUIs.Common.My.Resources.Resources.editcolors
+        Me.MenuItemPropertiesZooFlow.Name = "MenuItemPropertiesZooFlow"
+        '
        'RibbonPage1
        '
        Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup_Navigation, Me.RibbonPageGroup_Layout, Me.RibbonPageGroup_Export})
@@ -287,7 +313,7 @@ Partial Class frmDocumentResultList
        Me.RibbonPageGroup_Layout.Alignment = DevExpress.XtraBars.Ribbon.RibbonPageGroupAlignment.Far
        Me.RibbonPageGroup_Layout.ItemLinks.Add(Me.SwitchMainContainerHorizontal)
        Me.RibbonPageGroup_Layout.ItemLinks.Add(Me.SwitchDetailContainerHorizontal)
-        Me.RibbonPageGroup_Layout.ItemLinks.Add(Me.BarButtonItem5)
+        Me.RibbonPageGroup_Layout.ItemLinks.Add(Me.BarButtonResetLayout)
        Me.RibbonPageGroup_Layout.Name = "RibbonPageGroup_Layout"
        resources.ApplyResources(Me.RibbonPageGroup_Layout, "RibbonPageGroup_Layout")
        '
@@ -298,6 +324,16 @@ Partial Class frmDocumentResultList
        Me.RibbonPageGroup_Export.Name = "RibbonPageGroup_Export"
        resources.ApplyResources(Me.RibbonPageGroup_Export, "RibbonPageGroup_Export")
        '
+        'RepositoryItemTextEdit1
+        '
+        resources.ApplyResources(Me.RepositoryItemTextEdit1, "RepositoryItemTextEdit1")
+        Me.RepositoryItemTextEdit1.Name = "RepositoryItemTextEdit1"
+        '
+        'RepositoryItemTextEdit2
+        '
+        resources.ApplyResources(Me.RepositoryItemTextEdit2, "RepositoryItemTextEdit2")
+        Me.RepositoryItemTextEdit2.Name = "RepositoryItemTextEdit2"
+        '
        'RibbonStatusBar
        '
        Me.RibbonStatusBar.ItemLinks.Add(Me.labelResultCount)
@@ -313,8 +349,14 @@ Partial Class frmDocumentResultList
        resources.ApplyResources(Me.SplitContainerControl2, "SplitContainerControl2")
        Me.SplitContainerControl2.Horizontal = False
        Me.SplitContainerControl2.Name = "SplitContainerControl2"
+        '
+        'SplitContainerControl2.Panel1
+        '
        Me.SplitContainerControl2.Panel1.Controls.Add(Me.GridControl2)
        resources.ApplyResources(Me.SplitContainerControl2.Panel1, "SplitContainerControl2.Panel1")
+        '
+        'SplitContainerControl2.Panel2
+        '
        Me.SplitContainerControl2.Panel2.Controls.Add(Me.GridControl3)
        resources.ApplyResources(Me.SplitContainerControl2.Panel2, "SplitContainerControl2.Panel2")
        Me.SplitContainerControl2.SplitterPosition = 223
@@ -382,8 +424,14 @@ Partial Class frmDocumentResultList
        Me.SplitContainerControl3.BorderStyle = DevExpress.XtraEditors.Controls.BorderStyles.[Default]
        resources.ApplyResources(Me.SplitContainerControl3, "SplitContainerControl3")
        Me.SplitContainerControl3.Name = "SplitContainerControl3"
+        '
+        'SplitContainerControl3.Panel1
+        '
        Me.SplitContainerControl3.Panel1.Controls.Add(Me.SplitContainerControl1)
        resources.ApplyResources(Me.SplitContainerControl3.Panel1, "SplitContainerControl3.Panel1")
+        '
+        'SplitContainerControl3.Panel2
+        '
        Me.SplitContainerControl3.Panel2.Controls.Add(Me.DocumentViewer1)
        resources.ApplyResources(Me.SplitContainerControl3.Panel2, "SplitContainerControl3.Panel2")
        Me.SplitContainerControl3.SplitterPosition = 762
@@ -424,6 +472,13 @@ Partial Class frmDocumentResultList
        Me.MenuFullAccess_EDM.Name = "MenuFullAccess_EDM"
        Me.MenuFullAccess_EDM.Ribbon = Me.RibbonControl
        '
+        'MenuFullAccess_ZOOFLOW
+        '
+        Me.MenuFullAccess_ZOOFLOW.ItemLinks.Add(Me.MenuItemsOpenFileZooFlow)
+        Me.MenuFullAccess_ZOOFLOW.ItemLinks.Add(Me.MenuItemPropertiesZooFlow)
+        Me.MenuFullAccess_ZOOFLOW.Name = "MenuFullAccess_ZOOFLOW"
+        Me.MenuFullAccess_ZOOFLOW.Ribbon = Me.RibbonControl
+        '
        'frmDocumentResultList
        '
        Me.AllowFormGlass = DevExpress.Utils.DefaultBoolean.[True]
@@ -437,6 +492,10 @@ Partial Class frmDocumentResultList
        Me.Name = "frmDocumentResultList"
        Me.Ribbon = Me.RibbonControl
        Me.StatusBar = Me.RibbonStatusBar
+        CType(Me.SplitContainerControl1.Panel1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.SplitContainerControl1.Panel1.ResumeLayout(False)
+        CType(Me.SplitContainerControl1.Panel2, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.SplitContainerControl1.Panel2.ResumeLayout(False)
        CType(Me.SplitContainerControl1, System.ComponentModel.ISupportInitialize).EndInit()
        Me.SplitContainerControl1.ResumeLayout(False)
        CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).EndInit()
@@ -444,17 +503,26 @@ Partial Class frmDocumentResultList
        CType(Me.RibbonControl, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.RepositoryItemTextEdit1, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.RepositoryItemTextEdit2, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.SplitContainerControl2.Panel1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.SplitContainerControl2.Panel1.ResumeLayout(False)
+        CType(Me.SplitContainerControl2.Panel2, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.SplitContainerControl2.Panel2.ResumeLayout(False)
        CType(Me.SplitContainerControl2, System.ComponentModel.ISupportInitialize).EndInit()
        Me.SplitContainerControl2.ResumeLayout(False)
        CType(Me.GridControl2, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.GridView2, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.GridControl3, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.GridView3, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.SplitContainerControl3.Panel1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.SplitContainerControl3.Panel1.ResumeLayout(False)
+        CType(Me.SplitContainerControl3.Panel2, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.SplitContainerControl3.Panel2.ResumeLayout(False)
        CType(Me.SplitContainerControl3, System.ComponentModel.ISupportInitialize).EndInit()
        Me.SplitContainerControl3.ResumeLayout(False)
        CType(Me.MenuFullAccess_IDB, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.MenuViewAccess_IDB, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.MenuFullAccess_EDM, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.MenuFullAccess_ZOOFLOW, System.ComponentModel.ISupportInitialize).EndInit()
        Me.ResumeLayout(False)
        Me.PerformLayout()

@@ -484,7 +552,7 @@ Partial Class frmDocumentResultList
    Friend WithEvents XtraSaveFileDialog As DevExpress.XtraEditors.XtraSaveFileDialog
    Friend WithEvents BarButtonBack As DevExpress.XtraBars.BarButtonItem
    Friend WithEvents RibbonPageGroup_Navigation As DevExpress.XtraBars.Ribbon.RibbonPageGroup
-    Friend WithEvents BarButtonItem5 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents BarButtonResetLayout As DevExpress.XtraBars.BarButtonItem
    Friend WithEvents RepositoryItemTextEdit1 As DevExpress.XtraEditors.Repository.RepositoryItemTextEdit
    Friend WithEvents RepositoryItemTextEdit2 As DevExpress.XtraEditors.Repository.RepositoryItemTextEdit
    Friend WithEvents labelCriticalError As DevExpress.XtraBars.BarStaticItem
@@ -500,4 +568,7 @@ Partial Class frmDocumentResultList
    Friend WithEvents MenuViewAccess_IDB As DevExpress.XtraBars.PopupMenu
    Friend WithEvents MenuFullAccess_EDM As DevExpress.XtraBars.PopupMenu
    Friend WithEvents MenuItemPropertiesECM As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents MenuFullAccess_ZOOFLOW As DevExpress.XtraBars.PopupMenu
+    Friend WithEvents MenuItemsOpenFileZooFlow As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents MenuItemPropertiesZooFlow As DevExpress.XtraBars.BarButtonItem
 End Class