Replace Profile Combobox with SearchLookupEdit

2022-01-19 14:33:16 +01:00
parent 8227971743
commit ea3f898172
2 changed files with 89 additions and 62 deletions
--- a/Global_Indexer/frmIndex.designer.vb
+++ b/Global_Indexer/frmIndex.designer.vb
@@ -31,7 +31,8 @@ Partial Class frmIndex
        Dim SerializableAppearanceObject4 As DevExpress.Utils.SerializableAppearanceObject = New DevExpress.Utils.SerializableAppearanceObject()
        Me.SplitContainer1 = New System.Windows.Forms.SplitContainer()
        Me.pnlIndex = New System.Windows.Forms.Panel()
-        Me.ComboboxDoctype = New DevExpress.XtraEditors.ComboBoxEdit()
+        Me.Panel2 = New System.Windows.Forms.Panel()
+        Me.checkMultiindex = New DevExpress.XtraEditors.CheckEdit()
        Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
        Me.BarToggleSwitchItem1 = New DevExpress.XtraBars.BarToggleSwitchItem()
        Me.BarToggleSwitchItem2 = New DevExpress.XtraBars.BarToggleSwitchItem()
@@ -51,9 +52,10 @@ Partial Class frmIndex
        Me.RibbonPageGroup3 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
        Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
        Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
-        Me.Panel2 = New System.Windows.Forms.Panel()
-        Me.checkMultiindex = New DevExpress.XtraEditors.CheckEdit()
        Me.btnOK = New DevExpress.XtraEditors.SimpleButton()
+        Me.ComboboxDoctype = New DevExpress.XtraEditors.SearchLookUpEdit()
+        Me.SearchLookUpEdit1View = New DevExpress.XtraGrid.Views.Grid.GridView()
+        Me.colName = New DevExpress.XtraGrid.Columns.GridColumn()
        Me.DocumentViewer1 = New DigitalData.Controls.DocumentViewer.DocumentViewer()
        Me.MyDataset = New Global_Indexer.MyDataset()
        Me.VWDDINDEX_MANBindingSource = New System.Windows.Forms.BindingSource(Me.components)
@@ -68,10 +70,11 @@ Partial Class frmIndex
        Me.SplitContainer1.Panel1.SuspendLayout()
        Me.SplitContainer1.Panel2.SuspendLayout()
        Me.SplitContainer1.SuspendLayout()
-        CType(Me.ComboboxDoctype.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
-        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.Panel2.SuspendLayout()
        CType(Me.checkMultiindex.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.ComboboxDoctype.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.SearchLookUpEdit1View, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.MyDataset, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.VWDDINDEX_MANBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.VWINDEX_AUTOMBindingSource1, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -87,8 +90,8 @@ Partial Class frmIndex
        'SplitContainer1.Panel1
        '
        Me.SplitContainer1.Panel1.Controls.Add(Me.pnlIndex)
-        Me.SplitContainer1.Panel1.Controls.Add(Me.ComboboxDoctype)
        Me.SplitContainer1.Panel1.Controls.Add(Me.Panel2)
+        Me.SplitContainer1.Panel1.Controls.Add(Me.ComboboxDoctype)
        '
        'SplitContainer1.Panel2
        '
@@ -100,17 +103,26 @@ Partial Class frmIndex
        Me.pnlIndex.BackColor = System.Drawing.SystemColors.ControlLight
        Me.pnlIndex.Name = "pnlIndex"
        '
-        'ComboboxDoctype
+        'Panel2
        '
-        resources.ApplyResources(Me.ComboboxDoctype, "ComboboxDoctype")
-        Me.ComboboxDoctype.MenuManager = Me.RibbonControl1
-        Me.ComboboxDoctype.Name = "ComboboxDoctype"
-        SerializableAppearanceObject1.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(214, Byte), Integer), CType(CType(49, Byte), Integer))
-        SerializableAppearanceObject1.Options.UseBackColor = True
-        Me.ComboboxDoctype.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(CType(resources.GetObject("ComboboxDoctype.Properties.Buttons"), DevExpress.XtraEditors.Controls.ButtonPredefines), resources.GetString("ComboboxDoctype.Properties.Buttons1"), CType(resources.GetObject("ComboboxDoctype.Properties.Buttons2"), Integer), CType(resources.GetObject("ComboboxDoctype.Properties.Buttons3"), Boolean), CType(resources.GetObject("ComboboxDoctype.Properties.Buttons4"), Boolean), CType(resources.GetObject("ComboboxDoctype.Properties.Buttons5"), Boolean), EditorButtonImageOptions1, New DevExpress.Utils.KeyShortcut(System.Windows.Forms.Keys.None), SerializableAppearanceObject1, SerializableAppearanceObject2, SerializableAppearanceObject3, SerializableAppearanceObject4, resources.GetString("ComboboxDoctype.Properties.Buttons6"), CType(resources.GetObject("ComboboxDoctype.Properties.Buttons7"), Object), CType(resources.GetObject("ComboboxDoctype.Properties.Buttons8"), DevExpress.Utils.SuperToolTip), CType(resources.GetObject("ComboboxDoctype.Properties.Buttons9"), DevExpress.Utils.ToolTipAnchor))})
-        Me.ComboboxDoctype.Properties.ButtonsStyle = DevExpress.XtraEditors.Controls.BorderStyles.UltraFlat
-        Me.ComboboxDoctype.Properties.NullText = resources.GetString("ComboboxDoctype.Properties.NullText")
-        Me.ComboboxDoctype.Properties.Padding = New System.Windows.Forms.Padding(5)
+        Me.Panel2.BackColor = System.Drawing.Color.Transparent
+        Me.Panel2.Controls.Add(Me.checkMultiindex)
+        Me.Panel2.Controls.Add(Me.btnOK)
+        resources.ApplyResources(Me.Panel2, "Panel2")
+        Me.Panel2.Name = "Panel2"
+        '
+        'checkMultiindex
+        '
+        resources.ApplyResources(Me.checkMultiindex, "checkMultiindex")
+        Me.checkMultiindex.MenuManager = Me.RibbonControl1
+        Me.checkMultiindex.Name = "checkMultiindex"
+        Me.checkMultiindex.Properties.Appearance.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(214, Byte), Integer), CType(CType(49, Byte), Integer))
+        Me.checkMultiindex.Properties.Appearance.Font = CType(resources.GetObject("checkMultiindex.Properties.Appearance.Font"), System.Drawing.Font)
+        Me.checkMultiindex.Properties.Appearance.ForeColor = System.Drawing.Color.DarkRed
+        Me.checkMultiindex.Properties.Appearance.Options.UseBackColor = True
+        Me.checkMultiindex.Properties.Appearance.Options.UseFont = True
+        Me.checkMultiindex.Properties.Appearance.Options.UseForeColor = True
+        Me.checkMultiindex.Properties.Caption = resources.GetString("checkMultiindex.Properties.Caption")
        '
        'RibbonControl1
        '
@@ -253,27 +265,6 @@ Partial Class frmIndex
        Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
        Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
        '
-        'Panel2
-        '
-        Me.Panel2.BackColor = System.Drawing.Color.Transparent
-        Me.Panel2.Controls.Add(Me.checkMultiindex)
-        Me.Panel2.Controls.Add(Me.btnOK)
-        resources.ApplyResources(Me.Panel2, "Panel2")
-        Me.Panel2.Name = "Panel2"
-        '
-        'checkMultiindex
-        '
-        resources.ApplyResources(Me.checkMultiindex, "checkMultiindex")
-        Me.checkMultiindex.MenuManager = Me.RibbonControl1
-        Me.checkMultiindex.Name = "checkMultiindex"
-        Me.checkMultiindex.Properties.Appearance.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(214, Byte), Integer), CType(CType(49, Byte), Integer))
-        Me.checkMultiindex.Properties.Appearance.Font = CType(resources.GetObject("checkMultiindex.Properties.Appearance.Font"), System.Drawing.Font)
-        Me.checkMultiindex.Properties.Appearance.ForeColor = System.Drawing.Color.DarkRed
-        Me.checkMultiindex.Properties.Appearance.Options.UseBackColor = True
-        Me.checkMultiindex.Properties.Appearance.Options.UseFont = True
-        Me.checkMultiindex.Properties.Appearance.Options.UseForeColor = True
-        Me.checkMultiindex.Properties.Caption = resources.GetString("checkMultiindex.Properties.Caption")
-        '
        'btnOK
        '
        resources.ApplyResources(Me.btnOK, "btnOK")
@@ -282,6 +273,37 @@ Partial Class frmIndex
        Me.btnOK.ImageOptions.SvgImage = CType(resources.GetObject("btnOK.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
        Me.btnOK.Name = "btnOK"
        '
+        'ComboboxDoctype
+        '
+        resources.ApplyResources(Me.ComboboxDoctype, "ComboboxDoctype")
+        Me.ComboboxDoctype.MenuManager = Me.RibbonControl1
+        Me.ComboboxDoctype.Name = "ComboboxDoctype"
+        SerializableAppearanceObject1.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(214, Byte), Integer), CType(CType(49, Byte), Integer))
+        SerializableAppearanceObject1.Options.UseBackColor = True
+        Me.ComboboxDoctype.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(CType(resources.GetObject("ComboboxDoctype.Properties.Buttons"), DevExpress.XtraEditors.Controls.ButtonPredefines), resources.GetString("ComboboxDoctype.Properties.Buttons1"), CType(resources.GetObject("ComboboxDoctype.Properties.Buttons2"), Integer), CType(resources.GetObject("ComboboxDoctype.Properties.Buttons3"), Boolean), CType(resources.GetObject("ComboboxDoctype.Properties.Buttons4"), Boolean), CType(resources.GetObject("ComboboxDoctype.Properties.Buttons5"), Boolean), EditorButtonImageOptions1, New DevExpress.Utils.KeyShortcut(System.Windows.Forms.Keys.None), SerializableAppearanceObject1, SerializableAppearanceObject2, SerializableAppearanceObject3, SerializableAppearanceObject4, resources.GetString("ComboboxDoctype.Properties.Buttons6"), CType(resources.GetObject("ComboboxDoctype.Properties.Buttons7"), Object), CType(resources.GetObject("ComboboxDoctype.Properties.Buttons8"), DevExpress.Utils.SuperToolTip), CType(resources.GetObject("ComboboxDoctype.Properties.Buttons9"), DevExpress.Utils.ToolTipAnchor))})
+        Me.ComboboxDoctype.Properties.ButtonsStyle = DevExpress.XtraEditors.Controls.BorderStyles.UltraFlat
+        Me.ComboboxDoctype.Properties.NullText = resources.GetString("ComboboxDoctype.Properties.NullText")
+        Me.ComboboxDoctype.Properties.Padding = New System.Windows.Forms.Padding(5)
+        Me.ComboboxDoctype.Properties.PopupSizeable = False
+        Me.ComboboxDoctype.Properties.PopupView = Me.SearchLookUpEdit1View
+        Me.ComboboxDoctype.Properties.ShowClearButton = False
+        '
+        'SearchLookUpEdit1View
+        '
+        Me.SearchLookUpEdit1View.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colName})
+        Me.SearchLookUpEdit1View.FocusRectStyle = DevExpress.XtraGrid.Views.Grid.DrawFocusRectStyle.RowFocus
+        Me.SearchLookUpEdit1View.Name = "SearchLookUpEdit1View"
+        Me.SearchLookUpEdit1View.OptionsSelection.EnableAppearanceFocusedCell = False
+        Me.SearchLookUpEdit1View.OptionsView.ShowFilterPanelMode = DevExpress.XtraGrid.Views.Base.ShowFilterPanelMode.Never
+        Me.SearchLookUpEdit1View.OptionsView.ShowGroupPanel = False
+        Me.SearchLookUpEdit1View.OptionsView.ShowIndicator = False
+        '
+        'colName
+        '
+        resources.ApplyResources(Me.colName, "colName")
+        Me.colName.FieldName = "Name"
+        Me.colName.Name = "colName"
+        '
        'DocumentViewer1
        '
        resources.ApplyResources(Me.DocumentViewer1, "DocumentViewer1")
@@ -349,10 +371,11 @@ Partial Class frmIndex
        Me.SplitContainer1.Panel2.ResumeLayout(False)
        CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).EndInit()
        Me.SplitContainer1.ResumeLayout(False)
-        CType(Me.ComboboxDoctype.Properties, System.ComponentModel.ISupportInitialize).EndInit()
-        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
        Me.Panel2.ResumeLayout(False)
        CType(Me.checkMultiindex.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.ComboboxDoctype.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.SearchLookUpEdit1View, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.MyDataset, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.VWDDINDEX_MANBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.VWINDEX_AUTOMBindingSource1, System.ComponentModel.ISupportInitialize).EndInit()
@@ -403,5 +426,7 @@ Partial Class frmIndex
    Friend WithEvents btnOK As DevExpress.XtraEditors.SimpleButton
    Friend WithEvents checkMultiindex As DevExpress.XtraEditors.CheckEdit
    Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
-    Friend WithEvents ComboboxDoctype As DevExpress.XtraEditors.ComboBoxEdit
+    Friend WithEvents ComboboxDoctype As DevExpress.XtraEditors.SearchLookUpEdit
+    Friend WithEvents SearchLookUpEdit1View As DevExpress.XtraGrid.Views.Grid.GridView
+    Friend WithEvents colName As DevExpress.XtraGrid.Columns.GridColumn
 End Class