ms search1

2020-09-02 08:30:17 +02:00
parent 60dcea6569
commit b34c66c93f
4 changed files with 89 additions and 19 deletions
--- a/GUIs.ZooFlow/frmSearchStart.Designer.vb
+++ b/GUIs.ZooFlow/frmSearchStart.Designer.vb
@@ -41,7 +41,6 @@ Partial Class frmSearchStart
        Me.WindowsUIButtonPanel1 = New DevExpress.XtraBars.Docking2010.WindowsUIButtonPanel()
        Me.XtraTabControl1 = New DevExpress.XtraTab.XtraTabControl()
        Me.XtraTabPage1 = New DevExpress.XtraTab.XtraTabPage()
-        Me.TokenEdit1 = New DevExpress.XtraEditors.TokenEdit()
        Me.XtraTabPage2 = New DevExpress.XtraTab.XtraTabPage()
        Me.XtraTabPage3 = New DevExpress.XtraTab.XtraTabPage()
        Me.XtraTabPage4 = New DevExpress.XtraTab.XtraTabPage()
@@ -51,12 +50,20 @@ Partial Class frmSearchStart
        Me.XtraTabPage8 = New DevExpress.XtraTab.XtraTabPage()
        Me.XtraTabPage9 = New DevExpress.XtraTab.XtraTabPage()
        Me.XtraTabPage10 = New DevExpress.XtraTab.XtraTabPage()
+        Me.TokenEdit1 = New DevExpress.XtraEditors.TokenEdit()
+        Me.GridControlSerchTerms = New DevExpress.XtraGrid.GridControl()
+        Me.GridViewSearchTerms = New DevExpress.XtraGrid.Views.Grid.GridView()
+        Me.SplitContainerControlSearch = New DevExpress.XtraEditors.SplitContainerControl()
        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.RepositoryItemRadioGroup1, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.Panel1.SuspendLayout()
        CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.XtraTabControl1.SuspendLayout()
        CType(Me.TokenEdit1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.GridControlSerchTerms, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.GridViewSearchTerms, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.SplitContainerControlSearch, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SplitContainerControlSearch.SuspendLayout()
        Me.SuspendLayout()
        '
        'RibbonControl1
@@ -192,32 +199,19 @@ Partial Class frmSearchStart
        '
        Me.XtraTabControl1.Dock = System.Windows.Forms.DockStyle.Fill
        Me.XtraTabControl1.HeaderLocation = DevExpress.XtraTab.TabHeaderLocation.Bottom
-        Me.XtraTabControl1.Location = New System.Drawing.Point(0, 207)
+        Me.XtraTabControl1.Location = New System.Drawing.Point(0, 0)
        Me.XtraTabControl1.Name = "XtraTabControl1"
        Me.XtraTabControl1.SelectedTabPage = Me.XtraTabPage1
-        Me.XtraTabControl1.Size = New System.Drawing.Size(874, 299)
+        Me.XtraTabControl1.Size = New System.Drawing.Size(449, 299)
        Me.XtraTabControl1.TabIndex = 12
        Me.XtraTabControl1.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPage1, Me.XtraTabPage2, Me.XtraTabPage3, Me.XtraTabPage4, Me.XtraTabPage5, Me.XtraTabPage6, Me.XtraTabPage7, Me.XtraTabPage8, Me.XtraTabPage9, Me.XtraTabPage10})
        '
        'XtraTabPage1
        '
        Me.XtraTabPage1.Name = "XtraTabPage1"
-        Me.XtraTabPage1.Size = New System.Drawing.Size(872, 274)
+        Me.XtraTabPage1.Size = New System.Drawing.Size(447, 274)
        Me.XtraTabPage1.Text = "Search#1"
        '
-        'TokenEdit1
-        '
-        Me.TokenEdit1.Location = New System.Drawing.Point(191, 60)
-        Me.TokenEdit1.MenuManager = Me.RibbonControl1
-        Me.TokenEdit1.Name = "TokenEdit1"
-        Me.TokenEdit1.Properties.Appearance.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.TokenEdit1.Properties.Appearance.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.TokenEdit1.Properties.Appearance.Options.UseBackColor = True
-        Me.TokenEdit1.Properties.Appearance.Options.UseFont = True
-        Me.TokenEdit1.Properties.Separators.AddRange(New String() {","})
-        Me.TokenEdit1.Size = New System.Drawing.Size(683, 22)
-        Me.TokenEdit1.TabIndex = 0
-        '
        'XtraTabPage2
        '
        Me.XtraTabPage2.Name = "XtraTabPage2"
@@ -272,13 +266,56 @@ Partial Class frmSearchStart
        Me.XtraTabPage10.Size = New System.Drawing.Size(872, 274)
        Me.XtraTabPage10.Text = "Search#10"
        '
+        'TokenEdit1
+        '
+        Me.TokenEdit1.Location = New System.Drawing.Point(191, 60)
+        Me.TokenEdit1.MenuManager = Me.RibbonControl1
+        Me.TokenEdit1.Name = "TokenEdit1"
+        Me.TokenEdit1.Properties.Appearance.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.TokenEdit1.Properties.Appearance.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.TokenEdit1.Properties.Appearance.Options.UseBackColor = True
+        Me.TokenEdit1.Properties.Appearance.Options.UseFont = True
+        Me.TokenEdit1.Properties.Separators.AddRange(New String() {","})
+        Me.TokenEdit1.Size = New System.Drawing.Size(683, 22)
+        Me.TokenEdit1.TabIndex = 0
+        '
+        'GridControlSerchTerms
+        '
+        Me.GridControlSerchTerms.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.GridControlSerchTerms.Location = New System.Drawing.Point(0, 0)
+        Me.GridControlSerchTerms.MainView = Me.GridViewSearchTerms
+        Me.GridControlSerchTerms.MenuManager = Me.RibbonControl1
+        Me.GridControlSerchTerms.Name = "GridControlSerchTerms"
+        Me.GridControlSerchTerms.Size = New System.Drawing.Size(415, 299)
+        Me.GridControlSerchTerms.TabIndex = 15
+        Me.GridControlSerchTerms.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewSearchTerms})
+        '
+        'GridViewSearchTerms
+        '
+        Me.GridViewSearchTerms.GridControl = Me.GridControlSerchTerms
+        Me.GridViewSearchTerms.Name = "GridViewSearchTerms"
+        '
+        'SplitContainerControlSearch
+        '
+        Me.SplitContainerControlSearch.CollapsePanel = DevExpress.XtraEditors.SplitCollapsePanel.Panel2
+        Me.SplitContainerControlSearch.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.SplitContainerControlSearch.Location = New System.Drawing.Point(0, 207)
+        Me.SplitContainerControlSearch.Name = "SplitContainerControlSearch"
+        Me.SplitContainerControlSearch.Panel1.Controls.Add(Me.XtraTabControl1)
+        Me.SplitContainerControlSearch.Panel1.Text = "Panel1"
+        Me.SplitContainerControlSearch.Panel2.Controls.Add(Me.GridControlSerchTerms)
+        Me.SplitContainerControlSearch.Panel2.Text = "Panel2"
+        Me.SplitContainerControlSearch.Size = New System.Drawing.Size(874, 299)
+        Me.SplitContainerControlSearch.SplitterPosition = 449
+        Me.SplitContainerControlSearch.TabIndex = 16
+        '
        'frmSearchStart
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.ClientSize = New System.Drawing.Size(874, 601)
+        Me.Controls.Add(Me.SplitContainerControlSearch)
        Me.Controls.Add(Me.TokenEdit1)
-        Me.Controls.Add(Me.XtraTabControl1)
        Me.Controls.Add(Me.WindowsUIButtonPanel1)
        Me.Controls.Add(Me.Panel1)
        Me.Controls.Add(Me.RibbonStatusBar1)
@@ -295,6 +332,10 @@ Partial Class frmSearchStart
        CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).EndInit()
        Me.XtraTabControl1.ResumeLayout(False)
        CType(Me.TokenEdit1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.GridControlSerchTerms, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.GridViewSearchTerms, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.SplitContainerControlSearch, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.SplitContainerControlSearch.ResumeLayout(False)
        Me.ResumeLayout(False)
        Me.PerformLayout()

@@ -327,4 +368,7 @@ Partial Class frmSearchStart
    Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
    Friend WithEvents TokenEdit1 As DevExpress.XtraEditors.TokenEdit
    Friend WithEvents BarButtonItem3 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents GridControlSerchTerms As DevExpress.XtraGrid.GridControl
+    Friend WithEvents GridViewSearchTerms As DevExpress.XtraGrid.Views.Grid.GridView
+    Friend WithEvents SplitContainerControlSearch As DevExpress.XtraEditors.SplitContainerControl
 End Class