Common/DocumentResultList: Rewrite of Context menu
This commit is contained in:
Jonathan Jenne
@@ -29,19 +29,20 @@ Partial Class frmDocumentResultList
|
||||
Me.SwitchMainContainerHorizontal = New DevExpress.XtraBars.BarToggleSwitchItem()
|
||||
Me.SwitchDetailContainerHorizontal = New DevExpress.XtraBars.BarToggleSwitchItem()
|
||||
Me.BarButtonItemExportGrid1 = New DevExpress.XtraBars.BarButtonItem()
|
||||
Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
|
||||
Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
|
||||
Me.BarButtonItem3 = New DevExpress.XtraBars.BarButtonItem()
|
||||
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.BarEditItem1 = New DevExpress.XtraBars.BarEditItem()
|
||||
Me.RepositoryItemTextEdit1 = New DevExpress.XtraEditors.Repository.RepositoryItemTextEdit()
|
||||
Me.BarEditItem2 = New DevExpress.XtraBars.BarEditItem()
|
||||
Me.RepositoryItemTextEdit2 = New DevExpress.XtraEditors.Repository.RepositoryItemTextEdit()
|
||||
Me.labelCriticalError = New DevExpress.XtraBars.BarStaticItem()
|
||||
Me.labelWarning = New DevExpress.XtraBars.BarStaticItem()
|
||||
Me.MenuItemFileOpen = New DevExpress.XtraBars.BarButtonItem()
|
||||
Me.MenuItemPropertiesIDB = New DevExpress.XtraBars.BarButtonItem()
|
||||
Me.MenuItemFolderOpen = New DevExpress.XtraBars.BarButtonItem()
|
||||
Me.MenuItemFilepathCopy = New DevExpress.XtraBars.BarButtonItem()
|
||||
Me.MenuItemFolderpathCopy = New DevExpress.XtraBars.BarButtonItem()
|
||||
Me.MenuItemPropertiesECM = 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()
|
||||
@@ -57,6 +58,9 @@ Partial Class frmDocumentResultList
|
||||
Me.SplitContainerControl3 = New DevExpress.XtraEditors.SplitContainerControl()
|
||||
Me.DocumentViewer1 = New DigitalData.Controls.DocumentViewer.DocumentViewer()
|
||||
Me.XtraSaveFileDialog = New DevExpress.XtraEditors.XtraSaveFileDialog(Me.components)
|
||||
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)
|
||||
CType(Me.SplitContainerControl1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SplitContainerControl1.SuspendLayout()
|
||||
CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
@@ -72,34 +76,25 @@ Partial Class frmDocumentResultList
|
||||
CType(Me.GridView3, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.SplitContainerControl3, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
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()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'SplitContainerControl1
|
||||
'
|
||||
resources.ApplyResources(Me.SplitContainerControl1, "SplitContainerControl1")
|
||||
Me.SplitContainerControl1.CollapsePanel = DevExpress.XtraEditors.SplitCollapsePanel.Panel2
|
||||
resources.ApplyResources(Me.SplitContainerControl1, "SplitContainerControl1")
|
||||
Me.SplitContainerControl1.Name = "SplitContainerControl1"
|
||||
resources.ApplyResources(Me.SplitContainerControl1.Panel1, "SplitContainerControl1.Panel1")
|
||||
Me.SplitContainerControl1.Panel1.Controls.Add(Me.GridControl1)
|
||||
resources.ApplyResources(Me.SplitContainerControl1.Panel2, "SplitContainerControl1.Panel2")
|
||||
resources.ApplyResources(Me.SplitContainerControl1.Panel1, "SplitContainerControl1.Panel1")
|
||||
Me.SplitContainerControl1.Panel2.Controls.Add(Me.SplitContainerControl2)
|
||||
resources.ApplyResources(Me.SplitContainerControl1.Panel2, "SplitContainerControl1.Panel2")
|
||||
Me.SplitContainerControl1.SplitterPosition = 382
|
||||
'
|
||||
'GridControl1
|
||||
'
|
||||
resources.ApplyResources(Me.GridControl1, "GridControl1")
|
||||
Me.GridControl1.EmbeddedNavigator.AccessibleDescription = resources.GetString("GridControl1.EmbeddedNavigator.AccessibleDescription")
|
||||
Me.GridControl1.EmbeddedNavigator.AccessibleName = resources.GetString("GridControl1.EmbeddedNavigator.AccessibleName")
|
||||
Me.GridControl1.EmbeddedNavigator.AllowHtmlTextInToolTip = CType(resources.GetObject("GridControl1.EmbeddedNavigator.AllowHtmlTextInToolTip"), DevExpress.Utils.DefaultBoolean)
|
||||
Me.GridControl1.EmbeddedNavigator.Anchor = CType(resources.GetObject("GridControl1.EmbeddedNavigator.Anchor"), System.Windows.Forms.AnchorStyles)
|
||||
Me.GridControl1.EmbeddedNavigator.BackgroundImage = CType(resources.GetObject("GridControl1.EmbeddedNavigator.BackgroundImage"), System.Drawing.Image)
|
||||
Me.GridControl1.EmbeddedNavigator.BackgroundImageLayout = CType(resources.GetObject("GridControl1.EmbeddedNavigator.BackgroundImageLayout"), System.Windows.Forms.ImageLayout)
|
||||
Me.GridControl1.EmbeddedNavigator.ImeMode = CType(resources.GetObject("GridControl1.EmbeddedNavigator.ImeMode"), System.Windows.Forms.ImeMode)
|
||||
Me.GridControl1.EmbeddedNavigator.MaximumSize = CType(resources.GetObject("GridControl1.EmbeddedNavigator.MaximumSize"), System.Drawing.Size)
|
||||
Me.GridControl1.EmbeddedNavigator.TextLocation = CType(resources.GetObject("GridControl1.EmbeddedNavigator.TextLocation"), DevExpress.XtraEditors.NavigatorButtonsTextLocation)
|
||||
Me.GridControl1.EmbeddedNavigator.ToolTip = resources.GetString("GridControl1.EmbeddedNavigator.ToolTip")
|
||||
Me.GridControl1.EmbeddedNavigator.ToolTipIconType = CType(resources.GetObject("GridControl1.EmbeddedNavigator.ToolTipIconType"), DevExpress.Utils.ToolTipIconType)
|
||||
Me.GridControl1.EmbeddedNavigator.ToolTipTitle = resources.GetString("GridControl1.EmbeddedNavigator.ToolTipTitle")
|
||||
Me.GridControl1.MainView = Me.GridView1
|
||||
Me.GridControl1.MenuManager = Me.RibbonControl
|
||||
Me.GridControl1.Name = "GridControl1"
|
||||
@@ -112,7 +107,6 @@ Partial Class frmDocumentResultList
|
||||
Me.GridView1.Appearance.FocusedRow.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer))
|
||||
Me.GridView1.Appearance.FocusedRow.Options.UseBackColor = True
|
||||
Me.GridView1.Bands.AddRange(New DevExpress.XtraGrid.Views.BandedGrid.GridBand() {Me.GridBand1})
|
||||
resources.ApplyResources(Me.GridView1, "GridView1")
|
||||
Me.GridView1.GridControl = Me.GridControl1
|
||||
Me.GridView1.Name = "GridView1"
|
||||
Me.GridView1.OptionsBehavior.Editable = False
|
||||
@@ -133,14 +127,10 @@ Partial Class frmDocumentResultList
|
||||
'
|
||||
'RibbonControl
|
||||
'
|
||||
resources.ApplyResources(Me.RibbonControl, "RibbonControl")
|
||||
Me.RibbonControl.ExpandCollapseItem.Id = 0
|
||||
Me.RibbonControl.ExpandCollapseItem.ImageOptions.ImageIndex = CType(resources.GetObject("RibbonControl.ExpandCollapseItem.ImageOptions.ImageIndex"), Integer)
|
||||
Me.RibbonControl.ExpandCollapseItem.ImageOptions.LargeImageIndex = CType(resources.GetObject("RibbonControl.ExpandCollapseItem.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.RibbonControl.ExpandCollapseItem.ImageOptions.SvgImage = CType(resources.GetObject("RibbonControl.ExpandCollapseItem.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.RibbonControl.ExpandCollapseItem.SearchTags = resources.GetString("RibbonControl.ExpandCollapseItem.SearchTags")
|
||||
Me.RibbonControl.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl.ExpandCollapseItem, Me.RibbonControl.SearchEditItem, Me.SwitchMainContainerHorizontal, Me.SwitchDetailContainerHorizontal, Me.BarButtonItemExportGrid1, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3, Me.BarStaticItem1, Me.labelResultCount, Me.BarButtonBack, Me.BarButtonItem5, Me.BarEditItem1, Me.BarEditItem2, Me.labelCriticalError, Me.labelWarning})
|
||||
Me.RibbonControl.MaxItemId = 16
|
||||
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})
|
||||
resources.ApplyResources(Me.RibbonControl, "RibbonControl")
|
||||
Me.RibbonControl.MaxItemId = 27
|
||||
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})
|
||||
@@ -152,74 +142,30 @@ Partial Class frmDocumentResultList
|
||||
'
|
||||
'SwitchMainContainerHorizontal
|
||||
'
|
||||
resources.ApplyResources(Me.SwitchMainContainerHorizontal, "SwitchMainContainerHorizontal")
|
||||
Me.SwitchMainContainerHorizontal.BindableChecked = True
|
||||
resources.ApplyResources(Me.SwitchMainContainerHorizontal, "SwitchMainContainerHorizontal")
|
||||
Me.SwitchMainContainerHorizontal.Checked = True
|
||||
Me.SwitchMainContainerHorizontal.Id = 1
|
||||
Me.SwitchMainContainerHorizontal.ImageOptions.ImageIndex = CType(resources.GetObject("SwitchMainContainerHorizontal.ImageOptions.ImageIndex"), Integer)
|
||||
Me.SwitchMainContainerHorizontal.ImageOptions.LargeImageIndex = CType(resources.GetObject("SwitchMainContainerHorizontal.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.SwitchMainContainerHorizontal.ImageOptions.SvgImage = CType(resources.GetObject("SwitchMainContainerHorizontal.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.SwitchMainContainerHorizontal.Name = "SwitchMainContainerHorizontal"
|
||||
'
|
||||
'SwitchDetailContainerHorizontal
|
||||
'
|
||||
resources.ApplyResources(Me.SwitchDetailContainerHorizontal, "SwitchDetailContainerHorizontal")
|
||||
Me.SwitchDetailContainerHorizontal.Id = 2
|
||||
Me.SwitchDetailContainerHorizontal.ImageOptions.ImageIndex = CType(resources.GetObject("SwitchDetailContainerHorizontal.ImageOptions.ImageIndex"), Integer)
|
||||
Me.SwitchDetailContainerHorizontal.ImageOptions.LargeImageIndex = CType(resources.GetObject("SwitchDetailContainerHorizontal.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.SwitchDetailContainerHorizontal.ImageOptions.SvgImage = CType(resources.GetObject("SwitchDetailContainerHorizontal.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.SwitchDetailContainerHorizontal.Name = "SwitchDetailContainerHorizontal"
|
||||
'
|
||||
'BarButtonItemExportGrid1
|
||||
'
|
||||
resources.ApplyResources(Me.BarButtonItemExportGrid1, "BarButtonItemExportGrid1")
|
||||
Me.BarButtonItemExportGrid1.Id = 3
|
||||
Me.BarButtonItemExportGrid1.ImageOptions.ImageIndex = CType(resources.GetObject("BarButtonItemExportGrid1.ImageOptions.ImageIndex"), Integer)
|
||||
Me.BarButtonItemExportGrid1.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarButtonItemExportGrid1.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.BarButtonItemExportGrid1.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItemExportGrid1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.BarButtonItemExportGrid1.Name = "BarButtonItemExportGrid1"
|
||||
Me.BarButtonItemExportGrid1.Visibility = DevExpress.XtraBars.BarItemVisibility.OnlyInCustomizing
|
||||
'
|
||||
'BarButtonItem1
|
||||
'
|
||||
resources.ApplyResources(Me.BarButtonItem1, "BarButtonItem1")
|
||||
Me.BarButtonItem1.Id = 4
|
||||
Me.BarButtonItem1.ImageOptions.Image = CType(resources.GetObject("BarButtonItem1.ImageOptions.Image"), System.Drawing.Image)
|
||||
Me.BarButtonItem1.ImageOptions.ImageIndex = CType(resources.GetObject("BarButtonItem1.ImageOptions.ImageIndex"), Integer)
|
||||
Me.BarButtonItem1.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem1.ImageOptions.LargeImage"), System.Drawing.Image)
|
||||
Me.BarButtonItem1.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarButtonItem1.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.BarButtonItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.BarButtonItem1.Name = "BarButtonItem1"
|
||||
'
|
||||
'BarButtonItem2
|
||||
'
|
||||
resources.ApplyResources(Me.BarButtonItem2, "BarButtonItem2")
|
||||
Me.BarButtonItem2.Id = 5
|
||||
Me.BarButtonItem2.ImageOptions.Image = CType(resources.GetObject("BarButtonItem2.ImageOptions.Image"), System.Drawing.Image)
|
||||
Me.BarButtonItem2.ImageOptions.ImageIndex = CType(resources.GetObject("BarButtonItem2.ImageOptions.ImageIndex"), Integer)
|
||||
Me.BarButtonItem2.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem2.ImageOptions.LargeImage"), System.Drawing.Image)
|
||||
Me.BarButtonItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarButtonItem2.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.BarButtonItem2.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.BarButtonItem2.Name = "BarButtonItem2"
|
||||
'
|
||||
'BarButtonItem3
|
||||
'
|
||||
resources.ApplyResources(Me.BarButtonItem3, "BarButtonItem3")
|
||||
Me.BarButtonItem3.Id = 6
|
||||
Me.BarButtonItem3.ImageOptions.Image = CType(resources.GetObject("BarButtonItem3.ImageOptions.Image"), System.Drawing.Image)
|
||||
Me.BarButtonItem3.ImageOptions.ImageIndex = CType(resources.GetObject("BarButtonItem3.ImageOptions.ImageIndex"), Integer)
|
||||
Me.BarButtonItem3.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem3.ImageOptions.LargeImage"), System.Drawing.Image)
|
||||
Me.BarButtonItem3.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarButtonItem3.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.BarButtonItem3.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem3.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.BarButtonItem3.Name = "BarButtonItem3"
|
||||
'
|
||||
'BarStaticItem1
|
||||
'
|
||||
resources.ApplyResources(Me.BarStaticItem1, "BarStaticItem1")
|
||||
Me.BarStaticItem1.Id = 7
|
||||
Me.BarStaticItem1.ImageOptions.ImageIndex = CType(resources.GetObject("BarStaticItem1.ImageOptions.ImageIndex"), Integer)
|
||||
Me.BarStaticItem1.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarStaticItem1.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.BarStaticItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarStaticItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.BarStaticItem1.Name = "BarStaticItem1"
|
||||
Me.BarStaticItem1.Tag = "{0} Ergebnisse"
|
||||
'
|
||||
@@ -227,9 +173,6 @@ Partial Class frmDocumentResultList
|
||||
'
|
||||
resources.ApplyResources(Me.labelResultCount, "labelResultCount")
|
||||
Me.labelResultCount.Id = 8
|
||||
Me.labelResultCount.ImageOptions.ImageIndex = CType(resources.GetObject("labelResultCount.ImageOptions.ImageIndex"), Integer)
|
||||
Me.labelResultCount.ImageOptions.LargeImageIndex = CType(resources.GetObject("labelResultCount.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.labelResultCount.ImageOptions.SvgImage = CType(resources.GetObject("labelResultCount.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.labelResultCount.Name = "labelResultCount"
|
||||
'
|
||||
'BarButtonBack
|
||||
@@ -237,48 +180,22 @@ Partial Class frmDocumentResultList
|
||||
resources.ApplyResources(Me.BarButtonBack, "BarButtonBack")
|
||||
Me.BarButtonBack.Id = 9
|
||||
Me.BarButtonBack.ImageOptions.Image = CType(resources.GetObject("BarButtonBack.ImageOptions.Image"), System.Drawing.Image)
|
||||
Me.BarButtonBack.ImageOptions.ImageIndex = CType(resources.GetObject("BarButtonBack.ImageOptions.ImageIndex"), Integer)
|
||||
Me.BarButtonBack.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonBack.ImageOptions.LargeImage"), System.Drawing.Image)
|
||||
Me.BarButtonBack.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarButtonBack.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.BarButtonBack.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonBack.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.BarButtonBack.Name = "BarButtonBack"
|
||||
'
|
||||
'BarButtonItem5
|
||||
'
|
||||
resources.ApplyResources(Me.BarButtonItem5, "BarButtonItem5")
|
||||
Me.BarButtonItem5.Id = 10
|
||||
Me.BarButtonItem5.ImageOptions.ImageIndex = CType(resources.GetObject("BarButtonItem5.ImageOptions.ImageIndex"), Integer)
|
||||
Me.BarButtonItem5.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarButtonItem5.ImageOptions.LargeImageIndex"), Integer)
|
||||
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
|
||||
'
|
||||
'BarEditItem1
|
||||
'
|
||||
resources.ApplyResources(Me.BarEditItem1, "BarEditItem1")
|
||||
Me.BarEditItem1.CaptionToEditorIndent = 0
|
||||
Me.BarEditItem1.Edit = Me.RepositoryItemTextEdit1
|
||||
Me.BarEditItem1.Id = 12
|
||||
Me.BarEditItem1.ImageOptions.ImageIndex = CType(resources.GetObject("BarEditItem1.ImageOptions.ImageIndex"), Integer)
|
||||
Me.BarEditItem1.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarEditItem1.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.BarEditItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarEditItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.BarEditItem1.Name = "BarEditItem1"
|
||||
'
|
||||
'RepositoryItemTextEdit1
|
||||
'
|
||||
resources.ApplyResources(Me.RepositoryItemTextEdit1, "RepositoryItemTextEdit1")
|
||||
Me.RepositoryItemTextEdit1.Name = "RepositoryItemTextEdit1"
|
||||
'
|
||||
'BarEditItem2
|
||||
'
|
||||
resources.ApplyResources(Me.BarEditItem2, "BarEditItem2")
|
||||
Me.BarEditItem2.Edit = Me.RepositoryItemTextEdit2
|
||||
Me.BarEditItem2.Id = 13
|
||||
Me.BarEditItem2.ImageOptions.ImageIndex = CType(resources.GetObject("BarEditItem2.ImageOptions.ImageIndex"), Integer)
|
||||
Me.BarEditItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarEditItem2.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.BarEditItem2.ImageOptions.SvgImage = CType(resources.GetObject("BarEditItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.BarEditItem2.Name = "BarEditItem2"
|
||||
'
|
||||
'RepositoryItemTextEdit2
|
||||
'
|
||||
resources.ApplyResources(Me.RepositoryItemTextEdit2, "RepositoryItemTextEdit2")
|
||||
@@ -286,11 +203,9 @@ Partial Class frmDocumentResultList
|
||||
'
|
||||
'labelCriticalError
|
||||
'
|
||||
resources.ApplyResources(Me.labelCriticalError, "labelCriticalError")
|
||||
Me.labelCriticalError.Alignment = DevExpress.XtraBars.BarItemLinkAlignment.Right
|
||||
resources.ApplyResources(Me.labelCriticalError, "labelCriticalError")
|
||||
Me.labelCriticalError.Id = 14
|
||||
Me.labelCriticalError.ImageOptions.ImageIndex = CType(resources.GetObject("labelCriticalError.ImageOptions.ImageIndex"), Integer)
|
||||
Me.labelCriticalError.ImageOptions.LargeImageIndex = CType(resources.GetObject("labelCriticalError.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.labelCriticalError.ImageOptions.SvgImage = CType(resources.GetObject("labelCriticalError.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.labelCriticalError.ItemAppearance.Normal.BackColor = System.Drawing.Color.White
|
||||
Me.labelCriticalError.ItemAppearance.Normal.ForeColor = DevExpress.LookAndFeel.DXSkinColors.ForeColors.Critical
|
||||
@@ -302,11 +217,9 @@ Partial Class frmDocumentResultList
|
||||
'
|
||||
'labelWarning
|
||||
'
|
||||
resources.ApplyResources(Me.labelWarning, "labelWarning")
|
||||
Me.labelWarning.Alignment = DevExpress.XtraBars.BarItemLinkAlignment.Right
|
||||
resources.ApplyResources(Me.labelWarning, "labelWarning")
|
||||
Me.labelWarning.Id = 15
|
||||
Me.labelWarning.ImageOptions.ImageIndex = CType(resources.GetObject("labelWarning.ImageOptions.ImageIndex"), Integer)
|
||||
Me.labelWarning.ImageOptions.LargeImageIndex = CType(resources.GetObject("labelWarning.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.labelWarning.ImageOptions.SvgImage = CType(resources.GetObject("labelWarning.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.labelWarning.ItemAppearance.Normal.BackColor = System.Drawing.Color.White
|
||||
Me.labelWarning.ItemAppearance.Normal.Options.UseBackColor = True
|
||||
@@ -314,6 +227,48 @@ Partial Class frmDocumentResultList
|
||||
Me.labelWarning.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph
|
||||
Me.labelWarning.Visibility = DevExpress.XtraBars.BarItemVisibility.OnlyInCustomizing
|
||||
'
|
||||
'MenuItemFileOpen
|
||||
'
|
||||
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.Name = "MenuItemFileOpen"
|
||||
'
|
||||
'MenuItemPropertiesIDB
|
||||
'
|
||||
resources.ApplyResources(Me.MenuItemPropertiesIDB, "MenuItemPropertiesIDB")
|
||||
Me.MenuItemPropertiesIDB.Id = 17
|
||||
Me.MenuItemPropertiesIDB.ImageOptions.SvgImage = CType(resources.GetObject("MenuItemPropertiesIDB.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.MenuItemPropertiesIDB.Name = "MenuItemPropertiesIDB"
|
||||
'
|
||||
'MenuItemFolderOpen
|
||||
'
|
||||
resources.ApplyResources(Me.MenuItemFolderOpen, "MenuItemFolderOpen")
|
||||
Me.MenuItemFolderOpen.Id = 18
|
||||
Me.MenuItemFolderOpen.ImageOptions.SvgImage = CType(resources.GetObject("MenuItemFolderOpen.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.MenuItemFolderOpen.Name = "MenuItemFolderOpen"
|
||||
'
|
||||
'MenuItemFilepathCopy
|
||||
'
|
||||
resources.ApplyResources(Me.MenuItemFilepathCopy, "MenuItemFilepathCopy")
|
||||
Me.MenuItemFilepathCopy.Id = 19
|
||||
Me.MenuItemFilepathCopy.ImageOptions.SvgImage = Global.DigitalData.GUIs.Common.My.Resources.Resources.copy
|
||||
Me.MenuItemFilepathCopy.Name = "MenuItemFilepathCopy"
|
||||
'
|
||||
'MenuItemFolderpathCopy
|
||||
'
|
||||
resources.ApplyResources(Me.MenuItemFolderpathCopy, "MenuItemFolderpathCopy")
|
||||
Me.MenuItemFolderpathCopy.Id = 20
|
||||
Me.MenuItemFolderpathCopy.ImageOptions.SvgImage = Global.DigitalData.GUIs.Common.My.Resources.Resources.open
|
||||
Me.MenuItemFolderpathCopy.Name = "MenuItemFolderpathCopy"
|
||||
'
|
||||
'MenuItemPropertiesECM
|
||||
'
|
||||
resources.ApplyResources(Me.MenuItemPropertiesECM, "MenuItemPropertiesECM")
|
||||
Me.MenuItemPropertiesECM.Id = 26
|
||||
Me.MenuItemPropertiesECM.ImageOptions.SvgImage = CType(resources.GetObject("MenuItemPropertiesECM.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.MenuItemPropertiesECM.Name = "MenuItemPropertiesECM"
|
||||
'
|
||||
'RibbonPage1
|
||||
'
|
||||
Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup_Navigation, Me.RibbonPageGroup_Layout, Me.RibbonPageGroup_Export})
|
||||
@@ -345,40 +300,28 @@ Partial Class frmDocumentResultList
|
||||
'
|
||||
'RibbonStatusBar
|
||||
'
|
||||
resources.ApplyResources(Me.RibbonStatusBar, "RibbonStatusBar")
|
||||
Me.RibbonStatusBar.ItemLinks.Add(Me.labelResultCount)
|
||||
Me.RibbonStatusBar.ItemLinks.Add(Me.labelCriticalError)
|
||||
Me.RibbonStatusBar.ItemLinks.Add(Me.labelWarning)
|
||||
resources.ApplyResources(Me.RibbonStatusBar, "RibbonStatusBar")
|
||||
Me.RibbonStatusBar.Name = "RibbonStatusBar"
|
||||
Me.RibbonStatusBar.Ribbon = Me.RibbonControl
|
||||
'
|
||||
'SplitContainerControl2
|
||||
'
|
||||
resources.ApplyResources(Me.SplitContainerControl2, "SplitContainerControl2")
|
||||
Me.SplitContainerControl2.CollapsePanel = DevExpress.XtraEditors.SplitCollapsePanel.Panel2
|
||||
resources.ApplyResources(Me.SplitContainerControl2, "SplitContainerControl2")
|
||||
Me.SplitContainerControl2.Horizontal = False
|
||||
Me.SplitContainerControl2.Name = "SplitContainerControl2"
|
||||
resources.ApplyResources(Me.SplitContainerControl2.Panel1, "SplitContainerControl2.Panel1")
|
||||
Me.SplitContainerControl2.Panel1.Controls.Add(Me.GridControl2)
|
||||
resources.ApplyResources(Me.SplitContainerControl2.Panel2, "SplitContainerControl2.Panel2")
|
||||
resources.ApplyResources(Me.SplitContainerControl2.Panel1, "SplitContainerControl2.Panel1")
|
||||
Me.SplitContainerControl2.Panel2.Controls.Add(Me.GridControl3)
|
||||
resources.ApplyResources(Me.SplitContainerControl2.Panel2, "SplitContainerControl2.Panel2")
|
||||
Me.SplitContainerControl2.SplitterPosition = 223
|
||||
'
|
||||
'GridControl2
|
||||
'
|
||||
resources.ApplyResources(Me.GridControl2, "GridControl2")
|
||||
Me.GridControl2.EmbeddedNavigator.AccessibleDescription = resources.GetString("GridControl2.EmbeddedNavigator.AccessibleDescription")
|
||||
Me.GridControl2.EmbeddedNavigator.AccessibleName = resources.GetString("GridControl2.EmbeddedNavigator.AccessibleName")
|
||||
Me.GridControl2.EmbeddedNavigator.AllowHtmlTextInToolTip = CType(resources.GetObject("GridControl2.EmbeddedNavigator.AllowHtmlTextInToolTip"), DevExpress.Utils.DefaultBoolean)
|
||||
Me.GridControl2.EmbeddedNavigator.Anchor = CType(resources.GetObject("GridControl2.EmbeddedNavigator.Anchor"), System.Windows.Forms.AnchorStyles)
|
||||
Me.GridControl2.EmbeddedNavigator.BackgroundImage = CType(resources.GetObject("GridControl2.EmbeddedNavigator.BackgroundImage"), System.Drawing.Image)
|
||||
Me.GridControl2.EmbeddedNavigator.BackgroundImageLayout = CType(resources.GetObject("GridControl2.EmbeddedNavigator.BackgroundImageLayout"), System.Windows.Forms.ImageLayout)
|
||||
Me.GridControl2.EmbeddedNavigator.ImeMode = CType(resources.GetObject("GridControl2.EmbeddedNavigator.ImeMode"), System.Windows.Forms.ImeMode)
|
||||
Me.GridControl2.EmbeddedNavigator.MaximumSize = CType(resources.GetObject("GridControl2.EmbeddedNavigator.MaximumSize"), System.Drawing.Size)
|
||||
Me.GridControl2.EmbeddedNavigator.TextLocation = CType(resources.GetObject("GridControl2.EmbeddedNavigator.TextLocation"), DevExpress.XtraEditors.NavigatorButtonsTextLocation)
|
||||
Me.GridControl2.EmbeddedNavigator.ToolTip = resources.GetString("GridControl2.EmbeddedNavigator.ToolTip")
|
||||
Me.GridControl2.EmbeddedNavigator.ToolTipIconType = CType(resources.GetObject("GridControl2.EmbeddedNavigator.ToolTipIconType"), DevExpress.Utils.ToolTipIconType)
|
||||
Me.GridControl2.EmbeddedNavigator.ToolTipTitle = resources.GetString("GridControl2.EmbeddedNavigator.ToolTipTitle")
|
||||
Me.GridControl2.MainView = Me.GridView2
|
||||
Me.GridControl2.MenuManager = Me.RibbonControl
|
||||
Me.GridControl2.Name = "GridControl2"
|
||||
@@ -389,7 +332,6 @@ Partial Class frmDocumentResultList
|
||||
Me.GridView2.Appearance.EvenRow.BackColor = System.Drawing.Color.Gainsboro
|
||||
Me.GridView2.Appearance.EvenRow.Options.UseBackColor = True
|
||||
Me.GridView2.Bands.AddRange(New DevExpress.XtraGrid.Views.BandedGrid.GridBand() {Me.GridBand2})
|
||||
resources.ApplyResources(Me.GridView2, "GridView2")
|
||||
Me.GridView2.GridControl = Me.GridControl2
|
||||
Me.GridView2.Name = "GridView2"
|
||||
Me.GridView2.OptionsView.EnableAppearanceEvenRow = True
|
||||
@@ -409,18 +351,6 @@ Partial Class frmDocumentResultList
|
||||
'GridControl3
|
||||
'
|
||||
resources.ApplyResources(Me.GridControl3, "GridControl3")
|
||||
Me.GridControl3.EmbeddedNavigator.AccessibleDescription = resources.GetString("GridControl3.EmbeddedNavigator.AccessibleDescription")
|
||||
Me.GridControl3.EmbeddedNavigator.AccessibleName = resources.GetString("GridControl3.EmbeddedNavigator.AccessibleName")
|
||||
Me.GridControl3.EmbeddedNavigator.AllowHtmlTextInToolTip = CType(resources.GetObject("GridControl3.EmbeddedNavigator.AllowHtmlTextInToolTip"), DevExpress.Utils.DefaultBoolean)
|
||||
Me.GridControl3.EmbeddedNavigator.Anchor = CType(resources.GetObject("GridControl3.EmbeddedNavigator.Anchor"), System.Windows.Forms.AnchorStyles)
|
||||
Me.GridControl3.EmbeddedNavigator.BackgroundImage = CType(resources.GetObject("GridControl3.EmbeddedNavigator.BackgroundImage"), System.Drawing.Image)
|
||||
Me.GridControl3.EmbeddedNavigator.BackgroundImageLayout = CType(resources.GetObject("GridControl3.EmbeddedNavigator.BackgroundImageLayout"), System.Windows.Forms.ImageLayout)
|
||||
Me.GridControl3.EmbeddedNavigator.ImeMode = CType(resources.GetObject("GridControl3.EmbeddedNavigator.ImeMode"), System.Windows.Forms.ImeMode)
|
||||
Me.GridControl3.EmbeddedNavigator.MaximumSize = CType(resources.GetObject("GridControl3.EmbeddedNavigator.MaximumSize"), System.Drawing.Size)
|
||||
Me.GridControl3.EmbeddedNavigator.TextLocation = CType(resources.GetObject("GridControl3.EmbeddedNavigator.TextLocation"), DevExpress.XtraEditors.NavigatorButtonsTextLocation)
|
||||
Me.GridControl3.EmbeddedNavigator.ToolTip = resources.GetString("GridControl3.EmbeddedNavigator.ToolTip")
|
||||
Me.GridControl3.EmbeddedNavigator.ToolTipIconType = CType(resources.GetObject("GridControl3.EmbeddedNavigator.ToolTipIconType"), DevExpress.Utils.ToolTipIconType)
|
||||
Me.GridControl3.EmbeddedNavigator.ToolTipTitle = resources.GetString("GridControl3.EmbeddedNavigator.ToolTipTitle")
|
||||
Me.GridControl3.MainView = Me.GridView3
|
||||
Me.GridControl3.MenuManager = Me.RibbonControl
|
||||
Me.GridControl3.Name = "GridControl3"
|
||||
@@ -431,7 +361,6 @@ Partial Class frmDocumentResultList
|
||||
Me.GridView3.Appearance.EvenRow.BackColor = System.Drawing.Color.Gainsboro
|
||||
Me.GridView3.Appearance.EvenRow.Options.UseBackColor = True
|
||||
Me.GridView3.Bands.AddRange(New DevExpress.XtraGrid.Views.BandedGrid.GridBand() {Me.GridBand3})
|
||||
resources.ApplyResources(Me.GridView3, "GridView3")
|
||||
Me.GridView3.GridControl = Me.GridControl3
|
||||
Me.GridView3.Name = "GridView3"
|
||||
Me.GridView3.OptionsView.EnableAppearanceEvenRow = True
|
||||
@@ -450,12 +379,13 @@ Partial Class frmDocumentResultList
|
||||
'
|
||||
'SplitContainerControl3
|
||||
'
|
||||
Me.SplitContainerControl3.BorderStyle = DevExpress.XtraEditors.Controls.BorderStyles.[Default]
|
||||
resources.ApplyResources(Me.SplitContainerControl3, "SplitContainerControl3")
|
||||
Me.SplitContainerControl3.Name = "SplitContainerControl3"
|
||||
resources.ApplyResources(Me.SplitContainerControl3.Panel1, "SplitContainerControl3.Panel1")
|
||||
Me.SplitContainerControl3.Panel1.Controls.Add(Me.SplitContainerControl1)
|
||||
resources.ApplyResources(Me.SplitContainerControl3.Panel2, "SplitContainerControl3.Panel2")
|
||||
resources.ApplyResources(Me.SplitContainerControl3.Panel1, "SplitContainerControl3.Panel1")
|
||||
Me.SplitContainerControl3.Panel2.Controls.Add(Me.DocumentViewer1)
|
||||
resources.ApplyResources(Me.SplitContainerControl3.Panel2, "SplitContainerControl3.Panel2")
|
||||
Me.SplitContainerControl3.SplitterPosition = 762
|
||||
'
|
||||
'DocumentViewer1
|
||||
@@ -466,13 +396,38 @@ Partial Class frmDocumentResultList
|
||||
'
|
||||
'XtraSaveFileDialog
|
||||
'
|
||||
resources.ApplyResources(Me.XtraSaveFileDialog, "XtraSaveFileDialog")
|
||||
Me.XtraSaveFileDialog.FileName = "XtraSaveFileDialog1"
|
||||
'
|
||||
'MenuFullAccess_IDB
|
||||
'
|
||||
Me.MenuFullAccess_IDB.ItemLinks.Add(Me.MenuItemFileOpen)
|
||||
Me.MenuFullAccess_IDB.ItemLinks.Add(Me.MenuItemFolderOpen)
|
||||
Me.MenuFullAccess_IDB.ItemLinks.Add(Me.MenuItemFilepathCopy)
|
||||
Me.MenuFullAccess_IDB.ItemLinks.Add(Me.MenuItemFolderpathCopy)
|
||||
Me.MenuFullAccess_IDB.ItemLinks.Add(Me.MenuItemPropertiesIDB)
|
||||
Me.MenuFullAccess_IDB.Name = "MenuFullAccess_IDB"
|
||||
Me.MenuFullAccess_IDB.Ribbon = Me.RibbonControl
|
||||
'
|
||||
'MenuViewAccess_IDB
|
||||
'
|
||||
Me.MenuViewAccess_IDB.ItemLinks.Add(Me.MenuItemPropertiesIDB)
|
||||
Me.MenuViewAccess_IDB.Name = "MenuViewAccess_IDB"
|
||||
Me.MenuViewAccess_IDB.Ribbon = Me.RibbonControl
|
||||
'
|
||||
'MenuFullAccess_EDM
|
||||
'
|
||||
Me.MenuFullAccess_EDM.ItemLinks.Add(Me.MenuItemFileOpen)
|
||||
Me.MenuFullAccess_EDM.ItemLinks.Add(Me.MenuItemFolderOpen)
|
||||
Me.MenuFullAccess_EDM.ItemLinks.Add(Me.MenuItemFilepathCopy)
|
||||
Me.MenuFullAccess_EDM.ItemLinks.Add(Me.MenuItemFolderpathCopy)
|
||||
Me.MenuFullAccess_EDM.ItemLinks.Add(Me.MenuItemPropertiesECM)
|
||||
Me.MenuFullAccess_EDM.Name = "MenuFullAccess_EDM"
|
||||
Me.MenuFullAccess_EDM.Ribbon = Me.RibbonControl
|
||||
'
|
||||
'frmDocumentResultList
|
||||
'
|
||||
resources.ApplyResources(Me, "$this")
|
||||
Me.AllowFormGlass = DevExpress.Utils.DefaultBoolean.[True]
|
||||
resources.ApplyResources(Me, "$this")
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.Controls.Add(Me.SplitContainerControl3)
|
||||
Me.Controls.Add(Me.RibbonStatusBar)
|
||||
@@ -497,6 +452,9 @@ Partial Class frmDocumentResultList
|
||||
CType(Me.GridView3, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
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()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
@@ -521,21 +479,25 @@ Partial Class frmDocumentResultList
|
||||
Friend WithEvents RibbonPageGroup_Export As DevExpress.XtraBars.Ribbon.RibbonPageGroup
|
||||
Friend WithEvents SplitContainerControl3 As DevExpress.XtraEditors.SplitContainerControl
|
||||
Friend WithEvents DocumentViewer1 As DigitalData.Controls.DocumentViewer.DocumentViewer
|
||||
Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
|
||||
Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem
|
||||
Friend WithEvents BarButtonItem3 As DevExpress.XtraBars.BarButtonItem
|
||||
Friend WithEvents BarStaticItem1 As DevExpress.XtraBars.BarStaticItem
|
||||
Friend WithEvents labelResultCount As DevExpress.XtraBars.BarStaticItem
|
||||
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 BarEditItem1 As DevExpress.XtraBars.BarEditItem
|
||||
Friend WithEvents RepositoryItemTextEdit1 As DevExpress.XtraEditors.Repository.RepositoryItemTextEdit
|
||||
Friend WithEvents BarEditItem2 As DevExpress.XtraBars.BarEditItem
|
||||
Friend WithEvents RepositoryItemTextEdit2 As DevExpress.XtraEditors.Repository.RepositoryItemTextEdit
|
||||
Friend WithEvents labelCriticalError As DevExpress.XtraBars.BarStaticItem
|
||||
Friend WithEvents labelWarning As DevExpress.XtraBars.BarStaticItem
|
||||
Friend WithEvents GridView1 As DevExpress.XtraGrid.Views.BandedGrid.BandedGridView
|
||||
Friend WithEvents GridBand1 As DevExpress.XtraGrid.Views.BandedGrid.GridBand
|
||||
Friend WithEvents MenuFullAccess_IDB As DevExpress.XtraBars.PopupMenu
|
||||
Friend WithEvents MenuItemFileOpen As DevExpress.XtraBars.BarButtonItem
|
||||
Friend WithEvents MenuItemPropertiesIDB As DevExpress.XtraBars.BarButtonItem
|
||||
Friend WithEvents MenuItemFolderOpen As DevExpress.XtraBars.BarButtonItem
|
||||
Friend WithEvents MenuItemFilepathCopy As DevExpress.XtraBars.BarButtonItem
|
||||
Friend WithEvents MenuItemFolderpathCopy As DevExpress.XtraBars.BarButtonItem
|
||||
Friend WithEvents MenuViewAccess_IDB As DevExpress.XtraBars.PopupMenu
|
||||
Friend WithEvents MenuFullAccess_EDM As DevExpress.XtraBars.PopupMenu
|
||||
Friend WithEvents MenuItemPropertiesECM As DevExpress.XtraBars.BarButtonItem
|
||||
End Class
|
||||
|
||||
@@ -339,6 +339,36 @@
|
||||
IkJsYWNrIiAvPg0KICA8L2c+DQo8L3N2Zz4L
|
||||
</value>
|
||||
</data>
|
||||
<data name="RibbonControl.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>1189, 132</value>
|
||||
</data>
|
||||
<data name="RibbonStatusBar.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>0, 647</value>
|
||||
</data>
|
||||
<data name="RibbonStatusBar.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>1189, 24</value>
|
||||
</data>
|
||||
<data name="GridControl1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>382, 515</value>
|
||||
</data>
|
||||
<data name="GridControl3.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>370, 282</value>
|
||||
</data>
|
||||
<data name="SplitContainerControl2.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>370, 515</value>
|
||||
</data>
|
||||
<data name="SplitContainerControl1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>762, 515</value>
|
||||
</data>
|
||||
<data name="SplitContainerControl3.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>0, 132</value>
|
||||
</data>
|
||||
<data name="DocumentViewer1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>417, 515</value>
|
||||
</data>
|
||||
<data name="SplitContainerControl3.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>1189, 515</value>
|
||||
</data>
|
||||
<data name="frmDocumentResultList.IconOptions.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
AAABAAMAEBAQAAEABAAoAQAANgAAABAQAAABAAgAaAUAAF4BAAAQEAAAAQAgAGgEAADGBgAAKAAAABAA
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
@@ -3,9 +3,11 @@ Imports System.Drawing
|
||||
Imports System.IO
|
||||
Imports System.Windows.Forms
|
||||
Imports DevExpress.Utils
|
||||
Imports DevExpress.XtraBars
|
||||
Imports DevExpress.XtraEditors
|
||||
Imports DevExpress.XtraGrid
|
||||
Imports DevExpress.XtraGrid.Columns
|
||||
Imports DevExpress.XtraGrid.Menu
|
||||
Imports DevExpress.XtraGrid.Views.BandedGrid
|
||||
Imports DevExpress.XtraGrid.Views.Base
|
||||
Imports DevExpress.XtraGrid.Views.Grid
|
||||
@@ -28,6 +30,13 @@ Public Class frmDocumentResultList
|
||||
Private COLUMN_DOCID As String = "DocID"
|
||||
Private COLUMN_ICON As String = "ICON"
|
||||
|
||||
' Constants
|
||||
Private Const OPEN_FILE As String = "Datei öffnen"
|
||||
Private Const OPEN_DIRECTORY As String = "Ordner öffnen"
|
||||
Private Const COPY_FILE_PATH As String = "Dateipfad kopieren"
|
||||
Private Const COPY_FOLDER_PATH As String = "Ordnerpfad kopieren"
|
||||
Private Const OPEN_PROPERTIES As String = "Eigenschaften"
|
||||
|
||||
Private Const FILE_OPEN_TIMER_INTERVAL As Integer = 500
|
||||
|
||||
' Helper Classes
|
||||
@@ -41,6 +50,7 @@ Public Class frmDocumentResultList
|
||||
Private _Helpers As DocumentResultList
|
||||
Private _Filesystem As DigitalData.Modules.Filesystem.File
|
||||
Private _GridBuilder As GridBuilder
|
||||
Private _File As Modules.Windows.File
|
||||
|
||||
' Runtime variables
|
||||
Private _IsLoading As Boolean = True
|
||||
@@ -54,6 +64,7 @@ Public Class frmDocumentResultList
|
||||
Private WithEvents _FileOpenTimer As New Timer
|
||||
Private _OpenDocuments As New DocumentResultCache(50000000)
|
||||
Private _CurrentDocument As DocumentResultInfo = Nothing
|
||||
Private _CurrentDocumentId As Long = Nothing
|
||||
Private _Language As String
|
||||
|
||||
Private Property OperationMode As IResultForm.Mode Implements IResultForm.OperationMode
|
||||
@@ -78,11 +89,8 @@ Public Class frmDocumentResultList
|
||||
_Filesystem = New Modules.Filesystem.File(_LogConfig)
|
||||
_GridBuilder = New GridBuilder(New List(Of GridView) From {GridView1, GridView2, GridView3})
|
||||
_Environment = Environment
|
||||
_Logger.Debug("DocumentResultlist: Environment loaded")
|
||||
_Params = Params
|
||||
_Logger.Debug("DocumentResultlist: Params loaded")
|
||||
_ResultLists = Params.Results
|
||||
_Logger.Debug("DocumentResultlist: Params.Results loaded")
|
||||
_Language = Utils.NotNull(_Environment.User.Language, State.UserState.LANG_EN_US)
|
||||
End Sub
|
||||
|
||||
@@ -582,7 +590,7 @@ Public Class frmDocumentResultList
|
||||
If _Config IsNot Nothing And _IsLoading = False Then
|
||||
_Config.Config.SplitContainer2Horizontal = SwitchDetailContainerHorizontal.Checked
|
||||
End If
|
||||
End Sub
|
||||
End Sub
|
||||
|
||||
Private Sub BarButtonItemExportGrid1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItemExportGrid1.ItemClick
|
||||
Dim oActiveGrid = GetActiveGridControl()
|
||||
@@ -707,8 +715,9 @@ Public Class frmDocumentResultList
|
||||
Private Sub OpenFile()
|
||||
Try
|
||||
If _CurrentDocument IsNot Nothing Then
|
||||
Dim oFilename = _CurrentDocument.FullPath
|
||||
DocumentPropertyMenu_FileOpened(Me, oFilename)
|
||||
Process.Start(New ProcessStartInfo With {
|
||||
.FileName = _CurrentDocument.FullPath
|
||||
})
|
||||
End If
|
||||
Catch ex As Exception
|
||||
_Logger.Error(ex)
|
||||
@@ -716,51 +725,51 @@ Public Class frmDocumentResultList
|
||||
End Sub
|
||||
|
||||
Private Sub CopyFileName()
|
||||
Try
|
||||
Dim oRow = GetActiveRow()
|
||||
Try
|
||||
Dim oRow = GetActiveRow()
|
||||
|
||||
If oRow IsNot Nothing Then
|
||||
Dim oFilename = _CurrentDocument.FullPath
|
||||
Clipboard.SetText(oFilename)
|
||||
End If
|
||||
Catch ex As Exception
|
||||
_Logger.Error(ex)
|
||||
End Try
|
||||
End Sub
|
||||
If oRow IsNot Nothing Then
|
||||
Dim oFilename = _CurrentDocument.FullPath
|
||||
Clipboard.SetText(oFilename)
|
||||
End If
|
||||
Catch ex As Exception
|
||||
_Logger.Error(ex)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub OpenProperties()
|
||||
Try
|
||||
Dim oRow = GetActiveRow()
|
||||
Private Sub OpenProperties()
|
||||
Try
|
||||
Dim oRow = GetActiveRow()
|
||||
|
||||
If oRow IsNot Nothing Then
|
||||
Dim oObjectId = oRow.Item(COLUMN_DOCID)
|
||||
Dim oPropertyDialog As New frmObjectPropertyDialog(_LogConfig, _Environment, _IDBClient, oObjectId)
|
||||
oPropertyDialog.Show()
|
||||
End If
|
||||
Catch ex As Exception
|
||||
_Logger.Error(ex)
|
||||
End Try
|
||||
End Sub
|
||||
If oRow IsNot Nothing Then
|
||||
Dim oObjectId = oRow.Item(COLUMN_DOCID)
|
||||
Dim oPropertyDialog As New frmObjectPropertyDialog(_LogConfig, _Environment, _IDBClient, oObjectId)
|
||||
oPropertyDialog.Show()
|
||||
End If
|
||||
Catch ex As Exception
|
||||
_Logger.Error(ex)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub GridView1_ColumnFilterChanged(sender As GridView, e As EventArgs) Handles GridView1.ColumnFilterChanged
|
||||
Dim oRowCount = sender.RowCount
|
||||
UpdateGridHeader(_ResultLists, 0, oRowCount)
|
||||
End Sub
|
||||
Private Sub GridView1_ColumnFilterChanged(sender As GridView, e As EventArgs) Handles GridView1.ColumnFilterChanged
|
||||
Dim oRowCount = sender.RowCount
|
||||
UpdateGridHeader(_ResultLists, 0, oRowCount)
|
||||
End Sub
|
||||
|
||||
Private Sub GridView2_ColumnFilterChanged(sender As GridView, e As EventArgs) Handles GridView2.ColumnFilterChanged
|
||||
Dim oRowCount = sender.RowCount
|
||||
UpdateGridHeader(_ResultLists, 1, oRowCount)
|
||||
End Sub
|
||||
Private Sub GridView2_ColumnFilterChanged(sender As GridView, e As EventArgs) Handles GridView2.ColumnFilterChanged
|
||||
Dim oRowCount = sender.RowCount
|
||||
UpdateGridHeader(_ResultLists, 1, oRowCount)
|
||||
End Sub
|
||||
|
||||
Private Sub GridView3_ColumnFilterChanged(sender As GridView, e As EventArgs) Handles GridView3.ColumnFilterChanged
|
||||
Dim oRowCount = sender.RowCount
|
||||
UpdateGridHeader(_ResultLists, 2, oRowCount)
|
||||
End Sub
|
||||
Private Sub GridView3_ColumnFilterChanged(sender As GridView, e As EventArgs) Handles GridView3.ColumnFilterChanged
|
||||
Dim oRowCount = sender.RowCount
|
||||
UpdateGridHeader(_ResultLists, 2, oRowCount)
|
||||
End Sub
|
||||
|
||||
Private Sub BarButtonItem4_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonBack.ItemClick
|
||||
ShouldReturnToPreviousForm = True
|
||||
Close()
|
||||
End Sub
|
||||
Private Sub BarButtonItem4_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonBack.ItemClick
|
||||
ShouldReturnToPreviousForm = True
|
||||
Close()
|
||||
End Sub
|
||||
|
||||
Private Sub frmDocumentResultList_Closing(sender As Object, e As CancelEventArgs) Handles Me.FormClosing
|
||||
Try
|
||||
@@ -777,48 +786,15 @@ Public Class frmDocumentResultList
|
||||
End Sub
|
||||
|
||||
Private Sub GridControl_DoubleClick(sender As Object, e As EventArgs) Handles GridControl1.DoubleClick, GridControl2.DoubleClick, GridControl3.DoubleClick
|
||||
If _CurrentDocument IsNot Nothing AndAlso _CurrentDocument.AccessRight > Rights.AccessRight.VIEW_ONLY Then
|
||||
OpenFile()
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub GridView_PopupMenuShowing(sender As Object, e As PopupMenuShowingEventArgs) _
|
||||
Handles GridView2.PopupMenuShowing, GridView3.PopupMenuShowing, GridView1.PopupMenuShowing
|
||||
Try
|
||||
Dim oView As GridView = sender
|
||||
|
||||
If e.MenuType = GridMenuType.Row Then
|
||||
Dim oRowHandle = e.HitInfo.RowHandle
|
||||
Dim oRow As DataRow = oView.GetDataRow(oRowHandle)
|
||||
Dim oFilepath As String = _CurrentDocument.FullPath
|
||||
Dim oObjectId As Long = oRow.Item(COLUMN_DOCID)
|
||||
Dim oMenu As New DocumentPropertyMenu(_LogConfig, _Environment, _IDBClient, oFilepath, oObjectId)
|
||||
|
||||
e.Menu.Items.Clear()
|
||||
|
||||
For Each oItem In oMenu.GetMenuItems(OperationMode, _CurrentDocument.AccessRight)
|
||||
e.Menu.Items.Add(oItem)
|
||||
Next
|
||||
|
||||
AddHandler oMenu.FileOpened, AddressOf DocumentPropertyMenu_FileOpened
|
||||
' AddHandler oMenu.FileClosed, AddressOf DocumentPropertyMenu_FileClosed
|
||||
End If
|
||||
Catch ex As Exception
|
||||
_Logger.Error(ex)
|
||||
MsgBox("Unexpected Error while preparing context menu", MsgBoxStyle.Critical, Text)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Public Sub DocumentPropertyMenu_FileOpened(sender As Object, FilePath As String)
|
||||
Dim oProcess = Process.Start(New ProcessStartInfo With {
|
||||
.FileName = FilePath
|
||||
})
|
||||
If _CurrentDocument IsNot Nothing AndAlso _CurrentDocument.AccessRight > Rights.AccessRight.VIEW_ONLY Then
|
||||
OpenFile()
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Public Sub Show_CriticalError(Message As String)
|
||||
labelCriticalError.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
|
||||
labelCriticalError.Caption = Message
|
||||
End Sub
|
||||
labelCriticalError.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
|
||||
labelCriticalError.Caption = Message
|
||||
End Sub
|
||||
|
||||
Public Sub Show_Warning(Message As String)
|
||||
labelWarning.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
|
||||
@@ -844,8 +820,6 @@ Public Class frmDocumentResultList
|
||||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Private _DragBoxFromMouseDown As Rectangle
|
||||
Private _ScreenOffset As Point
|
||||
|
||||
@@ -885,4 +859,109 @@ Public Class frmDocumentResultList
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub GridView_PopupMenuShowing(sender As Object, e As PopupMenuShowingEventArgs) _
|
||||
Handles GridView2.PopupMenuShowing, GridView3.PopupMenuShowing, GridView1.PopupMenuShowing
|
||||
Try
|
||||
Dim oView As GridView = sender
|
||||
|
||||
If e.MenuType = GridMenuType.Row Then
|
||||
Dim oRowHandle = e.HitInfo.RowHandle
|
||||
Dim oRow As DataRow = oView.GetDataRow(oRowHandle)
|
||||
Dim oObjectId As Long = oRow.Item(COLUMN_DOCID)
|
||||
Dim oPoint As Point = oView.GridControl.PointToScreen(e.HitInfo.HitPoint)
|
||||
Dim oRight As Rights.AccessRight = _CurrentDocument.AccessRight
|
||||
|
||||
_CurrentDocumentId = oObjectId
|
||||
|
||||
If OperationMode = IResultForm.Mode.WithAppServer Then
|
||||
If oRight = Rights.AccessRight.FULL Or oRight = Rights.AccessRight.VIEW_EXPORT Then
|
||||
MenuFullAccess_IDB.ShowPopup(oPoint)
|
||||
Else
|
||||
MenuViewAccess_IDB.ShowPopup(oPoint)
|
||||
End If
|
||||
|
||||
Else
|
||||
MenuFullAccess_EDM.ShowPopup(oPoint)
|
||||
End If
|
||||
Else
|
||||
_CurrentDocumentId = Nothing
|
||||
End If
|
||||
Catch ex As Exception
|
||||
_Logger.Error(ex)
|
||||
MsgBox("Unexpected Error while preparing context menu", MsgBoxStyle.Critical, Text)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Function TestPathExists(pTitle As String) As Boolean
|
||||
If IO.File.Exists(_CurrentDocument.FullPath) = False Then
|
||||
MessageBox.Show($"Datei {_CurrentDocument.FullPath} existiert nicht oder wurde verschoben!", pTitle, MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
|
||||
Return False
|
||||
Else
|
||||
Return True
|
||||
End If
|
||||
End Function
|
||||
|
||||
Private Function TestObjectIdExists(pObjectId As Long, pTitle As String) As Boolean
|
||||
If pObjectId = 0 Then
|
||||
MessageBox.Show($"Objekt {pObjectId} existiert nicht oder wurde verschoben!", pTitle, MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
|
||||
Return False
|
||||
Else
|
||||
Return True
|
||||
End If
|
||||
End Function
|
||||
|
||||
Private Sub MenuItemPropertiesIDB_ItemClick(sender As Object, e As ItemClickEventArgs) Handles MenuItemPropertiesIDB.ItemClick
|
||||
If TestObjectIdExists(_CurrentDocumentId, OPEN_PROPERTIES) = False Then
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Dim oPropertyDialog As New frmObjectPropertyDialog(_LogConfig, _Environment, _IDBClient, _CurrentDocumentId)
|
||||
oPropertyDialog.Show()
|
||||
End Sub
|
||||
|
||||
Private Sub MenuItemPropertiesECM_ItemClick(sender As Object, e As ItemClickEventArgs) Handles MenuItemPropertiesECM.ItemClick
|
||||
If TestPathExists(OPEN_PROPERTIES) = False Then
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
_File.OpenFileProperties(_CurrentDocument.FullPath)
|
||||
End Sub
|
||||
|
||||
Private Sub MenuItemFileOpen_ItemClick(sender As Object, e As ItemClickEventArgs) Handles MenuItemFileOpen.ItemClick
|
||||
If TestPathExists(OPEN_FILE) = False Then
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Try
|
||||
Process.Start(New ProcessStartInfo With {
|
||||
.FileName = _CurrentDocument.FullPath
|
||||
})
|
||||
Catch ex As Exception
|
||||
_Logger.Error(ex)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub MenuItemFolderOpen_ItemClick(sender As Object, e As ItemClickEventArgs) Handles MenuItemFolderOpen.ItemClick
|
||||
If TestPathExists(OPEN_DIRECTORY) = False Then
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Dim oArgs As String = $"/e, /select, ""{_CurrentDocument.FullPath}"""
|
||||
Dim oInfo As New ProcessStartInfo() With {
|
||||
.Arguments = oArgs,
|
||||
.FileName = "explorer"
|
||||
}
|
||||
|
||||
Process.Start(oInfo)
|
||||
End Sub
|
||||
|
||||
Private Sub MenuItemFilepathCopyIDB_ItemClick(sender As Object, e As ItemClickEventArgs) Handles MenuItemFilepathCopy.ItemClick
|
||||
Clipboard.SetText(_CurrentDocument.FullPath)
|
||||
End Sub
|
||||
|
||||
Private Sub MenuItemFolderpathCopyECM_ItemClick(sender As Object, e As ItemClickEventArgs) Handles MenuItemFolderpathCopy.ItemClick
|
||||
Dim oFolderPath = IO.Path.GetDirectoryName(_CurrentDocument.FullPath)
|
||||
Clipboard.SetText(oFolderPath)
|
||||
End Sub
|
||||
End Class
|
||||
Reference in New Issue
Block a user