Projektdateien hinzufügen.

GUIs.ZooFlow/Search/Old/frmFlowSearch.Designer.vb

@@ -0,0 +1,526 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
+Partial Class frmFlowSearch
+    Inherits DevExpress.XtraBars.Ribbon.RibbonForm
+
+    'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
+    <System.Diagnostics.DebuggerNonUserCode()>
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        Try
+            If disposing AndAlso components IsNot Nothing Then
+                components.Dispose()
+            End If
+        Finally
+            MyBase.Dispose(disposing)
+        End Try
+    End Sub
+
+    'Wird vom Windows Form-Designer benötigt.
+    Private components As System.ComponentModel.IContainer
+
+    'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
+    'Das Bearbeiten ist mit dem Windows Form-Designer möglich.  
+    'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
+    <System.Diagnostics.DebuggerStepThrough()>
+    Private Sub InitializeComponent()
+        Me.components = New System.ComponentModel.Container()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmFlowSearch))
+        Dim TileItemElement1 As DevExpress.XtraEditors.TileItemElement = New DevExpress.XtraEditors.TileItemElement()
+        Dim TileItemElement2 As DevExpress.XtraEditors.TileItemElement = New DevExpress.XtraEditors.TileItemElement()
+        Me.CheckButton1 = New DevExpress.XtraEditors.CheckButton()
+        Me.txtSearchTerm = New System.Windows.Forms.TextBox()
+        Me.lblFoundResult = New System.Windows.Forms.Label()
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.Panel2 = New System.Windows.Forms.Panel()
+        Me.TileControlMatch = New DevExpress.XtraEditors.TileControl()
+        Me.TileGroup2 = New DevExpress.XtraEditors.TileGroup()
+        Me.TileItem1 = New DevExpress.XtraEditors.TileItem()
+        Me.TileItem2 = New DevExpress.XtraEditors.TileItem()
+        Me.TileGroup3 = New DevExpress.XtraEditors.TileGroup()
+        Me.ToolTipController1 = New DevExpress.Utils.ToolTipController(Me.components)
+        Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
+        Me.BarStaticInfoItem = New DevExpress.XtraBars.BarStaticItem()
+        Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
+        Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
+        Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
+        Me.DockManager1 = New DevExpress.XtraBars.Docking.DockManager(Me.components)
+        Me.panelContainer1 = New DevExpress.XtraBars.Docking.DockPanel()
+        Me.DockPanel1 = New DevExpress.XtraBars.Docking.DockPanel()
+        Me.DockPanel1_Container = New DevExpress.XtraBars.Docking.ControlContainer()
+        Me.Label3 = New System.Windows.Forms.Label()
+        Me.CheckedListBoxCategories = New DevExpress.XtraEditors.CheckedListBoxControl()
+        Me.ToggleSwitchLastMonth = New DevExpress.XtraEditors.ToggleSwitch()
+        Me.ToggleSwitchMonth = New DevExpress.XtraEditors.ToggleSwitch()
+        Me.ToggleSwitchLastYear = New DevExpress.XtraEditors.ToggleSwitch()
+        Me.ToggleSwitchCurrentYear = New DevExpress.XtraEditors.ToggleSwitch()
+        Me.ToggleSwitchYesterday = New DevExpress.XtraEditors.ToggleSwitch()
+        Me.cmbAttributeDate = New System.Windows.Forms.ComboBox()
+        Me.Label2 = New System.Windows.Forms.Label()
+        Me.ToggleSwitchToday = New DevExpress.XtraEditors.ToggleSwitch()
+        Me.DockPanel3 = New DevExpress.XtraBars.Docking.DockPanel()
+        Me.DockPanel3_Container = New DevExpress.XtraBars.Docking.ControlContainer()
+        Me.Panel1 = New System.Windows.Forms.Panel()
+        Me.Panel3 = New System.Windows.Forms.Panel()
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.DockManager1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.panelContainer1.SuspendLayout()
+        Me.DockPanel1.SuspendLayout()
+        Me.DockPanel1_Container.SuspendLayout()
+        CType(Me.CheckedListBoxCategories, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.ToggleSwitchLastMonth.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.ToggleSwitchMonth.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.ToggleSwitchLastYear.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.ToggleSwitchCurrentYear.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.ToggleSwitchYesterday.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.ToggleSwitchToday.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.DockPanel3.SuspendLayout()
+        Me.Panel1.SuspendLayout()
+        Me.Panel3.SuspendLayout()
+        Me.SuspendLayout()
+        '
+        'CheckButton1
+        '
+        Me.CheckButton1.Appearance.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(214, Byte), Integer), CType(CType(47, Byte), Integer))
+        Me.CheckButton1.Appearance.Options.UseBackColor = True
+        Me.CheckButton1.ImageOptions.SvgImage = CType(resources.GetObject("CheckButton1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.CheckButton1.Location = New System.Drawing.Point(6, 6)
+        Me.CheckButton1.Name = "CheckButton1"
+        Me.CheckButton1.Size = New System.Drawing.Size(110, 45)
+        Me.CheckButton1.TabIndex = 5
+        Me.CheckButton1.Text = "Zeige Alles"
+        '
+        'txtSearchTerm
+        '
+        Me.txtSearchTerm.BackColor = System.Drawing.Color.White
+        Me.txtSearchTerm.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtSearchTerm.Location = New System.Drawing.Point(124, 6)
+        Me.txtSearchTerm.Name = "txtSearchTerm"
+        Me.txtSearchTerm.Size = New System.Drawing.Size(167, 23)
+        Me.txtSearchTerm.TabIndex = 0
+        '
+        'lblFoundResult
+        '
+        Me.lblFoundResult.AutoSize = True
+        Me.lblFoundResult.BackColor = System.Drawing.Color.Transparent
+        Me.lblFoundResult.Font = New System.Drawing.Font("Tahoma", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lblFoundResult.ForeColor = System.Drawing.Color.White
+        Me.lblFoundResult.Location = New System.Drawing.Point(122, 32)
+        Me.lblFoundResult.Name = "lblFoundResult"
+        Me.lblFoundResult.Size = New System.Drawing.Size(53, 19)
+        Me.lblFoundResult.TabIndex = 3
+        Me.lblFoundResult.Text = "Found"
+        Me.lblFoundResult.Visible = False
+        '
+        'Label1
+        '
+        Me.Label1.AutoSize = True
+        Me.Label1.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label1.ForeColor = System.Drawing.Color.White
+        Me.Label1.Location = New System.Drawing.Point(297, 9)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(43, 16)
+        Me.Label1.TabIndex = 0
+        Me.Label1.Text = "finden"
+        '
+        'Panel2
+        '
+        Me.Panel2.Dock = System.Windows.Forms.DockStyle.Bottom
+        Me.Panel2.Location = New System.Drawing.Point(202, 625)
+        Me.Panel2.Name = "Panel2"
+        Me.Panel2.Size = New System.Drawing.Size(1035, 18)
+        Me.Panel2.TabIndex = 1
+        '
+        'TileControlMatch
+        '
+        Me.TileControlMatch.AppearanceGroupText.ForeColor = System.Drawing.Color.White
+        Me.TileControlMatch.AppearanceGroupText.Options.UseForeColor = True
+        Me.TileControlMatch.AppearanceText.ForeColor = System.Drawing.Color.Yellow
+        Me.TileControlMatch.AppearanceText.Options.UseForeColor = True
+        Me.TileControlMatch.BackColor = System.Drawing.Color.WhiteSmoke
+        Me.TileControlMatch.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.TileControlMatch.Groups.Add(Me.TileGroup2)
+        Me.TileControlMatch.Groups.Add(Me.TileGroup3)
+        Me.TileControlMatch.Location = New System.Drawing.Point(0, 0)
+        Me.TileControlMatch.MaxId = 2
+        Me.TileControlMatch.Name = "TileControlMatch"
+        Me.TileControlMatch.ScrollMode = DevExpress.XtraEditors.TileControlScrollMode.ScrollBar
+        Me.TileControlMatch.ShowGroupText = True
+        Me.TileControlMatch.Size = New System.Drawing.Size(1035, 418)
+        Me.TileControlMatch.TabIndex = 2
+        Me.TileControlMatch.TabStop = False
+        Me.TileControlMatch.Text = "TileControl1"
+        Me.TileControlMatch.ToolTipController = Me.ToolTipController1
+        '
+        'TileGroup2
+        '
+        Me.TileGroup2.Items.Add(Me.TileItem1)
+        Me.TileGroup2.Items.Add(Me.TileItem2)
+        Me.TileGroup2.Name = "TileGroup2"
+        Me.TileGroup2.Text = "Attribut1"
+        '
+        'TileItem1
+        '
+        Me.TileItem1.AppearanceItem.Normal.BackColor = System.Drawing.Color.FromArgb(CType(CType(165, Byte), Integer), CType(CType(36, Byte), Integer), CType(CType(49, Byte), Integer))
+        Me.TileItem1.AppearanceItem.Normal.Options.UseBackColor = True
+        TileItemElement1.Text = "TileItem1"
+        Me.TileItem1.Elements.Add(TileItemElement1)
+        Me.TileItem1.Id = 0
+        Me.TileItem1.ItemSize = DevExpress.XtraEditors.TileItemSize.Wide
+        Me.TileItem1.Name = "TileItem1"
+        '
+        'TileItem2
+        '
+        Me.TileItem2.AppearanceItem.Normal.BackColor = System.Drawing.Color.White
+        Me.TileItem2.AppearanceItem.Normal.Options.UseBackColor = True
+        TileItemElement2.Text = "TileItem2"
+        Me.TileItem2.Elements.Add(TileItemElement2)
+        Me.TileItem2.Id = 1
+        Me.TileItem2.ItemSize = DevExpress.XtraEditors.TileItemSize.Medium
+        Me.TileItem2.Name = "TileItem2"
+        '
+        'TileGroup3
+        '
+        Me.TileGroup3.Name = "TileGroup3"
+        Me.TileGroup3.Text = "Attribut2"
+        '
+        'ToolTipController1
+        '
+        Me.ToolTipController1.Appearance.BorderColor = System.Drawing.Color.Red
+        Me.ToolTipController1.Appearance.Options.UseBorderColor = True
+        '
+        'RibbonControl1
+        '
+        Me.RibbonControl1.ExpandCollapseItem.Id = 0
+        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarStaticInfoItem})
+        Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
+        Me.RibbonControl1.MaxItemId = 14
+        Me.RibbonControl1.Name = "RibbonControl1"
+        Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
+        Me.RibbonControl1.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonControlStyle.MacOffice
+        Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
+        Me.RibbonControl1.ShowToolbarCustomizeItem = False
+        Me.RibbonControl1.Size = New System.Drawing.Size(1237, 141)
+        Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
+        Me.RibbonControl1.Toolbar.ShowCustomizeItem = False
+        '
+        'BarStaticInfoItem
+        '
+        Me.BarStaticInfoItem.Id = 13
+        Me.BarStaticInfoItem.Name = "BarStaticInfoItem"
+        '
+        'RibbonPage1
+        '
+        Me.RibbonPage1.Name = "RibbonPage1"
+        Me.RibbonPage1.Text = "Start"
+        '
+        'RibbonStatusBar1
+        '
+        Me.RibbonStatusBar1.ItemLinks.Add(Me.BarStaticInfoItem)
+        Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 643)
+        Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
+        Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
+        Me.RibbonStatusBar1.Size = New System.Drawing.Size(1237, 24)
+        '
+        'RibbonPage2
+        '
+        Me.RibbonPage2.Name = "RibbonPage2"
+        Me.RibbonPage2.Text = "RibbonPage2"
+        '
+        'DockManager1
+        '
+        Me.DockManager1.Form = Me
+        Me.DockManager1.RootPanels.AddRange(New DevExpress.XtraBars.Docking.DockPanel() {Me.panelContainer1})
+        Me.DockManager1.TopZIndexControls.AddRange(New String() {"DevExpress.XtraBars.BarDockControl", "DevExpress.XtraBars.StandaloneBarDockControl", "System.Windows.Forms.StatusBar", "System.Windows.Forms.MenuStrip", "System.Windows.Forms.StatusStrip", "DevExpress.XtraBars.Ribbon.RibbonStatusBar", "DevExpress.XtraBars.Ribbon.RibbonControl", "DevExpress.XtraBars.Navigation.OfficeNavigationBar", "DevExpress.XtraBars.Navigation.TileNavPane", "DevExpress.XtraBars.TabFormControl", "DevExpress.XtraBars.FluentDesignSystem.FluentDesignFormControl", "DevExpress.XtraBars.ToolbarForm.ToolbarFormControl"})
+        '
+        'panelContainer1
+        '
+        Me.panelContainer1.ActiveChild = Me.DockPanel1
+        Me.panelContainer1.Controls.Add(Me.DockPanel1)
+        Me.panelContainer1.Controls.Add(Me.DockPanel3)
+        Me.panelContainer1.Dock = DevExpress.XtraBars.Docking.DockingStyle.Left
+        Me.panelContainer1.ID = New System.Guid("2c41e5f4-f976-4b22-a22e-afe12cfdaa3d")
+        Me.panelContainer1.Location = New System.Drawing.Point(0, 141)
+        Me.panelContainer1.Name = "panelContainer1"
+        Me.panelContainer1.OriginalSize = New System.Drawing.Size(202, 200)
+        Me.panelContainer1.Size = New System.Drawing.Size(202, 502)
+        Me.panelContainer1.Tabbed = True
+        Me.panelContainer1.Text = "panelContainer1"
+        '
+        'DockPanel1
+        '
+        Me.DockPanel1.Appearance.BackColor = System.Drawing.Color.DarkGray
+        Me.DockPanel1.Appearance.Options.UseBackColor = True
+        Me.DockPanel1.Controls.Add(Me.DockPanel1_Container)
+        Me.DockPanel1.Dock = DevExpress.XtraBars.Docking.DockingStyle.Fill
+        Me.DockPanel1.Font = New System.Drawing.Font("Calibri", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.DockPanel1.ID = New System.Guid("1ff5d42b-085b-405c-85c0-e49f75099dd0")
+        Me.DockPanel1.Location = New System.Drawing.Point(3, 26)
+        Me.DockPanel1.Name = "DockPanel1"
+        Me.DockPanel1.Options.AllowFloating = False
+        Me.DockPanel1.Options.ShowCloseButton = False
+        Me.DockPanel1.Options.ShowMaximizeButton = False
+        Me.DockPanel1.OriginalSize = New System.Drawing.Size(195, 419)
+        Me.DockPanel1.Size = New System.Drawing.Size(195, 447)
+        Me.DockPanel1.Text = "Einschränkungen"
+        '
+        'DockPanel1_Container
+        '
+        Me.DockPanel1_Container.Controls.Add(Me.Label3)
+        Me.DockPanel1_Container.Controls.Add(Me.CheckedListBoxCategories)
+        Me.DockPanel1_Container.Controls.Add(Me.ToggleSwitchLastMonth)
+        Me.DockPanel1_Container.Controls.Add(Me.ToggleSwitchMonth)
+        Me.DockPanel1_Container.Controls.Add(Me.ToggleSwitchLastYear)
+        Me.DockPanel1_Container.Controls.Add(Me.ToggleSwitchCurrentYear)
+        Me.DockPanel1_Container.Controls.Add(Me.ToggleSwitchYesterday)
+        Me.DockPanel1_Container.Controls.Add(Me.cmbAttributeDate)
+        Me.DockPanel1_Container.Controls.Add(Me.Label2)
+        Me.DockPanel1_Container.Controls.Add(Me.ToggleSwitchToday)
+        Me.DockPanel1_Container.Location = New System.Drawing.Point(0, 0)
+        Me.DockPanel1_Container.Name = "DockPanel1_Container"
+        Me.DockPanel1_Container.Size = New System.Drawing.Size(195, 447)
+        Me.DockPanel1_Container.TabIndex = 0
+        '
+        'Label3
+        '
+        Me.Label3.AutoSize = True
+        Me.Label3.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label3.ForeColor = System.Drawing.Color.White
+        Me.Label3.Location = New System.Drawing.Point(9, 197)
+        Me.Label3.Name = "Label3"
+        Me.Label3.Size = New System.Drawing.Size(75, 17)
+        Me.Label3.TabIndex = 16
+        Me.Label3.Text = "Kategorien:"
+        '
+        'CheckedListBoxCategories
+        '
+        Me.CheckedListBoxCategories.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.CheckedListBoxCategories.Appearance.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.CheckedListBoxCategories.Appearance.Options.UseFont = True
+        Me.CheckedListBoxCategories.CheckOnClick = True
+        Me.CheckedListBoxCategories.Location = New System.Drawing.Point(12, 217)
+        Me.CheckedListBoxCategories.Name = "CheckedListBoxCategories"
+        Me.CheckedListBoxCategories.Size = New System.Drawing.Size(174, 227)
+        Me.CheckedListBoxCategories.TabIndex = 15
+        '
+        'ToggleSwitchLastMonth
+        '
+        Me.ToggleSwitchLastMonth.Location = New System.Drawing.Point(12, 175)
+        Me.ToggleSwitchLastMonth.MenuManager = Me.RibbonControl1
+        Me.ToggleSwitchLastMonth.Name = "ToggleSwitchLastMonth"
+        Me.ToggleSwitchLastMonth.Properties.Appearance.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.ToggleSwitchLastMonth.Properties.Appearance.ForeColor = System.Drawing.Color.White
+        Me.ToggleSwitchLastMonth.Properties.Appearance.Options.UseFont = True
+        Me.ToggleSwitchLastMonth.Properties.Appearance.Options.UseForeColor = True
+        Me.ToggleSwitchLastMonth.Properties.OffText = "Letzter Monat"
+        Me.ToggleSwitchLastMonth.Properties.OnText = "Letzter Monat"
+        Me.ToggleSwitchLastMonth.Size = New System.Drawing.Size(151, 19)
+        Me.ToggleSwitchLastMonth.TabIndex = 14
+        '
+        'ToggleSwitchMonth
+        '
+        Me.ToggleSwitchMonth.Location = New System.Drawing.Point(12, 150)
+        Me.ToggleSwitchMonth.MenuManager = Me.RibbonControl1
+        Me.ToggleSwitchMonth.Name = "ToggleSwitchMonth"
+        Me.ToggleSwitchMonth.Properties.Appearance.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.ToggleSwitchMonth.Properties.Appearance.ForeColor = System.Drawing.Color.White
+        Me.ToggleSwitchMonth.Properties.Appearance.Options.UseFont = True
+        Me.ToggleSwitchMonth.Properties.Appearance.Options.UseForeColor = True
+        Me.ToggleSwitchMonth.Properties.OffText = "Aktueller Monat"
+        Me.ToggleSwitchMonth.Properties.OnText = "Aktueller Monat"
+        Me.ToggleSwitchMonth.Size = New System.Drawing.Size(174, 19)
+        Me.ToggleSwitchMonth.TabIndex = 13
+        '
+        'ToggleSwitchLastYear
+        '
+        Me.ToggleSwitchLastYear.Location = New System.Drawing.Point(12, 125)
+        Me.ToggleSwitchLastYear.MenuManager = Me.RibbonControl1
+        Me.ToggleSwitchLastYear.Name = "ToggleSwitchLastYear"
+        Me.ToggleSwitchLastYear.Properties.Appearance.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.ToggleSwitchLastYear.Properties.Appearance.ForeColor = System.Drawing.Color.White
+        Me.ToggleSwitchLastYear.Properties.Appearance.Options.UseFont = True
+        Me.ToggleSwitchLastYear.Properties.Appearance.Options.UseForeColor = True
+        Me.ToggleSwitchLastYear.Properties.OffText = "Letztes Jahr"
+        Me.ToggleSwitchLastYear.Properties.OnText = "Letztes Jahr"
+        Me.ToggleSwitchLastYear.Size = New System.Drawing.Size(151, 19)
+        Me.ToggleSwitchLastYear.TabIndex = 5
+        '
+        'ToggleSwitchCurrentYear
+        '
+        Me.ToggleSwitchCurrentYear.Location = New System.Drawing.Point(12, 100)
+        Me.ToggleSwitchCurrentYear.MenuManager = Me.RibbonControl1
+        Me.ToggleSwitchCurrentYear.Name = "ToggleSwitchCurrentYear"
+        Me.ToggleSwitchCurrentYear.Properties.Appearance.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.ToggleSwitchCurrentYear.Properties.Appearance.ForeColor = System.Drawing.Color.White
+        Me.ToggleSwitchCurrentYear.Properties.Appearance.Options.UseFont = True
+        Me.ToggleSwitchCurrentYear.Properties.Appearance.Options.UseForeColor = True
+        Me.ToggleSwitchCurrentYear.Properties.OffText = "Aktuelles Jahr"
+        Me.ToggleSwitchCurrentYear.Properties.OnText = "Aktuelles Jahr"
+        Me.ToggleSwitchCurrentYear.Size = New System.Drawing.Size(151, 19)
+        Me.ToggleSwitchCurrentYear.TabIndex = 4
+        '
+        'ToggleSwitchYesterday
+        '
+        Me.ToggleSwitchYesterday.Location = New System.Drawing.Point(12, 75)
+        Me.ToggleSwitchYesterday.MenuManager = Me.RibbonControl1
+        Me.ToggleSwitchYesterday.Name = "ToggleSwitchYesterday"
+        Me.ToggleSwitchYesterday.Properties.Appearance.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.ToggleSwitchYesterday.Properties.Appearance.ForeColor = System.Drawing.Color.White
+        Me.ToggleSwitchYesterday.Properties.Appearance.Options.UseFont = True
+        Me.ToggleSwitchYesterday.Properties.Appearance.Options.UseForeColor = True
+        Me.ToggleSwitchYesterday.Properties.OffText = "Gestern"
+        Me.ToggleSwitchYesterday.Properties.OnText = "Gestern"
+        Me.ToggleSwitchYesterday.Size = New System.Drawing.Size(115, 19)
+        Me.ToggleSwitchYesterday.TabIndex = 3
+        '
+        'cmbAttributeDate
+        '
+        Me.cmbAttributeDate.FormattingEnabled = True
+        Me.cmbAttributeDate.Location = New System.Drawing.Point(12, 25)
+        Me.cmbAttributeDate.Name = "cmbAttributeDate"
+        Me.cmbAttributeDate.Size = New System.Drawing.Size(174, 21)
+        Me.cmbAttributeDate.TabIndex = 1
+        '
+        'Label2
+        '
+        Me.Label2.AutoSize = True
+        Me.Label2.Font = New System.Drawing.Font("Calibri", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label2.ForeColor = System.Drawing.Color.White
+        Me.Label2.Location = New System.Drawing.Point(9, 7)
+        Me.Label2.Name = "Label2"
+        Me.Label2.Size = New System.Drawing.Size(135, 15)
+        Me.Label2.TabIndex = 0
+        Me.Label2.Text = "Datum-Attribut wählen:"
+        '
+        'ToggleSwitchToday
+        '
+        Me.ToggleSwitchToday.Location = New System.Drawing.Point(12, 50)
+        Me.ToggleSwitchToday.MenuManager = Me.RibbonControl1
+        Me.ToggleSwitchToday.Name = "ToggleSwitchToday"
+        Me.ToggleSwitchToday.Properties.Appearance.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.ToggleSwitchToday.Properties.Appearance.ForeColor = System.Drawing.Color.White
+        Me.ToggleSwitchToday.Properties.Appearance.Options.UseFont = True
+        Me.ToggleSwitchToday.Properties.Appearance.Options.UseForeColor = True
+        Me.ToggleSwitchToday.Properties.OffText = "Heute"
+        Me.ToggleSwitchToday.Properties.OnText = "Heute"
+        Me.ToggleSwitchToday.Size = New System.Drawing.Size(102, 19)
+        Me.ToggleSwitchToday.TabIndex = 2
+        '
+        'DockPanel3
+        '
+        Me.DockPanel3.Appearance.BackColor = System.Drawing.Color.DarkGray
+        Me.DockPanel3.Appearance.Options.UseBackColor = True
+        Me.DockPanel3.Controls.Add(Me.DockPanel3_Container)
+        Me.DockPanel3.Dock = DevExpress.XtraBars.Docking.DockingStyle.Fill
+        Me.DockPanel3.ID = New System.Guid("08fbe6c7-4310-499d-bd16-beeb37a1d906")
+        Me.DockPanel3.Location = New System.Drawing.Point(3, 26)
+        Me.DockPanel3.Name = "DockPanel3"
+        Me.DockPanel3.Options.AllowFloating = False
+        Me.DockPanel3.OriginalSize = New System.Drawing.Size(195, 419)
+        Me.DockPanel3.Size = New System.Drawing.Size(195, 447)
+        Me.DockPanel3.Text = "Attribute"
+        '
+        'DockPanel3_Container
+        '
+        Me.DockPanel3_Container.Location = New System.Drawing.Point(0, 0)
+        Me.DockPanel3_Container.Name = "DockPanel3_Container"
+        Me.DockPanel3_Container.Size = New System.Drawing.Size(195, 447)
+        Me.DockPanel3_Container.TabIndex = 0
+        '
+        'Panel1
+        '
+        Me.Panel1.BackColor = System.Drawing.Color.WhiteSmoke
+        Me.Panel1.Controls.Add(Me.CheckButton1)
+        Me.Panel1.Controls.Add(Me.txtSearchTerm)
+        Me.Panel1.Controls.Add(Me.lblFoundResult)
+        Me.Panel1.Controls.Add(Me.Label1)
+        Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top
+        Me.Panel1.Location = New System.Drawing.Point(202, 141)
+        Me.Panel1.Name = "Panel1"
+        Me.Panel1.Size = New System.Drawing.Size(1035, 66)
+        Me.Panel1.TabIndex = 0
+        '
+        'Panel3
+        '
+        Me.Panel3.BackColor = System.Drawing.Color.Transparent
+        Me.Panel3.Controls.Add(Me.TileControlMatch)
+        Me.Panel3.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.Panel3.Location = New System.Drawing.Point(202, 207)
+        Me.Panel3.Name = "Panel3"
+        Me.Panel3.Size = New System.Drawing.Size(1035, 418)
+        Me.Panel3.TabIndex = 9
+        '
+        'frmFlowSearch
+        '
+        Me.Appearance.BackColor = System.Drawing.Color.FromArgb(CType(CType(165, Byte), Integer), CType(CType(36, Byte), Integer), CType(CType(49, Byte), Integer))
+        Me.Appearance.Options.UseBackColor = True
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(1237, 667)
+        Me.Controls.Add(Me.Panel3)
+        Me.Controls.Add(Me.Panel1)
+        Me.Controls.Add(Me.Panel2)
+        Me.Controls.Add(Me.panelContainer1)
+        Me.Controls.Add(Me.RibbonStatusBar1)
+        Me.Controls.Add(Me.RibbonControl1)
+        Me.IconOptions.SvgImage = CType(resources.GetObject("frmFlowSearch.IconOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.KeyPreview = True
+        Me.Name = "frmFlowSearch"
+        Me.Ribbon = Me.RibbonControl1
+        Me.StatusBar = Me.RibbonStatusBar1
+        Me.Text = "FlowSearch"
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.DockManager1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.panelContainer1.ResumeLayout(False)
+        Me.DockPanel1.ResumeLayout(False)
+        Me.DockPanel1_Container.ResumeLayout(False)
+        Me.DockPanel1_Container.PerformLayout()
+        CType(Me.CheckedListBoxCategories, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.ToggleSwitchLastMonth.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.ToggleSwitchMonth.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.ToggleSwitchLastYear.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.ToggleSwitchCurrentYear.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.ToggleSwitchYesterday.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.ToggleSwitchToday.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.DockPanel3.ResumeLayout(False)
+        Me.Panel1.ResumeLayout(False)
+        Me.Panel1.PerformLayout()
+        Me.Panel3.ResumeLayout(False)
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+    Friend WithEvents txtSearchTerm As TextBox
+    Friend WithEvents Label1 As Label
+    Friend WithEvents lblFoundResult As Label
+    Friend WithEvents Panel2 As Panel
+    Friend WithEvents TileControlMatch As DevExpress.XtraEditors.TileControl
+    Friend WithEvents TileGroup2 As DevExpress.XtraEditors.TileGroup
+    Friend WithEvents TileItem1 As DevExpress.XtraEditors.TileItem
+    Friend WithEvents TileItem2 As DevExpress.XtraEditors.TileItem
+    Friend WithEvents TileGroup3 As DevExpress.XtraEditors.TileGroup
+    Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
+    Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
+    Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar
+    Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage
+    Friend WithEvents CheckButton1 As DevExpress.XtraEditors.CheckButton
+    Friend WithEvents ToolTipController1 As DevExpress.Utils.ToolTipController
+    Friend WithEvents DockManager1 As DevExpress.XtraBars.Docking.DockManager
+    Friend WithEvents DockPanel1 As DevExpress.XtraBars.Docking.DockPanel
+    Friend WithEvents DockPanel1_Container As DevExpress.XtraBars.Docking.ControlContainer
+    Friend WithEvents Label2 As Label
+    Friend WithEvents panelContainer1 As DevExpress.XtraBars.Docking.DockPanel
+    Friend WithEvents DockPanel3 As DevExpress.XtraBars.Docking.DockPanel
+    Friend WithEvents DockPanel3_Container As DevExpress.XtraBars.Docking.ControlContainer
+    Friend WithEvents Panel3 As Panel
+    Friend WithEvents Panel1 As Panel
+    Friend WithEvents cmbAttributeDate As ComboBox
+    Friend WithEvents ToggleSwitchToday As DevExpress.XtraEditors.ToggleSwitch
+    Friend WithEvents ToggleSwitchYesterday As DevExpress.XtraEditors.ToggleSwitch
+    Friend WithEvents ToggleSwitchLastYear As DevExpress.XtraEditors.ToggleSwitch
+    Friend WithEvents ToggleSwitchCurrentYear As DevExpress.XtraEditors.ToggleSwitch
+    Friend WithEvents ToggleSwitchLastMonth As DevExpress.XtraEditors.ToggleSwitch
+    Friend WithEvents ToggleSwitchMonth As DevExpress.XtraEditors.ToggleSwitch
+    Friend WithEvents CheckedListBoxCategories As DevExpress.XtraEditors.CheckedListBoxControl
+    Friend WithEvents Label3 As Label
+    Friend WithEvents BarStaticInfoItem As DevExpress.XtraBars.BarStaticItem
+End Class

GUIs.ZooFlow/Search/Old/frmFlowSearch.resx

@@ -0,0 +1,179 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <assembly alias="DevExpress.Data.v21.2" name="DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+  <data name="CheckButton1.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAPoCAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9Cgku
+        WWVsbG93e2ZpbGw6I0ZGQjExNTt9CgkuQmx1ZXtmaWxsOiMxMTc3RDc7fQoJLkdyZWVue2ZpbGw6IzAz
+        OUMyMzt9CgkuUmVke2ZpbGw6I0QxMUMxQzt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
+        Y2l0eTowLjc1O30KCS5zdDF7b3BhY2l0eTowLjU7fQoJLnN0MntvcGFjaXR5OjAuMjU7fQo8L3N0eWxl
+        Pg0KICA8ZyBpZD0iQmFyY29kZSI+DQogICAgPHBhdGggZD0iTTI5LDRIMUMwLjUsNCwwLDQuNSwwLDV2
+        MjJjMCwwLjUsMC41LDEsMSwxaDI4YzAuNSwwLDEtMC41LDEtMVY1QzMwLDQuNSwyOS41LDQsMjksNHog
+        TTI4LDI2SDJWNmgyNlYyNnogICAgTTYsMjRINFY4aDJWMjR6IE0xMCwyMEg4VjhoMlYyMHogTTE0LDI0
+        aC0yVjhoMlYyNHogTTE4LDIwaC0yVjhoMlYyMHogTTIyLDIwaC0yVjhoMlYyMHogTTI2LDI0aC0yVjho
+        MlYyNHoiIGNsYXNzPSJCbGFjayIgLz4NCiAgPC9nPg0KPC9zdmc+Cw==
+</value>
+  </data>
+  <metadata name="ToolTipController1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 17</value>
+  </metadata>
+  <metadata name="DockManager1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>170, 17</value>
+  </metadata>
+  <metadata name="panelContainer1.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>True</value>
+  </metadata>
+  <metadata name="DockPanel3.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>True</value>
+  </metadata>
+  <data name="frmFlowSearch.IconOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAFsEAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5Z
+        ZWxsb3d7ZmlsbDojRkZCMTE1O30KCS5SZWR7ZmlsbDojRDExQzFDO30KCS5HcmVlbntmaWxsOiMwMzlD
+        MjM7fQoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
+        Y2l0eTowLjU7fQoJLnN0MXtvcGFjaXR5OjAuNzU7fQoJLnN0MntkaXNwbGF5Om5vbmU7fQoJLnN0M3tk
+        aXNwbGF5OmlubGluZTtmaWxsOiNGRkIxMTU7fQoJLnN0NHtkaXNwbGF5OmlubGluZTt9Cgkuc3Q1e2Rp
+        c3BsYXk6aW5saW5lO29wYWNpdHk6MC43NTt9Cgkuc3Q2e2Rpc3BsYXk6aW5saW5lO29wYWNpdHk6MC41
+        O30KCS5zdDd7ZGlzcGxheTppbmxpbmU7ZmlsbDojMDM5QzIzO30KCS5zdDh7ZGlzcGxheTppbmxpbmU7
+        ZmlsbDojRDExQzFDO30KCS5zdDl7ZGlzcGxheTppbmxpbmU7ZmlsbDojMTE3N0Q3O30KCS5zdDEwe2Rp
+        c3BsYXk6aW5saW5lO2ZpbGw6I0ZGRkZGRjt9Cjwvc3R5bGU+DQogIDxnIGlkPSJTdGF0ZU1hY2hpbmUi
+        Pg0KICAgIDxwYXRoIGQ9Ik0xNiw2aC0yTDQsMjJsMiwyaDE4bDItMkwxNiw2eiBNMjMuMiwyMkg2Ljhs
+        LTAuMy0wLjNMMTUsOC4ybDguNSwxMy41TDIzLjIsMjJ6IiBjbGFzcz0iQmxhY2siIC8+DQogICAgPHBh
+        dGggZD0iTTUsMjhjLTIuOCwwLTUtMi4yLTUtNXMyLjItNSw1LTVzNSwyLjIsNSw1UzcuOCwyOCw1LDI4
+        eiBNMzAsMjNjMC0yLjgtMi4yLTUtNS01cy01LDIuMi01LDVzMi4yLDUsNSw1ICAgUzMwLDI1LjgsMzAs
+        MjN6IE0yMCw3YzAtMi44LTIuMi01LTUtNXMtNSwyLjItNSw1czIuMiw1LDUsNVMyMCw5LjgsMjAsN3oi
+        IGNsYXNzPSJCbHVlIiAvPg0KICA8L2c+DQo8L3N2Zz4L
+</value>
+  </data>
+</root>

GUIs.ZooFlow/Search/Old/frmFlowSearch.vb

@@ -0,0 +1,562 @@
+Imports DevExpress.XtraEditors
+Imports DevExpress.XtraSplashScreen
+Imports DevExpress.XtraBars
+Imports DevExpress.Utils
+Imports DigitalData.GUIs.Common
+Imports DigitalData.GUIs.ZooFlow.ClassConstants
+Imports DigitalData.Modules.EDMI.API
+Imports DigitalData.Modules.EDMI.API.Constants
+Imports DigitalData.Modules.Logging
+
+Public Class frmFlowSearch
+    Private Logger As Logger
+    Private FontLargeBold As New Font("Segoe UI", 10, FontStyle.Bold)
+    Private FontLargeNormal As New Font("Segoe UI", 10)
+    Private SecondaryFontBold As New Font("Segoe UI", 8, FontStyle.Bold)
+    Private SecondaryFont As New Font("Segoe UI", 8)
+    Private oLastAttribute As String = ""
+    Private oAttributeCount As Integer = 1
+    Private BaseSearchCommand As String
+    Private LastSearchForm As frmDocumentResultList
+    Private Database As DatabaseWithFallback
+    Private EventtoggleChange As Boolean = False
+    Private Language_Term_Object As String
+    Private LIMITATION_DATE As Boolean = False
+    Private TOGGLE_Change As Boolean = False
+    Private CATEGORIES_SELECTED As String = ""
+    Private SEARCH_FACT_DATE As String = "MONTH(OBJ.ADDED_WHEN) <> 13"
+    Private SEARCH_FACT_DATE_ATTRIBUTE = "ADDED_WHEN"
+
+    Public Sub New(pBaseSearchSql As String)
+        ' Dieser Aufruf ist für den Designer erforderlich.
+        InitializeComponent()
+
+        BaseSearchCommand = pBaseSearchSql
+        Logger = My.LogConfig.GetLogger()
+        Database = New DatabaseWithFallback(My.LogConfig, My.Application.Service.Client, My.DatabaseECM, My.DatabaseIDB)
+        If My.Application.User.Language = "de-DE" Then
+            Language_Term_Object = "Objekte"
+        Else
+            Language_Term_Object = "objects"
+        End If
+    End Sub
+    Private Sub frmFlowSearch_Load(sender As Object, e As EventArgs) Handles Me.Load
+        Try
+            RibbonControl1.Minimized = True
+            TileControlMatch.Groups.Clear()
+            Dim oSQL = "select DISTINCT TERM_VALUE AS CATEGORY ,ATTRIBUTE_ID  from VWIDB_CATEGORIES_PER_OBJECT_AND_LANGUAGE WHERE LANGUAGE_ID = @LANGUAGE_ID ORDER BY TERM_VALUE"
+
+
+            'Dim oDTCategory As DataTable = ASorDB.GetDatatable("IDB", $"SELECT 'NONE' as CATEGORY", "VWIDB_CATEGORIES_PER_OBJECT_AND_LANGUAGE", "", "CATEGORY")
+            Dim oDTCategory As DataTable = Database.GetDatatable("VWIDB_CATEGORIES_PER_OBJECT_AND_LANGUAGE", "SELECT 'NONE' as CATEGORY", DatabaseType.IDB, "", "CATEGORY")
+
+            If Not IsNothing(oDTCategory) Then
+                CheckedListBoxCategories.DataSource = oDTCategory
+                CheckedListBoxCategories.DisplayMember = "CATEGORY"
+            End If
+            If My.Application.User.Language = "de-DE" Then
+                cmbAttributeDate.Items.Add(IDB_ADDED_WHEN_String_German)
+            Else
+                cmbAttributeDate.Items.Add(IDB_ADDED_WHEN_String_Englisch)
+            End If
+            'Dim oDT As DataTable = ASorDB.GetDatatable("IDB", $"SELECT * FROM VWIDB_BE_ATTRIBUTE WHERE TYPE_ID = 5 AND LANG_ID = {My.Application.User.LanguageID}", "VWIDB_BE_ATTRIBUTE", $"TYPE_ID = 5 AND LANG_ID = {My.Application.User.LanguageID}")
+            Dim oDT As DataTable = Database.GetDatatable("VWIDB_BE_ATTRIBUTE", $"SELECT * FROM VWIDB_BE_ATTRIBUTE WHERE TYPE_ID = 5 AND LANG_ID = {My.Application.User.LanguageId}", DatabaseType.IDB, $"TYPE_ID = 5 AND LANG_ID = {My.Application.User.LanguageId}")
+
+            For Each oRow As DataRow In oDT.Rows
+                cmbAttributeDate.Items.Add(oRow.Item("ATTR_TITLE"))
+            Next
+            'Dim editor As BarEditItem = BarEditItemDate
+            ' editor = TryCast(BarEditItemDate, ComboBoxEdit)
+            If My.Application.User.Language = "de-DE" Then
+                cmbAttributeDate.SelectedIndex = 0
+                '    BarEditItemDate.EditValue = "Erstellt Wann"
+            Else
+                cmbAttributeDate.SelectedIndex = 1
+                '    BarEditItemDate.EditValue = "Added when"
+            End If
+
+        Catch ex As Exception
+            MsgBox(ex.Message, MsgBoxStyle.Critical)
+            Logger.Error(ex)
+        End Try
+
+    End Sub
+
+    Private Sub txtSearch_TextChanged(sender As Object, e As EventArgs) Handles txtSearchTerm.TextChanged
+
+    End Sub
+    Sub Reset_Form()
+        TileControlMatch.Groups.Clear()
+        lblFoundResult.Visible = False
+    End Sub
+    Sub SearchContent()
+        Try
+            If txtSearchTerm.Text = String.Empty Then
+                Exit Sub
+            End If
+            GET_SELECTED_CATEGORIES()
+
+            Dim oSearchValue = Trim(txtSearchTerm.Text)
+            oLastAttribute = ""
+            Dim oSQL = BaseSearchCommand.Replace("@SEARCH_STRING", oSearchValue)
+
+
+            If SEARCH_FACT_DATE_ATTRIBUTE = "ADDED_WHEN" Then
+                oSQL = oSQL.Replace("MONTH(OBJ.ADDED_WHEN) <> 13", SEARCH_FACT_DATE)
+            Else
+                oSQL = oSQL.Replace("MONTH(OBJ.ADDED_WHEN) <> 13", SEARCH_FACT_DATE)
+                oSQL = oSQL.Replace("--INNER JOIN VWIDB_GROUP_DATA_DATE", "INNER JOIN VWIDB_GROUP_DATA_DATE")
+            End If
+            If CATEGORIES_SELECTED <> String.Empty Then
+                oSQL = oSQL.Replace("--AND ATTR_TERM.TERM_VALUE IN ('')", $"AND ATTR_TERM.TERM_VALUE IN ({CATEGORIES_SELECTED})")
+            End If
+
+            Dim oResultCountAttributes As Integer = 0
+            TileControlMatch.Groups.Clear()
+
+            Dim oResultsfromSearchDT As DataTable = My.DatabaseIDB.GetDatatable(oSQL)
+            If Not IsNothing(oResultsfromSearchDT) Then
+
+                Dim oView As DataView = New DataView(oResultsfromSearchDT)
+                Dim oDTDistinctValues As DataTable = oView.ToTable(True, "ATTRIBUTE", "ATTR_ID")
+                Dim oGroups = oResultsfromSearchDT.AsEnumerable().GroupBy(Function(row) row.Field(Of String)("ATTRIBUTE"))
+                Dim oNewTable As New DataTable
+                oNewTable.Columns.Add("ATTRIBUTE")
+                oNewTable.Columns.Add("COUNT", Type.GetType("System.Int32"))
+                For Each oGroup In oGroups
+                    oNewTable.Rows.Add(oGroup.Key, oGroup.Sum(Function(row) row.Field(Of Int32)("COUNT_OBJ")))
+                Next
+                If Not IsNothing(oNewTable) Then
+                    Dim oAttrCount As Integer = 0
+
+                    For Each orow As DataRow In oNewTable.Rows
+                        oAttrCount += 1
+                        oResultCountAttributes += orow.Item(1)
+                    Next
+                    lblFoundResult.Text = GetResultString(oResultCountAttributes, oAttrCount, oSearchValue)
+                    TileControlMatch.Text = GetResultString(oResultCountAttributes, oAttrCount, oSearchValue)
+                    lblFoundResult.Visible = True
+                End If
+                oNewTable.DefaultView.Sort = "COUNT ASC"
+                oNewTable = oNewTable.DefaultView.ToTable
+
+                '#### CREATE THE GROUPS FOR EACH ATTRIBUTE ####
+                Dim oCountGroup As Int16 = 0
+                For Each oGroupRow As DataRow In oNewTable.Rows
+                    oCountGroup += 1
+                    Dim oGroup As New TileGroup
+                    oGroup.Text = $"[{oCountGroup}] {oGroupRow.Item(0).ToString} ({oGroupRow.Item(1).ToString} {Language_Term_Object})"
+                    oGroup.Tag = oGroupRow.Item(0)
+                    oGroup.Visible = True
+                    For Each oitemRow As DataRow In oResultsfromSearchDT.Rows
+                        If oitemRow.Item("ATTRIBUTE") = oGroupRow.Item(0) Then
+                            Dim oItem = CreateTile(oitemRow.Item("TERM_VALUE"), oitemRow.Item("COUNT_OBJ"), oGroupRow.Item(0).ToString, oitemRow.Item("ATTR_ID"), oitemRow.Item("TERM_GUID"))
+                            If Not IsNothing(oItem) Then
+                                oGroup.Items.Add(oItem)
+                            End If
+                        End If
+                    Next
+                    TileControlMatch.Groups.Add(oGroup)
+
+                Next
+
+                'Wenn weniger als 45 Belege gefunden wurden wird direkt die Suche ausgeführt
+                If oResultCountAttributes > 0 And oResultCountAttributes <= 45 Then
+                    StartSearch_Full(oSearchValue, "")
+                Else
+                    If oResultsfromSearchDT.Rows.Count = 0 Then
+                        Reset_Form()
+                        lblFoundResult.Text = "No Results"
+                        lblFoundResult.Visible = True
+                    End If
+                End If
+
+            Else
+                lblFoundResult.Text = "Result from DB Is Nothing..Check SQL"
+                lblFoundResult.Visible = True
+            End If
+        Catch ex As Exception
+            Logger.Error(ex)
+            lblFoundResult.Text = $"Unexpected Error in SearchContent {ex.Message}"
+            lblFoundResult.Visible = True
+        End Try
+
+
+    End Sub
+    Private Function StartSearch_Full(pSearchValue As String, pOptAttribute As String) As Boolean
+        Dim oHandle As IOverlaySplashScreenHandle = Nothing
+        Dim oItemsFound As Boolean = False
+        Dim oSearchData = My.Application.Search
+
+        Try
+            oHandle = SplashScreenManager.ShowOverlayForm(Me)
+
+            Dim oEXECSQL = $"EXEC PRFLOW_SEARCH_GET_RESULT '{pSearchValue}','{SEARCH_FACT_DATE}', {My.Application.User.UserId},'{oSearchData.SelectInStringAttributeIds}','{oSearchData.SelectInIntegerAttributeIds}',{My.Application.User.LanguageId},'{pOptAttribute}'"
+            Dim oDTOBJECT_RESULT As DataTable = My.DatabaseIDB.GetDatatable(oEXECSQL)
+            If Not IsNothing(oDTOBJECT_RESULT) Then
+                If oDTOBJECT_RESULT.Rows.Count = 0 Then
+                    lblFoundResult.Text = "No Results"
+                    lblFoundResult.Visible = True
+                    Return False
+                End If
+                oItemsFound = True
+                OpenResultForm(oDTOBJECT_RESULT)
+            Else
+                BarStaticInfoItem.Caption = "Check PRFLOW_SEARCH_GET_RESULT: Nothing"
+                BarStaticInfoItem.ItemAppearance.Normal.BackColor = Color.Orange
+                Return False
+            End If
+
+
+        Catch ex As Exception
+            MsgBox(ex.Message, MsgBoxStyle.Critical, Text)
+        Finally
+            SplashScreenManager.CloseOverlayForm(oHandle)
+
+        End Try
+        Return oItemsFound
+    End Function
+    Private Sub OpenResultForm(pDTRESULT As DataTable)
+        Try
+            Dim oEnvironment As New Modules.ZooFlow.Environment() With {
+                .User = My.Application.User,
+                .Modules = My.Application.Modules,
+                .Database = My.DatabaseECM,
+                .DatabaseIDB = My.DatabaseIDB,
+                .Settings = My.Application.Settings,
+                .Service = My.Application.Service
+            }
+            Dim oShortGuid = Guid.NewGuid()
+            Dim oWindowGuid = $"FLOWSEARCH-{My.User.Name}"
+            Dim oParams = New DocumentResultList.Params() With {
+                .WindowGuid = oWindowGuid,
+                .Results = New List(Of DocumentResultList.DocumentResult) From {
+                    New DocumentResultList.DocumentResult() With {
+                        .Title = "FlowSearchResult",
+                        .Datatable = pDTRESULT
+                    }
+                }
+            }
+            Dim oForm As New frmDocumentResultList(My.LogConfig, oEnvironment, oParams)
+            oForm.Show()
+
+            LastSearchForm = oForm
+
+            ' Position Result Window below this window
+            LastSearchForm.Location = GetResultFormLocation()
+            LastSearchForm.Size = GetResultFormSize()
+
+        Catch ex As Exception
+            Logger.Error(ex)
+        End Try
+    End Sub
+
+    Private Function GetResultFormLocation() As Point
+        Return Location
+    End Function
+
+    Private Function GetResultFormSize() As Size
+        Return Size
+    End Function
+    Private Function GetResultString(CountObjects As Integer, CountAttribute As Integer, SearchContent As String) As String
+        Dim oResultString = $"wurden {CountObjects} Objekte" ' IIf(CountAttribute = 1, $"wurden {CountObjects} Objekte", $"wurden {CountObjects} Objekte in {CountAttribute} Attributen")
+        Dim oProfileString = IIf(CountAttribute = 1, "[einem] Attribut", $"[{CountAttribute}] Attributen")
+        Dim oBase = "Es {0} in {1} für Ihre Suche nach '{2}' gefunden:"
+
+        Return String.Format(oBase, oResultString, oProfileString, SearchContent)
+    End Function
+    Private Function CreateTile(pTermValue As String, pCount_Obj As String, pAttribute As String, pAttributeID As String, pTermGuid As Long) As TileItem
+        Try
+            Dim oItem As New TileItem() With {.Tag = $"{pTermGuid}|{pAttributeID}"}
+
+            If oLastAttribute <> pAttribute Then
+                oAttributeCount = 1
+                oLastAttribute = pAttribute
+                oItem.ItemSize = TileItemSize.Wide
+                oItem.AppearanceItem.Normal.BackColor = Color.FromArgb(165, 36, 49) ' GELB 255, 214, 47)
+            Else
+                oItem.ItemSize = TileItemSize.Medium
+                oItem.AppearanceItem.Normal.BackColor = Color.White
+            End If
+            oAttributeCount += 1
+
+            oItem.Elements.Clear()
+
+            Dim oNameElement = New TileItemElement With {
+                .Text = pTermValue,
+                .TextAlignment = TileItemContentAlignment.TopLeft
+            }
+            Select Case oItem.ItemSize
+                Case TileItemSize.Wide
+                    oNameElement.Appearance.Normal.Font = FontLargeBold
+                    oNameElement.Appearance.Normal.ForeColor = Color.White
+                Case Else
+                    oNameElement.Appearance.Normal.Font = SecondaryFontBold
+                    oNameElement.Appearance.Normal.ForeColor = Color.FromArgb(165, 36, 49)
+            End Select
+
+            'oNameElement.Appearance.Normal.ForeColor = Color.Black
+            oItem.Elements.Add(oNameElement)
+
+            'Dim oCommentElement = New TileItemElement With {
+            '    .Text = "Anzahl Objekte: " & pCount_Obj,
+            '    .TextAlignment = TileItemContentAlignment.MiddleLeft
+            '}
+
+            'Select Case oItem.ItemSize
+            '    Case TileItemSize.Wide
+            '        oCommentElement.Appearance.Normal.Font = FontLargeNormal
+            '    Case Else
+            '        oCommentElement.Appearance.Normal.Font = SecondaryFont
+            'End Select
+
+            'oCommentElement.Appearance.Normal.ForeColor = Color.Black
+            'oItem.Elements.Add(oCommentElement)
+
+            Dim oCountElement = New TileItemElement With {
+                .Text = "Anzahl Objekte: " & pCount_Obj,
+                .TextAlignment = TileItemContentAlignment.BottomRight
+            }
+            Select Case oItem.ItemSize
+                Case TileItemSize.Wide
+                    oCountElement.Appearance.Normal.Font = FontLargeNormal
+                    oCountElement.Appearance.Normal.ForeColor = Color.White
+                Case Else
+                    oCountElement.Appearance.Normal.Font = SecondaryFont
+                    oCountElement.Appearance.Normal.ForeColor = Color.FromArgb(165, 36, 49)
+            End Select
+            oItem.Elements.Add(oCountElement)
+
+            Return oItem
+        Catch ex As Exception
+            Logger.Error(ex)
+            Return Nothing
+        End Try
+
+    End Function
+
+    Private Sub txtSearch_GotFocus(sender As Object, e As EventArgs) Handles txtSearchTerm.GotFocus
+        Label1.Visible = True
+        Dim oTEXTBOX As TextBox = CType(sender, TextBox)
+        oTEXTBOX.BackColor = Color.FromArgb(255, 214, 47)
+
+
+    End Sub
+    Private Sub txtSearchTerm_Leave(sender As Object, e As EventArgs) Handles txtSearchTerm.Leave
+        Dim oTEXTBOX As TextBox = CType(sender, TextBox)
+        oTEXTBOX.BackColor = Color.White
+    End Sub
+    Sub GET_SELECTED_CATEGORIES()
+        CATEGORIES_SELECTED = ""
+        Dim i As Integer = 0
+        For Each item As Object In CheckedListBoxCategories.CheckedItems
+            Dim row As DataRowView = TryCast(item, DataRowView)
+            Dim oItem = $"'{row("CATEGORY")}'"
+            If i = 0 Then
+                CATEGORIES_SELECTED = oItem
+            End If
+            If Not CATEGORIES_SELECTED.StartsWith(oItem) Then
+                CATEGORIES_SELECTED &= String.Format(",{0}", oItem)
+            End If
+
+            i += 1
+        Next item
+    End Sub
+
+    Private Sub TileControlMatch_ItemClick(sender As Object, e As TileItemEventArgs) Handles TileControlMatch.ItemClick
+        Try
+            Dim oItem As TileItem = e.Item
+            Dim oItemTag = oItem.Tag
+            Dim oHandle As IOverlaySplashScreenHandle = Nothing
+            Dim oItemsFound As Boolean = False
+            Dim oSearchData = My.Application.Search
+            Dim oSplit = oItem.Tag.ToString.Split("|")
+            Try
+                oHandle = SplashScreenManager.ShowOverlayForm(Me)
+
+                'Dim oDT As DataTable = ASorDB.GetDatatable("IDB", $"SELECT * FROM VWIDB_BE_ATTRIBUTE WHERE ATTR_ID = {oSplit(1)} AND LANG_ID = {My.Application.User.LanguageID}", "VWIDB_BE_ATTRIBUTE", $"ATTR_ID = {oSplit(1)} AND LANG_ID = {My.Application.User.LanguageID}")
+                Dim oDT As DataTable = Database.GetDatatable("VWIDB_BE_ATTRIBUTE", $"SELECT * FROM VWIDB_BE_ATTRIBUTE WHERE ATTR_ID = {oSplit(1)} AND LANG_ID = {My.Application.User.LanguageId}", DatabaseType.IDB, $"ATTR_ID = {oSplit(1)} AND LANG_ID = {My.Application.User.LanguageId}")
+
+                Dim oType = oDT.Rows(0).Item("TYPE_NAME")
+                Dim oEXECSQL = $"EXEC PRFLOW_SEARCH_GET_RESULT_PER_TILE {oSplit(0)},{My.Application.User.UserId},'{oType}',{oSplit(1)},'{My.Application.User.Language}'"
+                Dim oDTOBJECT_RESULT As DataTable = My.DatabaseIDB.GetDatatable(oEXECSQL)
+                If Not IsNothing(oDTOBJECT_RESULT) Then
+                    oItemsFound = True
+                    OpenResultForm(oDTOBJECT_RESULT)
+                End If
+
+
+            Catch ex As Exception
+                MsgBox(ex.Message, MsgBoxStyle.Critical, Text)
+            Finally
+                SplashScreenManager.CloseOverlayForm(oHandle)
+
+            End Try
+        Catch ex As Exception
+            MsgBox($"Error while loading Searches: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, Text)
+            Logger.Error(ex)
+        End Try
+    End Sub
+    Private Function GET_DATE_LIMITATION(pInput As String) As String
+        Try
+            If SEARCH_FACT_DATE_ATTRIBUTE = "ADDED_WHEN" Then
+                Return pInput.Replace("@ATTRIBUTE", "OBJ.ADDED_WHEN")
+            Else
+                Dim oSTR = $"GRPDATE.[{SEARCH_FACT_DATE_ATTRIBUTE}]"
+                Return pInput.Replace("@ATTRIBUTE", oSTR)
+            End If
+        Catch ex As Exception
+            Return pInput
+            Logger.Error(ex)
+        End Try
+    End Function
+
+
+    Sub Start_FlowSearch(Optional AllOver As Boolean = False)
+        If txtSearchTerm.Text <> String.Empty Or AllOver = True Then
+            SearchContent()
+        End If
+    End Sub
+
+    Private Sub btnFindAll_Click(sender As Object, e As EventArgs)
+
+    End Sub
+
+    Private Sub CheckButton1_CheckedChanged(sender As Object, e As EventArgs) Handles CheckButton1.CheckedChanged
+        If LIMITATION_DATE = True Then
+            Dim result As MsgBoxResult
+            If My.Application.User.Language = "de-DE" Then
+                result = MessageBox.Show("Wollen Sie wirklich eine Suche über alle Objekte starten?", "Bestätigung erforderlich:", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
+            Else
+                result = MessageBox.Show("Do You really want to start a search without limitation?", "Confirmation needed:", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
+            End If
+            If result = MsgBoxResult.No Then
+                Exit Sub
+            End If
+        End If
+        StartSearch_Full("", "")
+        CheckButton1.Checked = True
+    End Sub
+
+    Private Sub TileControlMatch_Click(sender As Object, ByVal e As MouseEventArgs) Handles TileControlMatch.Click
+        Dim tc As TileControl = TryCast(sender, TileControl)
+        Dim hi = tc.CalcHitInfo(e.Location)
+        If hi.HitTest = DevExpress.XtraEditors.TileControlHitTest.GroupCaption Then
+            Console.WriteLine(hi.GroupInfo.Group.Tag)
+            StartSearch_Full(RTrim(LTrim(txtSearchTerm.Text)), hi.GroupInfo.Group.Tag)
+        End If
+    End Sub
+
+    Private Sub cmbAttributeDate_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cmbAttributeDate.SelectedIndexChanged
+        If cmbAttributeDate.SelectedIndex <> -1 Then
+            Try
+
+                Dim oEditValue As String = cmbAttributeDate.SelectedItem.ToString
+
+                If oEditValue = IDB_ADDED_WHEN_String_German Or oEditValue = IDB_ADDED_WHEN_String_Englisch Then
+                    SEARCH_FACT_DATE_ATTRIBUTE = "ADDED_WHEN"
+                Else
+                    SEARCH_FACT_DATE_ATTRIBUTE = oEditValue
+                    SEARCH_FACT_DATE = $"MONTH(GRPDATE.[{SEARCH_FACT_DATE_ATTRIBUTE}]) <> 13"
+                End If
+                SearchContent()
+            Catch ex As Exception
+                Logger.Error(ex)
+            End Try
+        End If
+    End Sub
+
+    Private Sub DockManager1_StartDocking(sender As Object, e As Docking.DockPanelCancelEventArgs) Handles DockManager1.StartDocking
+        e.Cancel = True
+    End Sub
+
+
+
+    Private Sub ToggleSwitchDate_Toggled(sender As Object, e As EventArgs) Handles ToggleSwitchToday.Toggled, ToggleSwitchYesterday.Toggled, ToggleSwitchCurrentYear.Toggled, ToggleSwitchLastYear.Toggled,
+        ToggleSwitchLastMonth.Toggled, ToggleSwitchMonth.Toggled
+        If TOGGLE_Change = True Then
+            Exit Sub
+        End If
+        Dim oToggle As ToggleSwitch = TryCast(sender, ToggleSwitch)
+
+        If oToggle.IsOn Then
+            TOGGLE_Change = True
+            LIMITATION_DATE = True
+            Dim oWHENDATE As String
+            Select Case oToggle.Name
+                Case "ToggleSwitchCurrentYear"
+                    ToggleSwitchLastYear.IsOn = False
+                    ToggleSwitchMonth.IsOn = False
+                    ToggleSwitchLastMonth.IsOn = False
+                    ToggleSwitchToday.IsOn = False
+                    ToggleSwitchYesterday.IsOn = False
+                    oWHENDATE = GET_DATE_LIMITATION("YEAR(@ATTRIBUTE) = YEAR(GETDATE())")
+                Case "ToggleSwitchLastYear"
+                    ToggleSwitchCurrentYear.IsOn = False
+                    ToggleSwitchMonth.IsOn = False
+                    ToggleSwitchLastMonth.IsOn = False
+                    ToggleSwitchToday.IsOn = False
+                    ToggleSwitchYesterday.IsOn = False
+                    oWHENDATE = GET_DATE_LIMITATION("YEAR(@ATTRIBUTE) = (YEAR(GETDATE()) -1)")
+                Case "ToggleSwitchMonth"
+                    ToggleSwitchCurrentYear.IsOn = False
+                    ToggleSwitchLastYear.IsOn = False
+                    ToggleSwitchToday.IsOn = False
+                    ToggleSwitchYesterday.IsOn = False
+                    ToggleSwitchLastMonth.IsOn = False
+                    oWHENDATE = GET_DATE_LIMITATION("MONTH(@ATTRIBUTE) = MONTH(GETDATE())")
+                Case "ToggleSwitchLastMonth"
+                    ToggleSwitchCurrentYear.IsOn = False
+                    ToggleSwitchLastYear.IsOn = False
+                    ToggleSwitchMonth.IsOn = False
+                    ToggleSwitchToday.IsOn = False
+                    ToggleSwitchYesterday.IsOn = False
+                    Dim currentDate As DateTime = DateTime.Now
+                    If currentDate.Month = 1 Then
+                        oWHENDATE = GET_DATE_LIMITATION("MONTH(@ATTRIBUTE) = 12 " & vbNewLine & "AND YEAR(@ATTRIBUTE) = (YEAR(GETDATE()) -1)")
+                    Else
+                        oWHENDATE = GET_DATE_LIMITATION("MONTH(@ATTRIBUTE) = (MONTH(GETDATE()) -1)")
+                    End If
+                Case "ToggleSwitchToday"
+                    ToggleSwitchCurrentYear.IsOn = False
+                    ToggleSwitchLastYear.IsOn = False
+                    ToggleSwitchMonth.IsOn = False
+                    ToggleSwitchYesterday.IsOn = False
+                    oWHENDATE = GET_DATE_LIMITATION("convert(DATE,@ATTRIBUTE) = convert(DATE,GETDATE())")
+                Case "ToggleSwitchYesterday"
+                    ToggleSwitchCurrentYear.IsOn = False
+                    ToggleSwitchLastYear.IsOn = False
+                    ToggleSwitchMonth.IsOn = False
+                    ToggleSwitchToday.IsOn = False
+                    oWHENDATE = GET_DATE_LIMITATION("convert(DATE,@ATTRIBUTE) = convert(DATE,GETDATE()-1)")
+            End Select
+            SEARCH_FACT_DATE = oWHENDATE
+            TOGGLE_Change = False
+        Else
+            If ToggleSwitchToday.IsOn = False And ToggleSwitchYesterday.IsOn = False And ToggleSwitchCurrentYear.IsOn = False And ToggleSwitchLastYear.IsOn = False And ToggleSwitchLastMonth.IsOn = False And ToggleSwitchMonth.IsOn = False Then
+                LIMITATION_DATE = False
+
+            End If
+        End If
+        Start_FlowSearch()
+    End Sub
+
+    Private Sub txtSearchTerm_KeyUp(sender As Object, e As KeyEventArgs) Handles txtSearchTerm.KeyUp
+        If e.KeyCode = Keys.Return Then
+            Try
+                If txtSearchTerm.Text = String.Empty Then
+                    Reset_Form()
+                    Exit Sub
+                End If
+                lblFoundResult.Visible = False
+                Start_FlowSearch()
+
+            Catch ex As Exception
+                lblFoundResult.Text = "Unexpected error in FlowSearch - Check Your log"
+                lblFoundResult.Visible = True
+                Logger.Error(ex)
+            End Try
+        End If
+
+    End Sub
+End Class

GUIs.ZooFlow/Search/Old/frmFlowSearch1.Designer.vb

@@ -0,0 +1,520 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
+Partial Class frmFlowSearch1
+    Inherits DevExpress.XtraBars.Ribbon.RibbonForm
+
+    'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
+    <System.Diagnostics.DebuggerNonUserCode()>
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        Try
+            If disposing AndAlso components IsNot Nothing Then
+                components.Dispose()
+            End If
+        Finally
+            MyBase.Dispose(disposing)
+        End Try
+    End Sub
+
+    'Wird vom Windows Form-Designer benötigt.
+    Private components As System.ComponentModel.IContainer
+
+    'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
+    'Das Bearbeiten ist mit dem Windows Form-Designer möglich.  
+    'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
+    <System.Diagnostics.DebuggerStepThrough()>
+    Private Sub InitializeComponent()
+        Me.components = New System.ComponentModel.Container()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmFlowSearch1))
+        Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
+        Me.BarButtonStartSearch = New DevExpress.XtraBars.BarButtonItem()
+        Me.BarButtonReset = New DevExpress.XtraBars.BarButtonItem()
+        Me.bsiStatus = New DevExpress.XtraBars.BarStaticItem()
+        Me.BarSubItem1 = New DevExpress.XtraBars.BarSubItem()
+        Me.BarListItem1 = New DevExpress.XtraBars.BarListItem()
+        Me.BarToggleSwitchItemTerm = New DevExpress.XtraBars.BarToggleSwitchItem()
+        Me.BarToggleSwitchItemFulltext = New DevExpress.XtraBars.BarToggleSwitchItem()
+        Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
+        Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
+        Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
+        Me.DockManager1 = New DevExpress.XtraBars.Docking.DockManager(Me.components)
+        Me.DockPanel1 = New DevExpress.XtraBars.Docking.DockPanel()
+        Me.DockPanel1_Container = New DevExpress.XtraBars.Docking.ControlContainer()
+        Me.XtraTabControl1 = New DevExpress.XtraTab.XtraTabControl()
+        Me.XtraTabPage1 = New DevExpress.XtraTab.XtraTabPage()
+        Me.DateEditTill = New DevExpress.XtraEditors.DateEdit()
+        Me.ToggleSwitchMonth_Last = New DevExpress.XtraEditors.ToggleSwitch()
+        Me.ToggleSwitchDateto = New DevExpress.XtraEditors.ToggleSwitch()
+        Me.lblDatefrom = New DevExpress.XtraEditors.LabelControl()
+        Me.DateEditFrom = New DevExpress.XtraEditors.DateEdit()
+        Me.ToggleSwitchMonth = New DevExpress.XtraEditors.ToggleSwitch()
+        Me.ToggleSwitchTomorrow = New DevExpress.XtraEditors.ToggleSwitch()
+        Me.ToggleSwitchToday = New DevExpress.XtraEditors.ToggleSwitch()
+        Me.ToggleSwitchLastWeek = New DevExpress.XtraEditors.ToggleSwitch()
+        Me.ToggleSwitchYesterday = New DevExpress.XtraEditors.ToggleSwitch()
+        Me.ToggleSwitchYear_Last = New DevExpress.XtraEditors.ToggleSwitch()
+        Me.ToggleSwitchYear = New DevExpress.XtraEditors.ToggleSwitch()
+        Me.XtraTabPage2 = New DevExpress.XtraTab.XtraTabPage()
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.cmbLimitationDateAttr = New System.Windows.Forms.ComboBox()
+        Me.PictureEdit1 = New DevExpress.XtraEditors.PictureEdit()
+        Me.TextEditSearch = New DevExpress.XtraEditors.TextEdit()
+        Me.AdornerUIManager1 = New DevExpress.Utils.VisualEffects.AdornerUIManager(Me.components)
+        Me.Guide1 = New DevExpress.Utils.VisualEffects.Guide()
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.DockManager1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.DockPanel1.SuspendLayout()
+        Me.DockPanel1_Container.SuspendLayout()
+        CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.XtraTabControl1.SuspendLayout()
+        Me.XtraTabPage1.SuspendLayout()
+        CType(Me.DateEditTill.Properties.CalendarTimeProperties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.DateEditTill.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.ToggleSwitchMonth_Last.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.ToggleSwitchDateto.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.DateEditFrom.Properties.CalendarTimeProperties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.DateEditFrom.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.ToggleSwitchMonth.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.ToggleSwitchTomorrow.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.ToggleSwitchToday.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.ToggleSwitchLastWeek.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.ToggleSwitchYesterday.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.ToggleSwitchYear_Last.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.ToggleSwitchYear.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.PictureEdit1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.TextEditSearch.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.AdornerUIManager1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SuspendLayout()
+        '
+        'RibbonControl1
+        '
+        Me.RibbonControl1.ColorScheme = DevExpress.XtraBars.Ribbon.RibbonControlColorScheme.Green
+        Me.RibbonControl1.CommandLayout = DevExpress.XtraBars.Ribbon.CommandLayout.Simplified
+        Me.RibbonControl1.ExpandCollapseItem.Id = 0
+        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonStartSearch, Me.BarButtonReset, Me.bsiStatus, Me.BarSubItem1, Me.BarListItem1, Me.BarToggleSwitchItemTerm, Me.BarToggleSwitchItemFulltext})
+        Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
+        Me.RibbonControl1.MaxItemId = 8
+        Me.RibbonControl1.Name = "RibbonControl1"
+        Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
+        Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
+        Me.RibbonControl1.Size = New System.Drawing.Size(767, 89)
+        Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
+        '
+        'BarButtonStartSearch
+        '
+        Me.BarButtonStartSearch.Caption = "Suche starten"
+        Me.BarButtonStartSearch.Id = 1
+        Me.BarButtonStartSearch.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonStartSearch.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonStartSearch.Name = "BarButtonStartSearch"
+        '
+        'BarButtonReset
+        '
+        Me.BarButtonReset.Caption = "Suche zurücksetzen"
+        Me.BarButtonReset.Id = 2
+        Me.BarButtonReset.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonReset.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonReset.Name = "BarButtonReset"
+        '
+        'bsiStatus
+        '
+        Me.bsiStatus.Id = 3
+        Me.bsiStatus.ImageOptions.SvgImage = CType(resources.GetObject("bsiStatus.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.bsiStatus.Name = "bsiStatus"
+        Me.bsiStatus.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph
+        '
+        'BarSubItem1
+        '
+        Me.BarSubItem1.Caption = "BarSubItem1"
+        Me.BarSubItem1.Id = 4
+        Me.BarSubItem1.Name = "BarSubItem1"
+        '
+        'BarListItem1
+        '
+        Me.BarListItem1.Caption = "Vorlagen"
+        Me.BarListItem1.Id = 5
+        Me.BarListItem1.Name = "BarListItem1"
+        '
+        'BarToggleSwitchItemTerm
+        '
+        Me.BarToggleSwitchItemTerm.BindableChecked = True
+        Me.BarToggleSwitchItemTerm.Caption = "Suche nach Begriff"
+        Me.BarToggleSwitchItemTerm.Checked = True
+        Me.BarToggleSwitchItemTerm.Id = 6
+        Me.BarToggleSwitchItemTerm.Name = "BarToggleSwitchItemTerm"
+        '
+        'BarToggleSwitchItemFulltext
+        '
+        Me.BarToggleSwitchItemFulltext.Caption = "Suche Volltext"
+        Me.BarToggleSwitchItemFulltext.Enabled = False
+        Me.BarToggleSwitchItemFulltext.Id = 7
+        Me.BarToggleSwitchItemFulltext.Name = "BarToggleSwitchItemFulltext"
+        '
+        'RibbonPage1
+        '
+        Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup2, Me.RibbonPageGroup1})
+        Me.RibbonPage1.Name = "RibbonPage1"
+        Me.RibbonPage1.Text = "Suche"
+        '
+        'RibbonPageGroup2
+        '
+        Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonStartSearch)
+        Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonReset)
+        Me.RibbonPageGroup2.Name = "RibbonPageGroup2"
+        Me.RibbonPageGroup2.Text = "Suchfunktionen"
+        '
+        'RibbonPageGroup1
+        '
+        Me.RibbonPageGroup1.AllowTextClipping = False
+        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarToggleSwitchItemTerm)
+        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarToggleSwitchItemFulltext)
+        Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
+        Me.RibbonPageGroup1.Text = "Suchvarianten"
+        '
+        'RibbonStatusBar1
+        '
+        Me.RibbonStatusBar1.ItemLinks.Add(Me.bsiStatus)
+        Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 503)
+        Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
+        Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
+        Me.RibbonStatusBar1.Size = New System.Drawing.Size(767, 24)
+        '
+        'RibbonPage2
+        '
+        Me.RibbonPage2.Name = "RibbonPage2"
+        Me.RibbonPage2.Text = "RibbonPage2"
+        '
+        'DockManager1
+        '
+        Me.DockManager1.DockingOptions.ShowCaptionImage = True
+        Me.DockManager1.Form = Me
+        Me.DockManager1.RootPanels.AddRange(New DevExpress.XtraBars.Docking.DockPanel() {Me.DockPanel1})
+        Me.DockManager1.TopZIndexControls.AddRange(New String() {"DevExpress.XtraBars.BarDockControl", "DevExpress.XtraBars.StandaloneBarDockControl", "System.Windows.Forms.MenuStrip", "System.Windows.Forms.StatusStrip", "System.Windows.Forms.StatusBar", "DevExpress.XtraBars.Ribbon.RibbonStatusBar", "DevExpress.XtraBars.Ribbon.RibbonControl", "DevExpress.XtraBars.Navigation.OfficeNavigationBar", "DevExpress.XtraBars.Navigation.TileNavPane", "DevExpress.XtraBars.TabFormControl", "DevExpress.XtraBars.FluentDesignSystem.FluentDesignFormControl", "DevExpress.XtraBars.ToolbarForm.ToolbarFormControl"})
+        '
+        'DockPanel1
+        '
+        Me.DockPanel1.Appearance.Options.UseImage = True
+        Me.DockPanel1.Controls.Add(Me.DockPanel1_Container)
+        Me.DockPanel1.Dock = DevExpress.XtraBars.Docking.DockingStyle.Left
+        Me.DockPanel1.ID = New System.Guid("404a591d-3a18-4984-8b8d-d8ac23bfc3db")
+        Me.DockPanel1.ImageOptions.SvgImage = CType(resources.GetObject("DockPanel1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.DockPanel1.Location = New System.Drawing.Point(0, 89)
+        Me.DockPanel1.Name = "DockPanel1"
+        Me.DockPanel1.OriginalSize = New System.Drawing.Size(193, 200)
+        Me.DockPanel1.Size = New System.Drawing.Size(193, 414)
+        Me.DockPanel1.Text = "Datum"
+        '
+        'DockPanel1_Container
+        '
+        Me.DockPanel1_Container.Controls.Add(Me.XtraTabControl1)
+        Me.DockPanel1_Container.Controls.Add(Me.Label1)
+        Me.DockPanel1_Container.Controls.Add(Me.cmbLimitationDateAttr)
+        Me.DockPanel1_Container.Location = New System.Drawing.Point(3, 40)
+        Me.DockPanel1_Container.Name = "DockPanel1_Container"
+        Me.DockPanel1_Container.Size = New System.Drawing.Size(186, 371)
+        Me.DockPanel1_Container.TabIndex = 0
+        '
+        'XtraTabControl1
+        '
+        Me.XtraTabControl1.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.XtraTabControl1.HeaderLocation = DevExpress.XtraTab.TabHeaderLocation.Bottom
+        Me.XtraTabControl1.Location = New System.Drawing.Point(6, 58)
+        Me.XtraTabControl1.Name = "XtraTabControl1"
+        Me.XtraTabControl1.SelectedTabPage = Me.XtraTabPage1
+        Me.XtraTabControl1.ShowTabHeader = DevExpress.Utils.DefaultBoolean.[True]
+        Me.XtraTabControl1.Size = New System.Drawing.Size(171, 310)
+        Me.XtraTabControl1.TabIndex = 10
+        Me.XtraTabControl1.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPage1, Me.XtraTabPage2})
+        '
+        'XtraTabPage1
+        '
+        Me.XtraTabPage1.Appearance.PageClient.BackColor = System.Drawing.Color.Lavender
+        Me.XtraTabPage1.Appearance.PageClient.Options.UseBackColor = True
+        Me.XtraTabPage1.Controls.Add(Me.DateEditTill)
+        Me.XtraTabPage1.Controls.Add(Me.ToggleSwitchMonth_Last)
+        Me.XtraTabPage1.Controls.Add(Me.ToggleSwitchDateto)
+        Me.XtraTabPage1.Controls.Add(Me.lblDatefrom)
+        Me.XtraTabPage1.Controls.Add(Me.DateEditFrom)
+        Me.XtraTabPage1.Controls.Add(Me.ToggleSwitchMonth)
+        Me.XtraTabPage1.Controls.Add(Me.ToggleSwitchTomorrow)
+        Me.XtraTabPage1.Controls.Add(Me.ToggleSwitchToday)
+        Me.XtraTabPage1.Controls.Add(Me.ToggleSwitchLastWeek)
+        Me.XtraTabPage1.Controls.Add(Me.ToggleSwitchYesterday)
+        Me.XtraTabPage1.Controls.Add(Me.ToggleSwitchYear_Last)
+        Me.XtraTabPage1.Controls.Add(Me.ToggleSwitchYear)
+        Me.XtraTabPage1.Name = "XtraTabPage1"
+        Me.XtraTabPage1.Size = New System.Drawing.Size(169, 285)
+        Me.XtraTabPage1.Text = "Standard"
+        '
+        'DateEditTill
+        '
+        Me.DateEditTill.EditValue = Nothing
+        Me.DateEditTill.Location = New System.Drawing.Point(3, 260)
+        Me.DateEditTill.MenuManager = Me.RibbonControl1
+        Me.DateEditTill.Name = "DateEditTill"
+        Me.DateEditTill.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
+        Me.DateEditTill.Properties.CalendarTimeProperties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
+        Me.DateEditTill.Size = New System.Drawing.Size(117, 20)
+        Me.DateEditTill.TabIndex = 2
+        '
+        'ToggleSwitchMonth_Last
+        '
+        Me.ToggleSwitchMonth_Last.Location = New System.Drawing.Point(3, 155)
+        Me.ToggleSwitchMonth_Last.MenuManager = Me.RibbonControl1
+        Me.ToggleSwitchMonth_Last.Name = "ToggleSwitchMonth_Last"
+        Me.ToggleSwitchMonth_Last.Properties.OffText = "Letzter Monat"
+        Me.ToggleSwitchMonth_Last.Properties.OnText = "Letzter Monat"
+        Me.ToggleSwitchMonth_Last.Size = New System.Drawing.Size(195, 19)
+        Me.ToggleSwitchMonth_Last.TabIndex = 9
+        '
+        'ToggleSwitchDateto
+        '
+        Me.ToggleSwitchDateto.Location = New System.Drawing.Point(3, 235)
+        Me.ToggleSwitchDateto.MenuManager = Me.RibbonControl1
+        Me.ToggleSwitchDateto.Name = "ToggleSwitchDateto"
+        Me.ToggleSwitchDateto.Properties.OffText = "Datum bis"
+        Me.ToggleSwitchDateto.Properties.OnText = "Datum bis"
+        Me.ToggleSwitchDateto.Size = New System.Drawing.Size(122, 19)
+        Me.ToggleSwitchDateto.TabIndex = 0
+        '
+        'lblDatefrom
+        '
+        Me.lblDatefrom.Location = New System.Drawing.Point(2, 190)
+        Me.lblDatefrom.Name = "lblDatefrom"
+        Me.lblDatefrom.Size = New System.Drawing.Size(34, 13)
+        Me.lblDatefrom.TabIndex = 3
+        Me.lblDatefrom.Text = "Datum"
+        '
+        'DateEditFrom
+        '
+        Me.DateEditFrom.EditValue = Nothing
+        Me.DateEditFrom.Location = New System.Drawing.Point(3, 209)
+        Me.DateEditFrom.MenuManager = Me.RibbonControl1
+        Me.DateEditFrom.Name = "DateEditFrom"
+        Me.DateEditFrom.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
+        Me.DateEditFrom.Properties.CalendarTimeProperties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
+        Me.DateEditFrom.Properties.CalendarView = DevExpress.XtraEditors.Repository.CalendarView.ClassicNew
+        Me.DateEditFrom.Properties.VistaDisplayMode = DevExpress.Utils.DefaultBoolean.[False]
+        Me.DateEditFrom.Size = New System.Drawing.Size(117, 20)
+        Me.DateEditFrom.TabIndex = 1
+        '
+        'ToggleSwitchMonth
+        '
+        Me.ToggleSwitchMonth.Location = New System.Drawing.Point(3, 130)
+        Me.ToggleSwitchMonth.MenuManager = Me.RibbonControl1
+        Me.ToggleSwitchMonth.Name = "ToggleSwitchMonth"
+        Me.ToggleSwitchMonth.Properties.OffText = "Dieser Monat"
+        Me.ToggleSwitchMonth.Properties.OnText = "Dieser Monat"
+        Me.ToggleSwitchMonth.Size = New System.Drawing.Size(195, 19)
+        Me.ToggleSwitchMonth.TabIndex = 8
+        '
+        'ToggleSwitchTomorrow
+        '
+        Me.ToggleSwitchTomorrow.Location = New System.Drawing.Point(104, 28)
+        Me.ToggleSwitchTomorrow.MenuManager = Me.RibbonControl1
+        Me.ToggleSwitchTomorrow.Name = "ToggleSwitchTomorrow"
+        Me.ToggleSwitchTomorrow.Properties.OffText = "Morgen"
+        Me.ToggleSwitchTomorrow.Properties.OnText = "Morgen"
+        Me.ToggleSwitchTomorrow.Size = New System.Drawing.Size(95, 19)
+        Me.ToggleSwitchTomorrow.TabIndex = 7
+        Me.ToggleSwitchTomorrow.Visible = False
+        '
+        'ToggleSwitchToday
+        '
+        Me.ToggleSwitchToday.Location = New System.Drawing.Point(3, 3)
+        Me.ToggleSwitchToday.MenuManager = Me.RibbonControl1
+        Me.ToggleSwitchToday.Name = "ToggleSwitchToday"
+        Me.ToggleSwitchToday.Properties.OffText = "Heute"
+        Me.ToggleSwitchToday.Properties.OnText = "Heute"
+        Me.ToggleSwitchToday.Size = New System.Drawing.Size(95, 19)
+        Me.ToggleSwitchToday.TabIndex = 2
+        '
+        'ToggleSwitchLastWeek
+        '
+        Me.ToggleSwitchLastWeek.Location = New System.Drawing.Point(3, 53)
+        Me.ToggleSwitchLastWeek.MenuManager = Me.RibbonControl1
+        Me.ToggleSwitchLastWeek.Name = "ToggleSwitchLastWeek"
+        Me.ToggleSwitchLastWeek.Properties.OffText = "Letzten 7 Tage"
+        Me.ToggleSwitchLastWeek.Properties.OnText = "Letzten 7 Tage"
+        Me.ToggleSwitchLastWeek.Size = New System.Drawing.Size(195, 19)
+        Me.ToggleSwitchLastWeek.TabIndex = 6
+        '
+        'ToggleSwitchYesterday
+        '
+        Me.ToggleSwitchYesterday.Location = New System.Drawing.Point(3, 28)
+        Me.ToggleSwitchYesterday.MenuManager = Me.RibbonControl1
+        Me.ToggleSwitchYesterday.Name = "ToggleSwitchYesterday"
+        Me.ToggleSwitchYesterday.Properties.OffText = "Gestern"
+        Me.ToggleSwitchYesterday.Properties.OnText = "Gestern"
+        Me.ToggleSwitchYesterday.Size = New System.Drawing.Size(95, 19)
+        Me.ToggleSwitchYesterday.TabIndex = 3
+        '
+        'ToggleSwitchYear_Last
+        '
+        Me.ToggleSwitchYear_Last.Location = New System.Drawing.Point(3, 105)
+        Me.ToggleSwitchYear_Last.MenuManager = Me.RibbonControl1
+        Me.ToggleSwitchYear_Last.Name = "ToggleSwitchYear_Last"
+        Me.ToggleSwitchYear_Last.Properties.OffText = "Letztes Jahr"
+        Me.ToggleSwitchYear_Last.Properties.OnText = "Letztes Jahr"
+        Me.ToggleSwitchYear_Last.Size = New System.Drawing.Size(195, 19)
+        Me.ToggleSwitchYear_Last.TabIndex = 5
+        '
+        'ToggleSwitchYear
+        '
+        Me.ToggleSwitchYear.Location = New System.Drawing.Point(3, 80)
+        Me.ToggleSwitchYear.MenuManager = Me.RibbonControl1
+        Me.ToggleSwitchYear.Name = "ToggleSwitchYear"
+        Me.ToggleSwitchYear.Properties.OffText = "Dieses Jahr"
+        Me.ToggleSwitchYear.Properties.OnText = "Dieses Jahr"
+        Me.ToggleSwitchYear.Size = New System.Drawing.Size(195, 19)
+        Me.ToggleSwitchYear.TabIndex = 4
+        '
+        'XtraTabPage2
+        '
+        Me.XtraTabPage2.Name = "XtraTabPage2"
+        Me.XtraTabPage2.Size = New System.Drawing.Size(169, 285)
+        Me.XtraTabPage2.Text = "...tbd"
+        '
+        'Label1
+        '
+        Me.Label1.AutoSize = True
+        Me.Label1.Location = New System.Drawing.Point(4, 8)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(47, 13)
+        Me.Label1.TabIndex = 0
+        Me.Label1.Text = "Attribut"
+        '
+        'cmbLimitationDateAttr
+        '
+        Me.cmbLimitationDateAttr.FormattingEnabled = True
+        Me.cmbLimitationDateAttr.Location = New System.Drawing.Point(6, 24)
+        Me.cmbLimitationDateAttr.Name = "cmbLimitationDateAttr"
+        Me.cmbLimitationDateAttr.Size = New System.Drawing.Size(171, 21)
+        Me.cmbLimitationDateAttr.TabIndex = 1
+        '
+        'PictureEdit1
+        '
+        Me.PictureEdit1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.PictureEdit1.EditValue = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.ZooFlow_CW_DevExpress
+        Me.PictureEdit1.Location = New System.Drawing.Point(540, 139)
+        Me.PictureEdit1.MenuManager = Me.RibbonControl1
+        Me.PictureEdit1.Name = "PictureEdit1"
+        Me.PictureEdit1.Properties.Appearance.BackColor = System.Drawing.SystemColors.Control
+        Me.PictureEdit1.Properties.Appearance.Options.UseBackColor = True
+        Me.PictureEdit1.Properties.BorderStyle = DevExpress.XtraEditors.Controls.BorderStyles.NoBorder
+        Me.PictureEdit1.Properties.PictureAlignment = System.Drawing.ContentAlignment.BottomRight
+        Me.PictureEdit1.Properties.ShowCameraMenuItem = DevExpress.XtraEditors.Controls.CameraMenuItemVisibility.[Auto]
+        Me.PictureEdit1.Properties.ZoomPercent = 300.0R
+        Me.PictureEdit1.Size = New System.Drawing.Size(215, 202)
+        Me.PictureEdit1.TabIndex = 8
+        '
+        'TextEditSearch
+        '
+        Me.TextEditSearch.Location = New System.Drawing.Point(199, 95)
+        Me.TextEditSearch.MenuManager = Me.RibbonControl1
+        Me.TextEditSearch.Name = "TextEditSearch"
+        Me.TextEditSearch.Properties.Appearance.Font = New System.Drawing.Font("Segoe UI", 18.0!)
+        Me.TextEditSearch.Properties.Appearance.Options.UseFont = True
+        Me.TextEditSearch.Size = New System.Drawing.Size(556, 38)
+        Me.TextEditSearch.TabIndex = 20
+        '
+        'AdornerUIManager1
+        '
+        Me.AdornerUIManager1.Elements.Add(Me.Guide1)
+        Me.AdornerUIManager1.Owner = Me
+        '
+        'Guide1
+        '
+        Me.Guide1.Appearances.Hovered.BackColor = System.Drawing.Color.Fuchsia
+        Me.Guide1.Appearances.Hovered.Options.UseBackColor = True
+        Me.Guide1.Appearances.Normal.BackColor = System.Drawing.Color.Red
+        Me.Guide1.Appearances.Normal.Options.UseBackColor = True
+        Me.Guide1.Appearances.Pressed.BackColor = System.Drawing.Color.Blue
+        Me.Guide1.Appearances.Pressed.Options.UseBackColor = True
+        Me.Guide1.TargetElement = Me.TextEditSearch
+        '
+        'frmFlowSearch1
+        '
+        Me.Appearance.BackColor = System.Drawing.SystemColors.Control
+        Me.Appearance.Options.UseBackColor = True
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(767, 527)
+        Me.Controls.Add(Me.TextEditSearch)
+        Me.Controls.Add(Me.PictureEdit1)
+        Me.Controls.Add(Me.DockPanel1)
+        Me.Controls.Add(Me.RibbonStatusBar1)
+        Me.Controls.Add(Me.RibbonControl1)
+        Me.IconOptions.SvgImage = CType(resources.GetObject("frmFlowSearch1.IconOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.Name = "frmFlowSearch1"
+        Me.Ribbon = Me.RibbonControl1
+        Me.StatusBar = Me.RibbonStatusBar1
+        Me.Text = "Flowsearch"
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.DockManager1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.DockPanel1.ResumeLayout(False)
+        Me.DockPanel1_Container.ResumeLayout(False)
+        Me.DockPanel1_Container.PerformLayout()
+        CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.XtraTabControl1.ResumeLayout(False)
+        Me.XtraTabPage1.ResumeLayout(False)
+        Me.XtraTabPage1.PerformLayout()
+        CType(Me.DateEditTill.Properties.CalendarTimeProperties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.DateEditTill.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.ToggleSwitchMonth_Last.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.ToggleSwitchDateto.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.DateEditFrom.Properties.CalendarTimeProperties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.DateEditFrom.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.ToggleSwitchMonth.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.ToggleSwitchTomorrow.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.ToggleSwitchToday.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.ToggleSwitchLastWeek.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.ToggleSwitchYesterday.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.ToggleSwitchYear_Last.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.ToggleSwitchYear.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.PictureEdit1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.TextEditSearch.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.AdornerUIManager1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+
+    Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
+    Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
+    Friend WithEvents RibbonPageGroup2 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar
+    Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage
+    Friend WithEvents DockManager1 As DevExpress.XtraBars.Docking.DockManager
+    Friend WithEvents DockPanel1 As DevExpress.XtraBars.Docking.DockPanel
+    Friend WithEvents DockPanel1_Container As DevExpress.XtraBars.Docking.ControlContainer
+    Friend WithEvents cmbLimitationDateAttr As ComboBox
+    Friend WithEvents Label1 As Label
+    Friend WithEvents ToggleSwitchToday As DevExpress.XtraEditors.ToggleSwitch
+    Friend WithEvents ToggleSwitchYear_Last As DevExpress.XtraEditors.ToggleSwitch
+    Friend WithEvents ToggleSwitchYesterday As DevExpress.XtraEditors.ToggleSwitch
+    Friend WithEvents ToggleSwitchLastWeek As DevExpress.XtraEditors.ToggleSwitch
+    Friend WithEvents ToggleSwitchTomorrow As DevExpress.XtraEditors.ToggleSwitch
+    Friend WithEvents ToggleSwitchMonth_Last As DevExpress.XtraEditors.ToggleSwitch
+    Friend WithEvents ToggleSwitchMonth As DevExpress.XtraEditors.ToggleSwitch
+    Friend WithEvents BarButtonStartSearch As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents BarButtonReset As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents bsiStatus As DevExpress.XtraBars.BarStaticItem
+    Friend WithEvents ToggleSwitchYear As DevExpress.XtraEditors.ToggleSwitch
+    Friend WithEvents BarSubItem1 As DevExpress.XtraBars.BarSubItem
+    Friend WithEvents BarListItem1 As DevExpress.XtraBars.BarListItem
+    Friend WithEvents PictureEdit1 As DevExpress.XtraEditors.PictureEdit
+    Friend WithEvents BarToggleSwitchItemTerm As DevExpress.XtraBars.BarToggleSwitchItem
+    Friend WithEvents BarToggleSwitchItemFulltext As DevExpress.XtraBars.BarToggleSwitchItem
+    Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents XtraTabControl1 As DevExpress.XtraTab.XtraTabControl
+    Friend WithEvents XtraTabPage1 As DevExpress.XtraTab.XtraTabPage
+    Friend WithEvents XtraTabPage2 As DevExpress.XtraTab.XtraTabPage
+    Friend WithEvents lblDatefrom As DevExpress.XtraEditors.LabelControl
+    Friend WithEvents DateEditTill As DevExpress.XtraEditors.DateEdit
+    Friend WithEvents DateEditFrom As DevExpress.XtraEditors.DateEdit
+    Friend WithEvents ToggleSwitchDateto As DevExpress.XtraEditors.ToggleSwitch
+    Friend WithEvents TextEditSearch As DevExpress.XtraEditors.TextEdit
+    Friend WithEvents AdornerUIManager1 As DevExpress.Utils.VisualEffects.AdornerUIManager
+    Friend WithEvents Guide1 As DevExpress.Utils.VisualEffects.Guide
+End Class

GUIs.ZooFlow/Search/Old/frmFlowSearch1.resx

@@ -0,0 +1,231 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <assembly alias="DevExpress.Data.v21.2" name="DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+  <data name="BarButtonStartSearch.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAALoBAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KPC9z
+        dHlsZT4NCiAgPHBhdGggZD0iTTguOSw0LjFDOC40LDMuOCw4LDQuMSw4LDQuN3YyMi42YzAsMC43LDAu
+        NCwwLjksMC45LDAuNWwxNi43LTExLjNjMC41LTAuMywwLjUtMC45LDAtMS4yTDguOSw0LjF6IiBjbGFz
+        cz0iQmx1ZSIgLz4NCjwvc3ZnPgs=
+</value>
+  </data>
+  <data name="BarButtonReset.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAL4BAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KPC9z
+        dHlsZT4NCiAgPHBhdGggZD0iTTIxLDEwSDEwbDYtNmgtNmwtOCw4bDgsOGg2bC02LTZoMTFjMi44LDAs
+        NSwyLjIsNSw1cy0yLjIsNS01LDVoLTV2NGg1YzUsMCw5LTQsOS05QzMwLDE0LDI2LDEwLDIxLDEweiIg
+        Y2xhc3M9IkJsdWUiIC8+DQo8L3N2Zz4L
+</value>
+  </data>
+  <data name="bsiStatus.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAABsDAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLlllbGxvd3tmaWxsOiNGRkIxMTU7fQoJ
+        LlJlZHtmaWxsOiNEMTFDMUM7fQoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5HcmVlbntmaWxsOiMwMzlD
+        MjM7fQoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
+        Y2l0eTowLjU7fQoJLnN0MXtkaXNwbGF5Om5vbmU7fQoJLnN0MntkaXNwbGF5OmlubGluZTtmaWxsOiMw
+        MzlDMjM7fQoJLnN0M3tkaXNwbGF5OmlubGluZTtmaWxsOiNEMTFDMUM7fQoJLnN0NHtkaXNwbGF5Omlu
+        bGluZTtmaWxsOiM3MjcyNzI7fQo8L3N0eWxlPg0KICA8ZyBpZD0iQWJvdXQiPg0KICAgIDxwYXRoIGQ9
+        Ik0xNiwyQzguMywyLDIsOC4zLDIsMTZzNi4zLDE0LDE0LDE0czE0LTYuMywxNC0xNFMyMy43LDIsMTYs
+        MnogTTE2LDZjMS4xLDAsMiwwLjksMiwycy0wLjksMi0yLDJzLTItMC45LTItMiAgIFMxNC45LDYsMTYs
+        NnogTTIwLDI0aC04di0yaDJ2LThoLTJ2LTJoMmg0djEwaDJWMjR6IiBjbGFzcz0iQmx1ZSIgLz4NCiAg
+        PC9nPg0KPC9zdmc+Cw==
+</value>
+  </data>
+  <metadata name="DockManager1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 17</value>
+  </metadata>
+  <metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>58</value>
+  </metadata>
+  <data name="DockPanel1.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAANgDAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iQV9EYXRlX09jY3VyaW5nIiBzdHlsZT0iZW5hYmxlLWJhY2tncm91bmQ6
+        bmV3IDAgMCAzMiAzMiI+DQogIDxzdHlsZSB0eXBlPSJ0ZXh0L2NzcyI+CgkuQmxhY2t7ZmlsbDojNzI3
+        MjcyO30KCS5CbHVle2ZpbGw6IzExNzdENzt9CgkuUmVke2ZpbGw6I0QxMUMxQzt9Cgkuc3Qwe29wYWNp
+        dHk6MC41O30KPC9zdHlsZT4NCiAgPHBhdGggZD0iTTI4LDh2MThINFY4SDJ2MTljMCwwLjYsMC40LDEs
+        MSwxaDI2YzAuNiwwLDEtMC40LDEtMVY4SDI4eiIgY2xhc3M9IkJsYWNrIiAvPg0KICA8cGF0aCBkPSJN
+        MzAsM3Y1SDJWM2MwLTAuNiwwLjQtMSwxLTFoMjZDMjkuNiwyLDMwLDIuNCwzMCwzeiBNMTIsMThIOHY0
+        aDRWMTh6IiBjbGFzcz0iUmVkIiAvPg0KICA8ZyBjbGFzcz0ic3QwIj4NCiAgICA8cmVjdCB4PSI4IiB5
+        PSIxMiIgd2lkdGg9IjQiIGhlaWdodD0iNCIgcng9IjAiIHJ5PSIwIiBjbGFzcz0iQmxhY2siIC8+DQog
+        ICAgPHJlY3QgeD0iMTQiIHk9IjEyIiB3aWR0aD0iNCIgaGVpZ2h0PSI0IiByeD0iMCIgcnk9IjAiIGNs
+        YXNzPSJCbGFjayIgLz4NCiAgICA8cmVjdCB4PSIyMCIgeT0iMTIiIHdpZHRoPSI0IiBoZWlnaHQ9IjQi
+        IHJ4PSIwIiByeT0iMCIgY2xhc3M9IkJsYWNrIiAvPg0KICAgIDxyZWN0IHg9IjE0IiB5PSIxOCIgd2lk
+        dGg9IjQiIGhlaWdodD0iNCIgcng9IjAiIHJ5PSIwIiBjbGFzcz0iQmxhY2siIC8+DQogICAgPHJlY3Qg
+        eD0iMjAiIHk9IjE4IiB3aWR0aD0iNCIgaGVpZ2h0PSI0IiByeD0iMCIgcnk9IjAiIGNsYXNzPSJCbGFj
+        ayIgLz4NCiAgPC9nPg0KPC9zdmc+Cw==
+</value>
+  </data>
+  <data name="frmFlowSearch1.IconOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAFQEAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkdyZWVue2ZpbGw6IzAzOUMyMzt9Cgku
+        QmxhY2t7ZmlsbDojNzI3MjcyO30KCS5SZWR7ZmlsbDojRDExQzFDO30KCS5ZZWxsb3d7ZmlsbDojRkZC
+        MTE1O30KCS5CbHVle2ZpbGw6IzExNzdENzt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
+        Y2l0eTowLjU7fQoJLnN0MXtvcGFjaXR5OjAuNzU7fQo8L3N0eWxlPg0KICA8ZyBpZD0iRW5hYmxlU2Vh
+        cmNoIj4NCiAgICA8cGF0aCBkPSJNMTQuNSwxNy44QzEwLjgsMTcuMSw4LDEzLjksOCwxMGMwLTQuNCwz
+        LjYtOCw4LThzOCwzLjYsOCw4YzAsMS41LTAuNCwyLjgtMS4xLDRjMCwwLDAuMSwwLDAuMSwwICAgYzAu
+        NywwLDEuNCwwLjEsMi4xLDAuMmMwLjYtMS4zLDAuOS0yLjcsMC45LTQuMmMwLTUuNS00LjUtMTAtMTAt
+        MTBDMTAuNSwwLDYsNC41LDYsMTBjMCwyLjEsMC43LDQuMSwxLjgsNS43bC03LjUsNy42ICAgYy0wLjQs
+        MC4zLTAuNCwwLjksMCwxLjNsMS4yLDEuMmMwLjMsMC4zLDAuOSwwLjMsMS4yLDBsNy42LTcuNmMwLjks
+        MC42LDEuOSwxLjEsMi45LDEuNEMxMy42LDE5LDE0LDE4LjQsMTQuNSwxNy44eiIgY2xhc3M9IkJsdWUi
+        IC8+DQogICAgPHBhdGggZD0iTTIzLDE2Yy00LjQsMC04LjEsMy05LDdjMC45LDQsNC42LDcsOSw3YzQu
+        NCwwLDguMS0zLDktN0MzMS4xLDE5LDI3LjQsMTYsMjMsMTZ6IE0yMywyOGMtMy4zLDAtNi4xLTItNy01
+        ICAgYzAuOS0zLDMuNy01LDctNXM2LjEsMiw3LDVDMjkuMSwyNiwyNi4zLDI4LDIzLDI4eiBNMjMsMjZj
+        LTEuNywwLTMtMS4zLTMtM3MxLjMtMywzLTNzMywxLjMsMywzUzI0LjcsMjYsMjMsMjZ6IiBjbGFzcz0i
+        QmxhY2siIC8+DQogIDwvZz4NCjwvc3ZnPgs=
+</value>
+  </data>
+  <metadata name="AdornerUIManager1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>152, 17</value>
+  </metadata>
+</root>

GUIs.ZooFlow/Search/Old/frmFlowSearch1.vb

@@ -0,0 +1,265 @@
+Imports DevExpress.XtraEditors
+Imports DevExpress.XtraSplashScreen
+Imports DigitalData.GUIs.Common
+Imports DigitalData.GUIs.ZooFlow.ClassConstants
+Imports DigitalData.Modules.Logging
+Imports DigitalData.Modules.ZooFlow
+
+Public Class frmFlowSearch1
+    Private Environment As Environment
+    Private Logger As Logger
+    Private SearchRunner As Search.SearchRunner
+
+    Private Property BaseSearchSQL As String
+    Private Property TogglesDate As List(Of ToggleSwitch)
+    Private Property TogglesDateChanging As Boolean = False
+
+    Private Sub ResetTogglesDate()
+        ResetTogglesDate(Nothing)
+    End Sub
+
+    Private Sub ResetTogglesDate(pExcludeToggle As ToggleSwitch)
+        TogglesDateChanging = True
+
+        For Each oToggle As ToggleSwitch In TogglesDate
+            If pExcludeToggle IsNot Nothing Then
+                If oToggle.Name = pExcludeToggle.Name Then
+                    Continue For
+                End If
+            End If
+            oToggle.IsOn = False
+        Next
+
+        TogglesDateChanging = False
+    End Sub
+
+    Private Sub ToggleSwitchToday_Toggled(sender As Object, e As EventArgs) Handles _
+        ToggleSwitchToday.Toggled,
+        ToggleSwitchYesterday.Toggled,
+        ToggleSwitchYear.Toggled,
+        ToggleSwitchYear_Last.Toggled,
+        ToggleSwitchMonth_Last.Toggled,
+        ToggleSwitchMonth.Toggled,
+        ToggleSwitchLastWeek.Toggled,
+        ToggleSwitchTomorrow.Toggled
+
+        If TogglesDateChanging = True Then
+            Exit Sub
+        End If
+
+        Dim oToggle As ToggleSwitch = TryCast(sender, ToggleSwitch)
+
+        If oToggle.IsOn Then
+            TogglesDateChanging = True
+
+            Select Case oToggle.Name
+                Case "ToggleSwitchTomorrow"
+                    ResetTogglesDate(ToggleSwitchTomorrow)
+                    SearchRunner.SetDateConstraint(SearchRunner.DateConstraint.Tomorrow)
+
+                Case "ToggleSwitchYear"
+                    ResetTogglesDate(ToggleSwitchYear)
+                    SearchRunner.SetDateConstraint(SearchRunner.DateConstraint.CurrentYear)
+
+                Case "ToggleSwitchYear_Last"
+                    ResetTogglesDate(ToggleSwitchYear_Last)
+                    SearchRunner.SetDateConstraint(SearchRunner.DateConstraint.Today)
+
+                Case "ToggleSwitchMonth"
+                    ResetTogglesDate(ToggleSwitchMonth)
+                    SearchRunner.SetDateConstraint(SearchRunner.DateConstraint.CurrentMonth)
+
+                Case "ToggleSwitchMonth_Last"
+                    ResetTogglesDate(ToggleSwitchMonth_Last)
+                    SearchRunner.SetDateConstraint(SearchRunner.DateConstraint.LastMonth)
+
+                Case "ToggleSwitchToday"
+                    ResetTogglesDate(ToggleSwitchToday)
+                    SearchRunner.SetDateConstraint(SearchRunner.DateConstraint.Today)
+
+                Case "ToggleSwitchYesterday"
+                    ResetTogglesDate(ToggleSwitchYesterday)
+                    SearchRunner.SetDateConstraint(SearchRunner.DateConstraint.Yesterday)
+
+                Case "ToggleSwitchLastWeek"
+                    ResetTogglesDate(ToggleSwitchLastWeek)
+                    SearchRunner.SetDateConstraint(SearchRunner.DateConstraint.Last7Days)
+
+            End Select
+            TogglesDateChanging = False
+
+        Else
+            If ToggleSwitchToday.IsOn = False And ToggleSwitchYesterday.IsOn = False And ToggleSwitchYear.IsOn = False And ToggleSwitchYear_Last.IsOn = False And
+                ToggleSwitchMonth_Last.IsOn = False And ToggleSwitchMonth.IsOn = False And ToggleSwitchLastWeek.IsOn = False And ToggleSwitchTomorrow.IsOn = False Then
+                SearchRunner.SetDateConstraint()
+            End If
+        End If
+    End Sub
+
+
+
+    Private Sub cmbLimitationDateAttr_SelectedValueChanged(sender As Object, e As EventArgs) Handles cmbLimitationDateAttr.SelectedValueChanged
+        If cmbLimitationDateAttr.SelectedIndex <> -1 Then
+            Try
+
+                Dim oEditValue As String = cmbLimitationDateAttr.SelectedItem.ToString
+
+                If oEditValue = IDB_ADDED_WHEN_String_German Or oEditValue = IDB_ADDED_WHEN_String_Englisch Then
+                    SearchRunner.SetDateAttribute()
+                Else
+                    SearchRunner.SetDateAttribute(oEditValue)
+                End If
+            Catch ex As Exception
+                Logger.Error(ex)
+            End Try
+        End If
+    End Sub
+
+    Private Sub frmFlowSearch1_Load(sender As Object, e As EventArgs) Handles Me.Load
+        Logger = My.LogConfig.GetLogger()
+        SearchRunner = New Search.SearchRunner(My.LogConfig, My.Application.GetEnvironment, "FlowSearch")
+
+        Try
+            If My.Application.User.Language = "de-DE" Then
+                cmbLimitationDateAttr.Items.Add(IDB_ADDED_WHEN_String_German)
+            Else
+                cmbLimitationDateAttr.Items.Add(IDB_ADDED_WHEN_String_Englisch)
+            End If
+
+            For Each oRow As DataRow In My.Tables.DTIDB_ATTRIBUTE.Rows
+                If CBool(oRow.Item("SYS_ATTRIBUTE")) = False And (oRow.Item("TYP_ID") = 5 Or oRow.Item("TYP_ID") = 6) Then
+                    cmbLimitationDateAttr.Items.Add(oRow.Item("ATTR_TITLE"))
+                End If
+
+            Next
+            Environment = My.Application.GetEnvironment
+            'Dim editor As BarEditItem = BarEditItemDate
+            ' editor = TryCast(BarEditItemDate, ComboBoxEdit)
+            If My.Application.User.Language = "de-DE" Then
+                cmbLimitationDateAttr.SelectedIndex = 0
+                '    BarEditItemDate.EditValue = "Erstellt Wann"
+            Else
+                cmbLimitationDateAttr.SelectedIndex = 1
+                '    BarEditItemDate.EditValue = "Added When"
+            End If
+
+            For Each oRow As DataRow In My.Tables.DTIDB_COMMON_SQL.Rows
+                If oRow.Item("TITLE") = SQLCMD_FLOW_SEARCH_BASE Then
+                    BaseSearchSQL = oRow.Item("SQL_COMMAND")
+                    BaseSearchSQL = BaseSearchSQL.Replace("@USER_ID", My.Application.User.UserId)
+                    BaseSearchSQL = BaseSearchSQL.Replace("@LANG_CODE", My.Application.User.Language)
+                End If
+            Next
+
+            SearchRunner.BaseSearchSQL = BaseSearchSQL
+
+
+            Dim osql = $"EXEC PRIDB_SEARCH_AUTOSUGGEST '{My.Application.User.Language}',{My.Application.User.UserId}"
+            Dim oDTSuggest As DataTable
+            oDTSuggest = My.Database.GetDatatableIDB(osql)
+            Dim collection As AutoCompleteStringCollection = New AutoCompleteStringCollection
+            For Each orow As DataRow In oDTSuggest.Rows
+                collection.Add(orow.Item("TERM"))
+            Next
+
+            TextEditSearch.MaskBox.AutoCompleteSource = AutoCompleteSource.CustomSource
+            TextEditSearch.MaskBox.AutoCompleteMode = AutoCompleteMode.SuggestAppend
+            TextEditSearch.MaskBox.AutoCompleteCustomSource = collection
+
+            TogglesDate = New List(Of ToggleSwitch) From {
+                ToggleSwitchTomorrow,
+                ToggleSwitchToday,
+                ToggleSwitchYesterday,
+                ToggleSwitchYear,
+                ToggleSwitchYear_Last,
+                ToggleSwitchMonth,
+                ToggleSwitchMonth_Last,
+                ToggleSwitchLastWeek
+            }
+
+
+        Catch ex As Exception
+            MsgBox(ex.Message, MsgBoxStyle.Critical)
+            Logger.Error(ex)
+        End Try
+        BringToFront()
+    End Sub
+
+    Private Sub Form_NeedsRefresh(sender As Object, e As Integer)
+
+    End Sub
+
+    Private Sub BarButtonReset_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonReset.ItemClick
+        TextEditSearch.Text = ""
+        ResetTogglesDate()
+        ToggleSwitchDateto.IsOn = False
+        SearchRunner.ExplicitDate = False
+    End Sub
+
+    Private Sub ToggleSwitch1_Toggled(sender As Object, e As EventArgs) Handles ToggleSwitchDateto.Toggled
+        Dim oToggle As ToggleSwitch = TryCast(sender, ToggleSwitch)
+
+        If oToggle.IsOn Then
+            DateEditTill.Enabled = True
+            lblDatefrom.Text = "Datum von"
+        Else
+            DateEditTill.Enabled = False
+            lblDatefrom.Text = "Datum"
+        End If
+    End Sub
+
+    Private Sub DateEdit1_EditValueChanged(sender As Object, e As EventArgs) Handles DateEditFrom.EditValueChanged
+        Dim oDateFrom = DateEditFrom.EditValue
+        If Not IsNothing(oDateFrom) Then
+            ResetTogglesDate()
+            SearchRunner.ExplicitDate = True
+        End If
+    End Sub
+
+    Private Async Sub SimpleButton1_Click(sender As Object, e As EventArgs)
+        RunSearch()
+    End Sub
+    Private Async Sub RunSearch()
+        'Dim oHandle = SplashScreenManager.ShowOverlayForm(Me)
+
+        'Try
+        '    Dim oResult = Await SearchRunner.RunWithSearchTerm(TextEditSearch.Text, DateEditFrom.EditValue, DateEditTill.EditValue)
+        '    If oResult.OK = False Then
+        '        bsiStatus.Caption = oResult.ErrorMessage
+        '    End If
+        'Catch ex As Exception
+        '    Logger.Error(ex)
+        'Finally
+        '    SplashScreenManager.CloseOverlayForm(oHandle)
+        'End Try
+    End Sub
+
+    Private Sub TextEditSearch_KeyUp(sender As Object, e As KeyEventArgs) Handles TextEditSearch.KeyUp
+        If e.KeyCode = Keys.Return Then
+            If TextEditSearch.Text = String.Empty Then
+                Return
+            End If
+
+            RunSearch()
+        End If
+    End Sub
+
+    Private Sub PictureEdit1_Click(sender As Object, e As EventArgs) Handles PictureEdit1.Click
+        RunSearch()
+    End Sub
+
+    Private Async Function BarButtonItem1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) As Threading.Tasks.Task Handles BarButtonStartSearch.ItemClick
+        'Dim oHandle = SplashScreenManager.ShowOverlayForm(Me)
+
+        'Try
+        '    Dim oResult = Await SearchRunner.RunWithSearchTerm(TextEditSearch.Text, DateEditFrom.EditValue, DateEditTill.EditValue)
+        '    If oResult.OK = False Then
+        '        bsiStatus.Caption = oResult.ErrorMessage
+        '    End If
+        'Catch ex As Exception
+        '    Logger.Error(ex)
+        'Finally
+        '    SplashScreenManager.CloseOverlayForm(oHandle)
+        'End Try
+    End Function
+End Class

GUIs.ZooFlow/Search/Old/frmSearchPredefined.Designer.vb

@@ -0,0 +1,247 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class frmSearchPredefined
+    Inherits DevExpress.XtraBars.Ribbon.RibbonForm
+
+    'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
+    <System.Diagnostics.DebuggerNonUserCode()> _
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        Try
+            If disposing AndAlso components IsNot Nothing Then
+                components.Dispose()
+            End If
+        Finally
+            MyBase.Dispose(disposing)
+        End Try
+    End Sub
+
+    'Wird vom Windows Form-Designer benötigt.
+    Private components As System.ComponentModel.IContainer
+
+    'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
+    'Das Bearbeiten ist mit dem Windows Form-Designer möglich.  
+    'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+        Me.components = New System.ComponentModel.Container()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmSearchPredefined))
+        Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
+        Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
+        Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
+        Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
+        Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
+        Me.GridControl1 = New DevExpress.XtraGrid.GridControl()
+        Me.ViewMain = New DevExpress.XtraGrid.Views.BandedGrid.AdvBandedGridView()
+        Me.gridBand1 = New DevExpress.XtraGrid.Views.BandedGrid.GridBand()
+        Me.BandedGridColumn2 = New DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn()
+        Me.BandedGridColumn3 = New DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn()
+        Me.BandedGridColumn4 = New DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn()
+        Me.BandedGridColumn5 = New DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn()
+        Me.BandedGridColumn6 = New DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn()
+        Me.RepositoryItemDateEdit1 = New DevExpress.XtraEditors.Repository.RepositoryItemDateEdit()
+        Me.BandedGridColumn1 = New DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn()
+        Me.SvgImageCollection = New DevExpress.Utils.SvgImageCollection(Me.components)
+        CType(Me.RibbonControl1,System.ComponentModel.ISupportInitialize).BeginInit
+        CType(Me.GridControl1,System.ComponentModel.ISupportInitialize).BeginInit
+        CType(Me.ViewMain,System.ComponentModel.ISupportInitialize).BeginInit
+        CType(Me.RepositoryItemDateEdit1,System.ComponentModel.ISupportInitialize).BeginInit
+        CType(Me.RepositoryItemDateEdit1.CalendarTimeProperties,System.ComponentModel.ISupportInitialize).BeginInit
+        CType(Me.SvgImageCollection,System.ComponentModel.ISupportInitialize).BeginInit
+        Me.SuspendLayout
+        '
+        'RibbonControl1
+        '
+        Me.RibbonControl1.ExpandCollapseItem.Id = 0
+        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItem1})
+        Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
+        Me.RibbonControl1.MaxItemId = 2
+        Me.RibbonControl1.Name = "RibbonControl1"
+        Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
+        Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
+        Me.RibbonControl1.Size = New System.Drawing.Size(564, 159)
+        Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
+        '
+        'BarButtonItem1
+        '
+        Me.BarButtonItem1.Caption = "Neue Suche"
+        Me.BarButtonItem1.Id = 1
+        Me.BarButtonItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem1.ImageOptions.SvgImage"),DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonItem1.Name = "BarButtonItem1"
+        '
+        'RibbonPage1
+        '
+        Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup2})
+        Me.RibbonPage1.Name = "RibbonPage1"
+        Me.RibbonPage1.Text = "Start"
+        '
+        'RibbonPageGroup1
+        '
+        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem1)
+        Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
+        Me.RibbonPageGroup1.Text = "Suchfunktionen"
+        '
+        'RibbonPageGroup2
+        '
+        Me.RibbonPageGroup2.Name = "RibbonPageGroup2"
+        Me.RibbonPageGroup2.Text = "RibbonPageGroup2"
+        '
+        'RibbonStatusBar1
+        '
+        Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 611)
+        Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
+        Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
+        Me.RibbonStatusBar1.Size = New System.Drawing.Size(564, 22)
+        '
+        'RibbonPage2
+        '
+        Me.RibbonPage2.Name = "RibbonPage2"
+        Me.RibbonPage2.Text = "RibbonPage2"
+        '
+        'GridControl1
+        '
+        Me.GridControl1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.GridControl1.Location = New System.Drawing.Point(0, 159)
+        Me.GridControl1.MainView = Me.ViewMain
+        Me.GridControl1.MenuManager = Me.RibbonControl1
+        Me.GridControl1.Name = "GridControl1"
+        Me.GridControl1.RepositoryItems.AddRange(New DevExpress.XtraEditors.Repository.RepositoryItem() {Me.RepositoryItemDateEdit1})
+        Me.GridControl1.Size = New System.Drawing.Size(564, 452)
+        Me.GridControl1.TabIndex = 2
+        Me.GridControl1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.ViewMain})
+        '
+        'ViewMain
+        '
+        Me.ViewMain.Bands.AddRange(New DevExpress.XtraGrid.Views.BandedGrid.GridBand() {Me.gridBand1})
+        Me.ViewMain.Columns.AddRange(New DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn() {Me.BandedGridColumn1, Me.BandedGridColumn2, Me.BandedGridColumn3, Me.BandedGridColumn4, Me.BandedGridColumn5, Me.BandedGridColumn6})
+        Me.ViewMain.FocusRectStyle = DevExpress.XtraGrid.Views.Grid.DrawFocusRectStyle.RowFullFocus
+        Me.ViewMain.GridControl = Me.GridControl1
+        Me.ViewMain.Name = "ViewMain"
+        Me.ViewMain.OptionsBehavior.Editable = false
+        Me.ViewMain.OptionsBehavior.ReadOnly = true
+        Me.ViewMain.OptionsView.ShowBands = false
+        Me.ViewMain.OptionsView.ShowGroupPanel = false
+        Me.ViewMain.OptionsView.ShowIndicator = false
+        Me.ViewMain.OptionsView.ShowVerticalLines = DevExpress.Utils.DefaultBoolean.[False]
+        Me.ViewMain.RowSeparatorHeight = 10
+        '
+        'gridBand1
+        '
+        Me.gridBand1.Caption = "gridBand1"
+        Me.gridBand1.Columns.Add(Me.BandedGridColumn2)
+        Me.gridBand1.Columns.Add(Me.BandedGridColumn3)
+        Me.gridBand1.Columns.Add(Me.BandedGridColumn4)
+        Me.gridBand1.Columns.Add(Me.BandedGridColumn5)
+        Me.gridBand1.Columns.Add(Me.BandedGridColumn6)
+        Me.gridBand1.Name = "gridBand1"
+        Me.gridBand1.VisibleIndex = 0
+        Me.gridBand1.Width = 336
+        '
+        'BandedGridColumn2
+        '
+        Me.BandedGridColumn2.Caption = "Title"
+        Me.BandedGridColumn2.FieldName = "Title"
+        Me.BandedGridColumn2.Name = "BandedGridColumn2"
+        Me.BandedGridColumn2.Visible = true
+        Me.BandedGridColumn2.Width = 336
+        '
+        'BandedGridColumn3
+        '
+        Me.BandedGridColumn3.Caption = "Results"
+        Me.BandedGridColumn3.FieldName = "Results"
+        Me.BandedGridColumn3.Name = "BandedGridColumn3"
+        Me.BandedGridColumn3.RowIndex = 1
+        Me.BandedGridColumn3.Visible = true
+        Me.BandedGridColumn3.Width = 84
+        '
+        'BandedGridColumn4
+        '
+        Me.BandedGridColumn4.Caption = "Changes"
+        Me.BandedGridColumn4.FieldName = "Changes"
+        Me.BandedGridColumn4.Name = "BandedGridColumn4"
+        Me.BandedGridColumn4.RowIndex = 1
+        Me.BandedGridColumn4.Visible = true
+        Me.BandedGridColumn4.Width = 84
+        '
+        'BandedGridColumn5
+        '
+        Me.BandedGridColumn5.Caption = "Overdue"
+        Me.BandedGridColumn5.FieldName = "Overdue"
+        Me.BandedGridColumn5.Name = "BandedGridColumn5"
+        Me.BandedGridColumn5.RowIndex = 1
+        Me.BandedGridColumn5.Visible = true
+        Me.BandedGridColumn5.Width = 84
+        '
+        'BandedGridColumn6
+        '
+        Me.BandedGridColumn6.Caption = "LastChange"
+        Me.BandedGridColumn6.ColumnEdit = Me.RepositoryItemDateEdit1
+        Me.BandedGridColumn6.FieldName = "LastChange"
+        Me.BandedGridColumn6.Name = "BandedGridColumn6"
+        Me.BandedGridColumn6.RowIndex = 1
+        Me.BandedGridColumn6.Visible = true
+        Me.BandedGridColumn6.Width = 84
+        '
+        'RepositoryItemDateEdit1
+        '
+        Me.RepositoryItemDateEdit1.AutoHeight = false
+        Me.RepositoryItemDateEdit1.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
+        Me.RepositoryItemDateEdit1.CalendarTimeProperties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
+        Me.RepositoryItemDateEdit1.Name = "RepositoryItemDateEdit1"
+        '
+        'BandedGridColumn1
+        '
+        Me.BandedGridColumn1.Caption = "UserID"
+        Me.BandedGridColumn1.FieldName = "UserID"
+        Me.BandedGridColumn1.Name = "BandedGridColumn1"
+        Me.BandedGridColumn1.Visible = true
+        '
+        'SvgImageCollection
+        '
+        Me.SvgImageCollection.Add("green_arrow_up", "image://svgimages/icon builder/actions_arrow4up.svg")
+        Me.SvgImageCollection.Add("warning", "image://svgimages/outlook inspired/highimportance.svg")
+        '
+        'frmPreSearch
+        '
+        Me.AllowFormGlass = DevExpress.Utils.DefaultBoolean.[True]
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6!, 13!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(564, 633)
+        Me.Controls.Add(Me.GridControl1)
+        Me.Controls.Add(Me.RibbonStatusBar1)
+        Me.Controls.Add(Me.RibbonControl1)
+        Me.IconOptions.SvgImage = CType(resources.GetObject("frmPreSearch.IconOptions.SvgImage"),DevExpress.Utils.Svg.SvgImage)
+        Me.Name = "frmPreSearch"
+        Me.Ribbon = Me.RibbonControl1
+        Me.StatusBar = Me.RibbonStatusBar1
+        Me.Text = "Vordefinierte Suchen"
+        CType(Me.RibbonControl1,System.ComponentModel.ISupportInitialize).EndInit
+        CType(Me.GridControl1,System.ComponentModel.ISupportInitialize).EndInit
+        CType(Me.ViewMain,System.ComponentModel.ISupportInitialize).EndInit
+        CType(Me.RepositoryItemDateEdit1.CalendarTimeProperties,System.ComponentModel.ISupportInitialize).EndInit
+        CType(Me.RepositoryItemDateEdit1,System.ComponentModel.ISupportInitialize).EndInit
+        CType(Me.SvgImageCollection,System.ComponentModel.ISupportInitialize).EndInit
+        Me.ResumeLayout(false)
+        Me.PerformLayout
+
+End Sub
+
+    Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
+    Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
+    Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents RibbonPageGroup2 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar
+    Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage
+    Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents GridControl1 As DevExpress.XtraGrid.GridControl
+    Friend WithEvents ViewMain As DevExpress.XtraGrid.Views.BandedGrid.AdvBandedGridView
+    Friend WithEvents SvgImageCollection As DevExpress.Utils.SvgImageCollection
+    Friend WithEvents BandedGridColumn2 As DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn
+    Friend WithEvents BandedGridColumn3 As DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn
+    Friend WithEvents BandedGridColumn4 As DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn
+    Friend WithEvents BandedGridColumn5 As DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn
+    Friend WithEvents BandedGridColumn1 As DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn
+    Friend WithEvents gridBand1 As DevExpress.XtraGrid.Views.BandedGrid.GridBand
+    Friend WithEvents BandedGridColumn6 As DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn
+    Friend WithEvents RepositoryItemDateEdit1 As DevExpress.XtraEditors.Repository.RepositoryItemDateEdit
+End Class

GUIs.ZooFlow/Search/Old/frmSearchPredefined.resx

@@ -0,0 +1,170 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <assembly alias="DevExpress.Data.v21.2" name="DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+  <data name="BarButtonItem1.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAFQEAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkdyZWVue2ZpbGw6IzAzOUMyMzt9Cgku
+        QmxhY2t7ZmlsbDojNzI3MjcyO30KCS5SZWR7ZmlsbDojRDExQzFDO30KCS5ZZWxsb3d7ZmlsbDojRkZC
+        MTE1O30KCS5CbHVle2ZpbGw6IzExNzdENzt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
+        Y2l0eTowLjU7fQoJLnN0MXtvcGFjaXR5OjAuNzU7fQo8L3N0eWxlPg0KICA8ZyBpZD0iRW5hYmxlU2Vh
+        cmNoIj4NCiAgICA8cGF0aCBkPSJNMTQuNSwxNy44QzEwLjgsMTcuMSw4LDEzLjksOCwxMGMwLTQuNCwz
+        LjYtOCw4LThzOCwzLjYsOCw4YzAsMS41LTAuNCwyLjgtMS4xLDRjMCwwLDAuMSwwLDAuMSwwICAgYzAu
+        NywwLDEuNCwwLjEsMi4xLDAuMmMwLjYtMS4zLDAuOS0yLjcsMC45LTQuMmMwLTUuNS00LjUtMTAtMTAt
+        MTBDMTAuNSwwLDYsNC41LDYsMTBjMCwyLjEsMC43LDQuMSwxLjgsNS43bC03LjUsNy42ICAgYy0wLjQs
+        MC4zLTAuNCwwLjksMCwxLjNsMS4yLDEuMmMwLjMsMC4zLDAuOSwwLjMsMS4yLDBsNy42LTcuNmMwLjks
+        MC42LDEuOSwxLjEsMi45LDEuNEMxMy42LDE5LDE0LDE4LjQsMTQuNSwxNy44eiIgY2xhc3M9IkJsdWUi
+        IC8+DQogICAgPHBhdGggZD0iTTIzLDE2Yy00LjQsMC04LjEsMy05LDdjMC45LDQsNC42LDcsOSw3YzQu
+        NCwwLDguMS0zLDktN0MzMS4xLDE5LDI3LjQsMTYsMjMsMTZ6IE0yMywyOGMtMy4zLDAtNi4xLTItNy01
+        ICAgYzAuOS0zLDMuNy01LDctNXM2LjEsMiw3LDVDMjkuMSwyNiwyNi4zLDI4LDIzLDI4eiBNMjMsMjZj
+        LTEuNywwLTMtMS4zLTMtM3MxLjMtMywzLTNzMywxLjMsMywzUzI0LjcsMjYsMjMsMjZ6IiBjbGFzcz0i
+        QmxhY2siIC8+DQogIDwvZz4NCjwvc3ZnPgs=
+</value>
+  </data>
+  <metadata name="SvgImageCollection.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 17</value>
+  </metadata>
+  <data name="frmPreSearch.IconOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAPcCAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iRmluZCIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAgMzIg
+        MzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9Cjwvc3R5
+        bGU+DQogIDxwYXRoIGQ9Ik0yOS41LDE5LjdMMjkuNSwxOS43TDI5LjUsMTkuN0MyOS41LDE5LjcsMjku
+        NSwxOS43LDI5LjUsMTkuN0wyMy44LDZsMCwwYy0wLjQtMS4yLTEuNS0yLTIuOC0yICBjLTEuNywwLTMs
+        MS4zLTMsM3YzaC00VjdjMC0xLjctMS4zLTMtMy0zQzkuNyw0LDguNiw0LjksOC4yLDZsMCwwTDIuNSwx
+        OS43YzAsMCwwLDAsMCwwbDAsMGgwQzIuMiwyMC40LDIsMjEuMiwyLDIyICBjMCwzLjMsMi43LDYsNiw2
+        czYtMi43LDYtNnYtNGg0djRjMCwzLjMsMi43LDYsNiw2czYtMi43LDYtNkMzMCwyMS4yLDI5LjgsMjAu
+        NCwyOS41LDE5Ljd6IE04LDI2Yy0yLjIsMC00LTEuOC00LTRzMS44LTQsNC00ICBzNCwxLjgsNCw0UzEw
+        LjIsMjYsOCwyNnogTTI0LDI2Yy0yLjIsMC00LTEuOC00LTRzMS44LTQsNC00czQsMS44LDQsNFMyNi4y
+        LDI2LDI0LDI2eiIgY2xhc3M9IkJsYWNrIiAvPg0KPC9zdmc+Cw==
+</value>
+  </data>
+</root>

GUIs.ZooFlow/Search/Old/frmSearchPredefined.vb

@@ -0,0 +1,100 @@
+Imports DevExpress.XtraEditors
+Imports DevExpress.XtraGrid
+Imports DevExpress.XtraBars.Ribbon
+Imports DigitalData.Modules.Logging
+Public Class frmSearchPredefined
+    Private Logger As Logger
+    Public Sub New()
+        ' Dieser Aufruf ist für den Designer erforderlich.
+        InitializeComponent()
+        ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
+        Logger = My.LogConfig.GetLogger()
+    End Sub
+    Private Sub frmPreSearch_Load(sender As Object, e As EventArgs) Handles Me.Load
+        GridControl1.DataSource = LoadSearches()
+
+        Dim oChangesColumn = ViewMain.Columns.Item("Changes")
+        Dim oOverdueColumn = ViewMain.Columns.Item("Overdue")
+        Dim oResultsColumn = ViewMain.Columns.Item("Results")
+        Dim oTitleColumn = ViewMain.Columns.Item("Title")
+        Dim oUserIdColumn = ViewMain.Columns.Item("UserID")
+        Dim oLastChangeColumn = ViewMain.Columns.Item("LastChange")
+
+        Dim oChangesRule = GetChangesFormatRule()
+        oChangesRule.Column = oChangesColumn
+
+        Dim oOverdueRule = GetOverdueFormatRule()
+        oOverdueRule.Column = oOverdueColumn
+
+        Dim oResultsRule = GetResultsFormatRule()
+        oResultsRule.Column = oResultsColumn
+
+        ViewMain.FormatRules.AddRange({oChangesRule, oResultsRule, oOverdueRule})
+
+        oTitleColumn.AppearanceCell.FontStyleDelta = FontStyle.Bold
+        oTitleColumn.AppearanceCell.FontSizeDelta = 1
+    End Sub
+
+    Private Function GetResultsFormatRule() As GridFormatRule
+        Dim gridFormatRule As New GridFormatRule()
+        Dim formatConditionRuleDataBar As New FormatConditionRuleDataBar With {
+            .PredefinedName = "Yellow",
+            .AutomaticType = FormatConditionAutomaticType.ZeroBased
+        }
+        gridFormatRule.Rule = formatConditionRuleDataBar
+
+        Return gridFormatRule
+    End Function
+
+    Private Function GetOverdueFormatRule() As GridFormatRule
+        Dim oFormatRule As New GridFormatRule()
+        Dim oRule As New FormatConditionRuleIconSet With {
+            .IconSet = New FormatConditionIconSet()
+        }
+        Dim oIconSet As FormatConditioniconset = oRule.IconSet
+        oIconSet.ValueType = FormatConditionValueType.Number
+        
+        Dim oIcon1 As New FormatConditioniconseticon() With {
+            .Icon = SvgImageCollection.GetImage("warning"),
+            .Value = 0,
+            .ValueComparison = FormatConditionComparisonType.Greater
+        }      
+
+        oIconSet.Icons.AddRange({oIcon1})
+
+        oFormatRule.Rule = oRule
+
+        Return oFormatRule
+    End Function
+
+    Private Function GetChangesFormatRule() As GridFormatRule
+        Dim oFormatRule As New GridFormatRule()
+        Dim oRule As New FormatConditionRuleIconSet With {
+            .IconSet = New FormatConditionIconSet()        
+        }
+        Dim oIconSet As FormatConditioniconset = oRule.IconSet
+        oIconSet.ValueType = FormatConditionValueType.Number
+        
+        Dim oIcon1 As New FormatConditioniconseticon() With {
+            .Icon = SvgImageCollection.GetImage("green_arrow_up"),
+            .Value = 2,
+            .ValueComparison = FormatConditionComparisonType.Greater     
+        }
+      
+        oIconSet.Icons.AddRange({oIcon1})
+
+        oFormatRule.Rule = oRule
+
+        Return oFormatRule
+    End Function
+
+    Private Function LoadSearches() As DataTable
+        Dim oSQL = $"SELECT * FROM VWIDB_SEARCH_LANDING"
+        Dim oDTLanding As DataTable = My.DatabaseIDB.GetDatatable(oSQL)
+        Return oDTLanding
+    End Function
+
+    Private Sub BarButtonItem1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem1.ItemClick
+
+    End Sub
+End Class

GUIs.ZooFlow/Search/Old/frmSearchStart.Designer.vb

@@ -0,0 +1,578 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
+Partial Class frmSearchStart
+    Inherits DevExpress.XtraBars.Ribbon.RibbonForm
+
+    'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
+    <System.Diagnostics.DebuggerNonUserCode()>
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        Try
+            If disposing AndAlso components IsNot Nothing Then
+                components.Dispose()
+            End If
+        Finally
+            MyBase.Dispose(disposing)
+        End Try
+    End Sub
+
+    'Wird vom Windows Form-Designer benötigt.
+    Private components As System.ComponentModel.IContainer
+
+    'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
+    'Das Bearbeiten ist mit dem Windows Form-Designer möglich.  
+    'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
+    <System.Diagnostics.DebuggerStepThrough()>
+    Private Sub InitializeComponent()
+        Me.components = New System.ComponentModel.Container()
+        Dim SplashScreenManager As DevExpress.XtraSplashScreen.SplashScreenManager = New DevExpress.XtraSplashScreen.SplashScreenManager(Me, Nothing, true, true)
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmSearchStart))
+        Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
+        Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
+        Me.BarButtonNewSearch = New DevExpress.XtraBars.BarButtonItem()
+        Me.BarButtonSaveSearch = New DevExpress.XtraBars.BarButtonItem()
+        Me.BarHeaderItem1 = New DevExpress.XtraBars.BarHeaderItem()
+        Me.BarEditItem1 = New DevExpress.XtraBars.BarEditItem()
+        Me.RepositoryItemRadioGroup1 = New DevExpress.XtraEditors.Repository.RepositoryItemRadioGroup()
+        Me.BarButtonClearSearch = New DevExpress.XtraBars.BarButtonItem()
+        Me.BarButtonItem3 = New DevExpress.XtraBars.BarButtonItem()
+        Me.BarEditItem2 = New DevExpress.XtraBars.BarEditItem()
+        Me.RepositoryItemComboBox1 = New DevExpress.XtraEditors.Repository.RepositoryItemComboBox()
+        Me.BarStaticItemInfo = New DevExpress.XtraBars.BarStaticItem()
+        Me.BarButtonStartSearch = New DevExpress.XtraBars.BarButtonItem()
+        Me.BarStaticItem1 = New DevExpress.XtraBars.BarStaticItem()
+        Me.txtFilterFrom = New DevExpress.XtraBars.BarEditItem()
+        Me.RepositoryItemDateEdit1 = New DevExpress.XtraEditors.Repository.RepositoryItemDateEdit()
+        Me.txtFilterTo = New DevExpress.XtraBars.BarEditItem()
+        Me.RepositoryItemDateEdit2 = New DevExpress.XtraEditors.Repository.RepositoryItemDateEdit()
+        Me.cmbFilterTimeframe = New DevExpress.XtraBars.BarEditItem()
+        Me.RepositoryItemComboBox2 = New DevExpress.XtraEditors.Repository.RepositoryItemComboBox()
+        Me.BarCheckboxOpenSearchInSameWindow = New DevExpress.XtraBars.BarCheckItem()
+        Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
+        Me.BarButtonItem4 = New DevExpress.XtraBars.BarButtonItem()
+        Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
+        Me.RibbonPageGroupFunctions = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonPageGroupProfiles = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonPageGroupFilter = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonPageGroupSettings = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RepositoryItemTextEdit1 = New DevExpress.XtraEditors.Repository.RepositoryItemTextEdit()
+        Me.RepositoryItemTimeSpanEdit1 = New DevExpress.XtraEditors.Repository.RepositoryItemTimeSpanEdit()
+        Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
+        Me.pnlProfileChoose = New System.Windows.Forms.Panel()
+        Me.cmbProfile = New System.Windows.Forms.ComboBox()
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.XtraTabControl1 = New DevExpress.XtraTab.XtraTabControl()
+        Me.XtraTabPage1 = New DevExpress.XtraTab.XtraTabPage()
+        Me.XtraTabPage2 = New DevExpress.XtraTab.XtraTabPage()
+        Me.XtraTabPage3 = New DevExpress.XtraTab.XtraTabPage()
+        Me.XtraTabPage4 = New DevExpress.XtraTab.XtraTabPage()
+        Me.XtraTabPage5 = New DevExpress.XtraTab.XtraTabPage()
+        Me.XtraTabPage6 = New DevExpress.XtraTab.XtraTabPage()
+        Me.XtraTabPage7 = New DevExpress.XtraTab.XtraTabPage()
+        Me.XtraTabPage8 = New DevExpress.XtraTab.XtraTabPage()
+        Me.XtraTabPage9 = New DevExpress.XtraTab.XtraTabPage()
+        Me.XtraTabPage10 = New DevExpress.XtraTab.XtraTabPage()
+        Me.ContextMenuStripSearchTerms = New System.Windows.Forms.ContextMenuStrip(Me.components)
+        Me.tsmOperator = New System.Windows.Forms.ToolStripMenuItem()
+        Me.BracketLeftToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.KlammerRechtsToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.KlammerEntfernenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.SplitContainerControlSearch = New DevExpress.XtraEditors.SplitContainerControl()
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.RepositoryItemRadioGroup1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.RepositoryItemComboBox1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.RepositoryItemDateEdit1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.RepositoryItemDateEdit1.CalendarTimeProperties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.RepositoryItemDateEdit2, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.RepositoryItemDateEdit2.CalendarTimeProperties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.RepositoryItemComboBox2, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.RepositoryItemTextEdit1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.RepositoryItemTimeSpanEdit1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.pnlProfileChoose.SuspendLayout()
+        CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.XtraTabControl1.SuspendLayout()
+        Me.ContextMenuStripSearchTerms.SuspendLayout()
+        CType(Me.SplitContainerControlSearch, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SplitContainerControlSearch.SuspendLayout()
+        Me.SuspendLayout()
+        '
+        'SplashScreenManager
+        '
+        SplashScreenManager.ClosingDelay = 500
+        '
+        'RibbonControl1
+        '
+        Me.RibbonControl1.AutoSizeItems = True
+        Me.RibbonControl1.CaptionBarItemLinks.Add(Me.BarButtonItem2)
+        Me.RibbonControl1.ExpandCollapseItem.Id = 0
+        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.BarButtonItem2, Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonNewSearch, Me.BarButtonSaveSearch, Me.BarHeaderItem1, Me.BarEditItem1, Me.BarButtonClearSearch, Me.BarButtonItem3, Me.BarEditItem2, Me.BarStaticItemInfo, Me.BarButtonStartSearch, Me.BarStaticItem1, Me.txtFilterFrom, Me.txtFilterTo, Me.cmbFilterTimeframe, Me.BarCheckboxOpenSearchInSameWindow, Me.BarButtonItem1, Me.BarButtonItem4})
+        Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
+        Me.RibbonControl1.MaxItemId = 25
+        Me.RibbonControl1.Name = "RibbonControl1"
+        Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
+        Me.RibbonControl1.RepositoryItems.AddRange(New DevExpress.XtraEditors.Repository.RepositoryItem() {Me.RepositoryItemRadioGroup1, Me.RepositoryItemComboBox1, Me.RepositoryItemTextEdit1, Me.RepositoryItemDateEdit1, Me.RepositoryItemDateEdit2, Me.RepositoryItemComboBox2, Me.RepositoryItemTimeSpanEdit1})
+        Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
+        Me.RibbonControl1.ShowItemCaptionsInCaptionBar = True
+        Me.RibbonControl1.ShowPageHeadersMode = DevExpress.XtraBars.Ribbon.ShowPageHeadersMode.Hide
+        Me.RibbonControl1.Size = New System.Drawing.Size(1020, 132)
+        Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
+        '
+        'BarButtonItem2
+        '
+        Me.BarButtonItem2.Caption = "Fenster wiederherstellen"
+        Me.BarButtonItem2.Id = 23
+        Me.BarButtonItem2.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonItem2.Name = "BarButtonItem2"
+        Me.BarButtonItem2.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
+        '
+        'BarButtonNewSearch
+        '
+        Me.BarButtonNewSearch.Caption = "Neue Suche"
+        Me.BarButtonNewSearch.Id = 1
+        Me.BarButtonNewSearch.ImageOptions.Image = CType(resources.GetObject("BarButtonNewSearch.ImageOptions.Image"), System.Drawing.Image)
+        Me.BarButtonNewSearch.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonNewSearch.ImageOptions.LargeImage"), System.Drawing.Image)
+        Me.BarButtonNewSearch.Name = "BarButtonNewSearch"
+        '
+        'BarButtonSaveSearch
+        '
+        Me.BarButtonSaveSearch.Caption = "Suchprofil speichern"
+        Me.BarButtonSaveSearch.Id = 2
+        Me.BarButtonSaveSearch.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonSaveSearch.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonSaveSearch.Name = "BarButtonSaveSearch"
+        '
+        'BarHeaderItem1
+        '
+        Me.BarHeaderItem1.Caption = "BarHeaderItem1"
+        Me.BarHeaderItem1.Id = 3
+        Me.BarHeaderItem1.Name = "BarHeaderItem1"
+        '
+        'BarEditItem1
+        '
+        Me.BarEditItem1.Caption = "BarEditItem1"
+        Me.BarEditItem1.Edit = Me.RepositoryItemRadioGroup1
+        Me.BarEditItem1.Id = 4
+        Me.BarEditItem1.Name = "BarEditItem1"
+        '
+        'RepositoryItemRadioGroup1
+        '
+        Me.RepositoryItemRadioGroup1.Name = "RepositoryItemRadioGroup1"
+        '
+        'BarButtonClearSearch
+        '
+        Me.BarButtonClearSearch.Caption = "Suche leeren"
+        Me.BarButtonClearSearch.Id = 5
+        Me.BarButtonClearSearch.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonClearSearch.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonClearSearch.Name = "BarButtonClearSearch"
+        '
+        'BarButtonItem3
+        '
+        Me.BarButtonItem3.Caption = "BarButtonItem3"
+        Me.BarButtonItem3.Id = 6
+        Me.BarButtonItem3.Name = "BarButtonItem3"
+        '
+        'BarEditItem2
+        '
+        Me.BarEditItem2.Edit = Me.RepositoryItemComboBox1
+        Me.BarEditItem2.EditWidth = 100
+        Me.BarEditItem2.Id = 7
+        Me.BarEditItem2.Name = "BarEditItem2"
+        '
+        'RepositoryItemComboBox1
+        '
+        Me.RepositoryItemComboBox1.AutoHeight = False
+        Me.RepositoryItemComboBox1.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
+        Me.RepositoryItemComboBox1.Name = "RepositoryItemComboBox1"
+        '
+        'BarStaticItemInfo
+        '
+        Me.BarStaticItemInfo.Id = 8
+        Me.BarStaticItemInfo.Name = "BarStaticItemInfo"
+        '
+        'BarButtonStartSearch
+        '
+        Me.BarButtonStartSearch.Caption = "Finden (F5)"
+        Me.BarButtonStartSearch.Id = 9
+        Me.BarButtonStartSearch.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonStartSearch.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonStartSearch.Name = "BarButtonStartSearch"
+        '
+        'BarStaticItem1
+        '
+        Me.BarStaticItem1.Caption = "Suchen"
+        Me.BarStaticItem1.Id = 12
+        Me.BarStaticItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarStaticItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarStaticItem1.Name = "BarStaticItem1"
+        Me.BarStaticItem1.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph
+        '
+        'txtFilterFrom
+        '
+        Me.txtFilterFrom.Caption = "Von"
+        Me.txtFilterFrom.Edit = Me.RepositoryItemDateEdit1
+        Me.txtFilterFrom.EditWidth = 100
+        Me.txtFilterFrom.Id = 15
+        Me.txtFilterFrom.Name = "txtFilterFrom"
+        '
+        'RepositoryItemDateEdit1
+        '
+        Me.RepositoryItemDateEdit1.AutoHeight = False
+        Me.RepositoryItemDateEdit1.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
+        Me.RepositoryItemDateEdit1.CalendarTimeProperties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
+        Me.RepositoryItemDateEdit1.Name = "RepositoryItemDateEdit1"
+        Me.RepositoryItemDateEdit1.NullDate = ""
+        '
+        'txtFilterTo
+        '
+        Me.txtFilterTo.Caption = "Bis"
+        Me.txtFilterTo.Edit = Me.RepositoryItemDateEdit2
+        Me.txtFilterTo.EditWidth = 100
+        Me.txtFilterTo.Id = 16
+        Me.txtFilterTo.Name = "txtFilterTo"
+        '
+        'RepositoryItemDateEdit2
+        '
+        Me.RepositoryItemDateEdit2.AutoHeight = False
+        Me.RepositoryItemDateEdit2.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
+        Me.RepositoryItemDateEdit2.CalendarTimeProperties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
+        Me.RepositoryItemDateEdit2.Name = "RepositoryItemDateEdit2"
+        Me.RepositoryItemDateEdit2.NullDate = ""
+        '
+        'cmbFilterTimeframe
+        '
+        Me.cmbFilterTimeframe.Caption = "Zeitraum"
+        Me.cmbFilterTimeframe.Edit = Me.RepositoryItemComboBox2
+        Me.cmbFilterTimeframe.EditWidth = 100
+        Me.cmbFilterTimeframe.Id = 17
+        Me.cmbFilterTimeframe.Name = "cmbFilterTimeframe"
+        '
+        'RepositoryItemComboBox2
+        '
+        Me.RepositoryItemComboBox2.AutoHeight = False
+        Me.RepositoryItemComboBox2.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
+        Me.RepositoryItemComboBox2.Name = "RepositoryItemComboBox2"
+        '
+        'BarCheckboxOpenSearchInSameWindow
+        '
+        Me.BarCheckboxOpenSearchInSameWindow.Caption = "Ergebnis in gleichem Fenster öffnen"
+        Me.BarCheckboxOpenSearchInSameWindow.Id = 21
+        Me.BarCheckboxOpenSearchInSameWindow.ImageOptions.SvgImage = CType(resources.GetObject("BarCheckboxOpenSearchInSameWindow.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarCheckboxOpenSearchInSameWindow.Name = "BarCheckboxOpenSearchInSameWindow"
+        '
+        'BarButtonItem1
+        '
+        Me.BarButtonItem1.Caption = "Fenster wiederherstellen"
+        Me.BarButtonItem1.Id = 22
+        Me.BarButtonItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonItem1.Name = "BarButtonItem1"
+        '
+        'BarButtonItem4
+        '
+        Me.BarButtonItem4.Caption = "BarButtonItem4"
+        Me.BarButtonItem4.Id = 24
+        Me.BarButtonItem4.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem4.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonItem4.Name = "BarButtonItem4"
+        '
+        'RibbonPage1
+        '
+        Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroupFunctions, Me.RibbonPageGroupProfiles, Me.RibbonPageGroupFilter, Me.RibbonPageGroupSettings, Me.RibbonPageGroup1})
+        Me.RibbonPage1.Name = "RibbonPage1"
+        Me.RibbonPage1.Text = "Start"
+        '
+        'RibbonPageGroupFunctions
+        '
+        Me.RibbonPageGroupFunctions.ItemLinks.Add(Me.BarButtonNewSearch)
+        Me.RibbonPageGroupFunctions.ItemLinks.Add(Me.BarButtonClearSearch)
+        Me.RibbonPageGroupFunctions.ItemLinks.Add(Me.BarButtonSaveSearch)
+        Me.RibbonPageGroupFunctions.Name = "RibbonPageGroupFunctions"
+        Me.RibbonPageGroupFunctions.Text = "Suchfunktionen"
+        '
+        'RibbonPageGroupProfiles
+        '
+        Me.RibbonPageGroupProfiles.ItemLinks.Add(Me.BarEditItem2)
+        Me.RibbonPageGroupProfiles.Name = "RibbonPageGroupProfiles"
+        Me.RibbonPageGroupProfiles.Text = "Auswahl Suche"
+        '
+        'RibbonPageGroupFilter
+        '
+        Me.RibbonPageGroupFilter.ItemLinks.Add(Me.cmbFilterTimeframe)
+        Me.RibbonPageGroupFilter.ItemLinks.Add(Me.txtFilterFrom)
+        Me.RibbonPageGroupFilter.ItemLinks.Add(Me.txtFilterTo)
+        Me.RibbonPageGroupFilter.Name = "RibbonPageGroupFilter"
+        Me.RibbonPageGroupFilter.Text = "Filter"
+        '
+        'RibbonPageGroupSettings
+        '
+        Me.RibbonPageGroupSettings.ItemLinks.Add(Me.BarCheckboxOpenSearchInSameWindow)
+        Me.RibbonPageGroupSettings.Name = "RibbonPageGroupSettings"
+        Me.RibbonPageGroupSettings.Text = "Sucheinstellungen"
+        '
+        'RibbonPageGroup1
+        '
+        Me.RibbonPageGroup1.Alignment = DevExpress.XtraBars.Ribbon.RibbonPageGroupAlignment.Far
+        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonStartSearch)
+        Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
+        Me.RibbonPageGroup1.Text = "RibbonPageGroup1"
+        '
+        'RepositoryItemTextEdit1
+        '
+        Me.RepositoryItemTextEdit1.AutoHeight = False
+        Me.RepositoryItemTextEdit1.Name = "RepositoryItemTextEdit1"
+        '
+        'RepositoryItemTimeSpanEdit1
+        '
+        Me.RepositoryItemTimeSpanEdit1.AutoHeight = False
+        Me.RepositoryItemTimeSpanEdit1.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
+        Me.RepositoryItemTimeSpanEdit1.Name = "RepositoryItemTimeSpanEdit1"
+        '
+        'RibbonStatusBar1
+        '
+        Me.RibbonStatusBar1.ItemLinks.Add(Me.BarStaticItemInfo)
+        Me.RibbonStatusBar1.ItemLinks.Add(Me.BarButtonItem4)
+        Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 453)
+        Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
+        Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
+        Me.RibbonStatusBar1.Size = New System.Drawing.Size(1020, 24)
+        '
+        'pnlProfileChoose
+        '
+        Me.pnlProfileChoose.BackColor = System.Drawing.Color.Transparent
+        Me.pnlProfileChoose.Controls.Add(Me.cmbProfile)
+        Me.pnlProfileChoose.Controls.Add(Me.Label1)
+        Me.pnlProfileChoose.Dock = System.Windows.Forms.DockStyle.Top
+        Me.pnlProfileChoose.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.pnlProfileChoose.Location = New System.Drawing.Point(0, 132)
+        Me.pnlProfileChoose.Margin = New System.Windows.Forms.Padding(2, 3, 2, 3)
+        Me.pnlProfileChoose.Name = "pnlProfileChoose"
+        Me.pnlProfileChoose.Size = New System.Drawing.Size(1020, 57)
+        Me.pnlProfileChoose.TabIndex = 5
+        '
+        'cmbProfile
+        '
+        Me.cmbProfile.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.cmbProfile.DisplayMember = "DOKART_ID"
+        Me.cmbProfile.FormattingEnabled = True
+        Me.cmbProfile.Location = New System.Drawing.Point(3, 23)
+        Me.cmbProfile.Name = "cmbProfile"
+        Me.cmbProfile.Size = New System.Drawing.Size(1015, 21)
+        Me.cmbProfile.TabIndex = 2
+        Me.cmbProfile.ValueMember = "DOKART_ID"
+        '
+        'Label1
+        '
+        Me.Label1.AutoSize = True
+        Me.Label1.ImeMode = System.Windows.Forms.ImeMode.NoControl
+        Me.Label1.Location = New System.Drawing.Point(3, 3)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(131, 13)
+        Me.Label1.TabIndex = 1
+        Me.Label1.Text = "Bitte wählen Sie ein Profil:"
+        '
+        'XtraTabControl1
+        '
+        Me.XtraTabControl1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.XtraTabControl1.HeaderLocation = DevExpress.XtraTab.TabHeaderLocation.Bottom
+        Me.XtraTabControl1.Location = New System.Drawing.Point(0, 0)
+        Me.XtraTabControl1.MultiLine = DevExpress.Utils.DefaultBoolean.[False]
+        Me.XtraTabControl1.Name = "XtraTabControl1"
+        Me.XtraTabControl1.SelectedTabPage = Me.XtraTabPage1
+        Me.XtraTabControl1.Size = New System.Drawing.Size(1020, 264)
+        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(1018, 239)
+        Me.XtraTabPage1.Text = "Search#1"
+        '
+        'XtraTabPage2
+        '
+        Me.XtraTabPage2.Name = "XtraTabPage2"
+        Me.XtraTabPage2.Size = New System.Drawing.Size(1018, 239)
+        Me.XtraTabPage2.Text = "Search#2"
+        '
+        'XtraTabPage3
+        '
+        Me.XtraTabPage3.Name = "XtraTabPage3"
+        Me.XtraTabPage3.Size = New System.Drawing.Size(1018, 239)
+        Me.XtraTabPage3.Text = "Search#3"
+        '
+        'XtraTabPage4
+        '
+        Me.XtraTabPage4.Name = "XtraTabPage4"
+        Me.XtraTabPage4.Size = New System.Drawing.Size(1018, 239)
+        Me.XtraTabPage4.Text = "Search#4"
+        '
+        'XtraTabPage5
+        '
+        Me.XtraTabPage5.Name = "XtraTabPage5"
+        Me.XtraTabPage5.Size = New System.Drawing.Size(1018, 239)
+        Me.XtraTabPage5.Text = "Search#5"
+        '
+        'XtraTabPage6
+        '
+        Me.XtraTabPage6.Name = "XtraTabPage6"
+        Me.XtraTabPage6.Size = New System.Drawing.Size(1018, 239)
+        Me.XtraTabPage6.Text = "Search#6"
+        '
+        'XtraTabPage7
+        '
+        Me.XtraTabPage7.Name = "XtraTabPage7"
+        Me.XtraTabPage7.Size = New System.Drawing.Size(1018, 239)
+        Me.XtraTabPage7.Text = "Search#7"
+        '
+        'XtraTabPage8
+        '
+        Me.XtraTabPage8.Name = "XtraTabPage8"
+        Me.XtraTabPage8.Size = New System.Drawing.Size(1018, 239)
+        Me.XtraTabPage8.Text = "Search#8"
+        '
+        'XtraTabPage9
+        '
+        Me.XtraTabPage9.Name = "XtraTabPage9"
+        Me.XtraTabPage9.Size = New System.Drawing.Size(1018, 239)
+        Me.XtraTabPage9.Text = "Search#9"
+        '
+        'XtraTabPage10
+        '
+        Me.XtraTabPage10.Name = "XtraTabPage10"
+        Me.XtraTabPage10.Size = New System.Drawing.Size(1018, 239)
+        Me.XtraTabPage10.Text = "Search#10"
+        '
+        'ContextMenuStripSearchTerms
+        '
+        Me.ContextMenuStripSearchTerms.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsmOperator, Me.BracketLeftToolStripMenuItem, Me.KlammerRechtsToolStripMenuItem, Me.KlammerEntfernenToolStripMenuItem})
+        Me.ContextMenuStripSearchTerms.Name = "ContextMenuStripSearchTerms"
+        Me.ContextMenuStripSearchTerms.Size = New System.Drawing.Size(177, 92)
+        '
+        'tsmOperator
+        '
+        Me.tsmOperator.Name = "tsmOperator"
+        Me.tsmOperator.Size = New System.Drawing.Size(176, 22)
+        Me.tsmOperator.Text = "Operator = oder"
+        '
+        'BracketLeftToolStripMenuItem
+        '
+        Me.BracketLeftToolStripMenuItem.Name = "BracketLeftToolStripMenuItem"
+        Me.BracketLeftToolStripMenuItem.Size = New System.Drawing.Size(176, 22)
+        Me.BracketLeftToolStripMenuItem.Text = "Klammer links ("
+        '
+        'KlammerRechtsToolStripMenuItem
+        '
+        Me.KlammerRechtsToolStripMenuItem.Name = "KlammerRechtsToolStripMenuItem"
+        Me.KlammerRechtsToolStripMenuItem.Size = New System.Drawing.Size(176, 22)
+        Me.KlammerRechtsToolStripMenuItem.Text = "Klammer rechts )"
+        '
+        'KlammerEntfernenToolStripMenuItem
+        '
+        Me.KlammerEntfernenToolStripMenuItem.Name = "KlammerEntfernenToolStripMenuItem"
+        Me.KlammerEntfernenToolStripMenuItem.Size = New System.Drawing.Size(176, 22)
+        Me.KlammerEntfernenToolStripMenuItem.Text = "Klammer entfernen"
+        '
+        'SplitContainerControlSearch
+        '
+        Me.SplitContainerControlSearch.Collapsed = True
+        Me.SplitContainerControlSearch.CollapsePanel = DevExpress.XtraEditors.SplitCollapsePanel.Panel2
+        Me.SplitContainerControlSearch.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.SplitContainerControlSearch.FixedPanel = DevExpress.XtraEditors.SplitFixedPanel.Panel2
+        Me.SplitContainerControlSearch.Location = New System.Drawing.Point(0, 189)
+        Me.SplitContainerControlSearch.Name = "SplitContainerControlSearch"
+        Me.SplitContainerControlSearch.Panel1.Controls.Add(Me.XtraTabControl1)
+        Me.SplitContainerControlSearch.Panel1.Text = "Panel1"
+        Me.SplitContainerControlSearch.Panel2.Text = "Panel2"
+        Me.SplitContainerControlSearch.PanelVisibility = DevExpress.XtraEditors.SplitPanelVisibility.Panel1
+        Me.SplitContainerControlSearch.Size = New System.Drawing.Size(1020, 264)
+        Me.SplitContainerControlSearch.SplitterPosition = 310
+        Me.SplitContainerControlSearch.TabIndex = 16
+        '
+        'frmSearchStart
+        '
+        Me.AllowFormGlass = DevExpress.Utils.DefaultBoolean.[True]
+        Me.Appearance.Options.UseFont = True
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(1020, 477)
+        Me.Controls.Add(Me.SplitContainerControlSearch)
+        Me.Controls.Add(Me.pnlProfileChoose)
+        Me.Controls.Add(Me.RibbonStatusBar1)
+        Me.Controls.Add(Me.RibbonControl1)
+        Me.IconOptions.Image = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.ZOO_FLOW__sysicon_256
+        Me.IconOptions.SvgImageColorizationMode = DevExpress.Utils.SvgImageColorizationMode.Full
+        Me.KeyPreview = True
+        Me.Name = "frmSearchStart"
+        Me.Ribbon = Me.RibbonControl1
+        Me.StatusBar = Me.RibbonStatusBar1
+        Me.Text = "ZooFlow Suche"
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.RepositoryItemRadioGroup1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.RepositoryItemComboBox1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.RepositoryItemDateEdit1.CalendarTimeProperties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.RepositoryItemDateEdit1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.RepositoryItemDateEdit2.CalendarTimeProperties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.RepositoryItemDateEdit2, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.RepositoryItemComboBox2, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.RepositoryItemTextEdit1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.RepositoryItemTimeSpanEdit1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.pnlProfileChoose.ResumeLayout(False)
+        Me.pnlProfileChoose.PerformLayout()
+        CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.XtraTabControl1.ResumeLayout(False)
+        Me.ContextMenuStripSearchTerms.ResumeLayout(False)
+        CType(Me.SplitContainerControlSearch, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.SplitContainerControlSearch.ResumeLayout(False)
+        Me.ResumeLayout(False)
+        Me.PerformLayout
+
+End Sub
+
+    Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
+    Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
+    Friend WithEvents RibbonPageGroupFunctions As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar
+    Friend WithEvents pnlProfileChoose As Panel
+    Friend WithEvents cmbProfile As ComboBox
+    Friend WithEvents Label1 As Label
+    Friend WithEvents BarButtonNewSearch As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents BarButtonSaveSearch As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents XtraTabControl1 As DevExpress.XtraTab.XtraTabControl
+    Friend WithEvents XtraTabPage1 As DevExpress.XtraTab.XtraTabPage
+    Friend WithEvents XtraTabPage2 As DevExpress.XtraTab.XtraTabPage
+    Friend WithEvents XtraTabPage3 As DevExpress.XtraTab.XtraTabPage
+    Friend WithEvents XtraTabPage4 As DevExpress.XtraTab.XtraTabPage
+    Friend WithEvents XtraTabPage5 As DevExpress.XtraTab.XtraTabPage
+    Friend WithEvents XtraTabPage6 As DevExpress.XtraTab.XtraTabPage
+    Friend WithEvents XtraTabPage7 As DevExpress.XtraTab.XtraTabPage
+    Friend WithEvents XtraTabPage8 As DevExpress.XtraTab.XtraTabPage
+    Friend WithEvents XtraTabPage9 As DevExpress.XtraTab.XtraTabPage
+    Friend WithEvents XtraTabPage10 As DevExpress.XtraTab.XtraTabPage
+    Friend WithEvents BarHeaderItem1 As DevExpress.XtraBars.BarHeaderItem
+    Friend WithEvents BarEditItem1 As DevExpress.XtraBars.BarEditItem
+    Friend WithEvents RepositoryItemRadioGroup1 As DevExpress.XtraEditors.Repository.RepositoryItemRadioGroup
+    Friend WithEvents BarButtonClearSearch As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents BarButtonItem3 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents SplitContainerControlSearch As DevExpress.XtraEditors.SplitContainerControl
+    Friend WithEvents BarEditItem2 As DevExpress.XtraBars.BarEditItem
+    Friend WithEvents RepositoryItemComboBox1 As DevExpress.XtraEditors.Repository.RepositoryItemComboBox
+    Friend WithEvents RibbonPageGroupProfiles As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents BarStaticItemInfo As DevExpress.XtraBars.BarStaticItem
+    Friend WithEvents ContextMenuStripSearchTerms As ContextMenuStrip
+    Friend WithEvents tsmOperator As ToolStripMenuItem
+    Friend WithEvents BracketLeftToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents KlammerRechtsToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents KlammerEntfernenToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents BarButtonStartSearch As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents RibbonPageGroupFilter As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents BarStaticItem1 As DevExpress.XtraBars.BarStaticItem
+    Friend WithEvents RepositoryItemTextEdit1 As DevExpress.XtraEditors.Repository.RepositoryItemTextEdit
+    Friend WithEvents txtFilterFrom As DevExpress.XtraBars.BarEditItem
+    Friend WithEvents RepositoryItemDateEdit1 As DevExpress.XtraEditors.Repository.RepositoryItemDateEdit
+    Friend WithEvents txtFilterTo As DevExpress.XtraBars.BarEditItem
+    Friend WithEvents RepositoryItemDateEdit2 As DevExpress.XtraEditors.Repository.RepositoryItemDateEdit
+    Friend WithEvents cmbFilterTimeframe As DevExpress.XtraBars.BarEditItem
+    Friend WithEvents RepositoryItemComboBox2 As DevExpress.XtraEditors.Repository.RepositoryItemComboBox
+    Friend WithEvents RepositoryItemTimeSpanEdit1 As DevExpress.XtraEditors.Repository.RepositoryItemTimeSpanEdit
+    Friend WithEvents BarCheckboxOpenSearchInSameWindow As DevExpress.XtraBars.BarCheckItem
+    Friend WithEvents RibbonPageGroupSettings As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents BarButtonItem4 As DevExpress.XtraBars.BarButtonItem
+End Class

GUIs.ZooFlow/Search/Old/frmSearchStart.resx

@@ -0,0 +1,294 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <assembly alias="DevExpress.Data.v21.2" name="DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+  <data name="BarButtonItem2.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAACECAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iRmlsbF9Eb3duIiBzdHlsZT0iZW5hYmxlLWJhY2tncm91bmQ6bmV3IDAg
+        MCAzMiAzMiI+DQogIDxzdHlsZSB0eXBlPSJ0ZXh0L2NzcyI+CgkuQmx1ZXtmaWxsOiMxMTc3RDc7fQoJ
+        LkJsYWNre2ZpbGw6IzcyNzI3Mjt9Cgkuc3Qwe29wYWNpdHk6MC41O30KPC9zdHlsZT4NCiAgPGcgY2xh
+        c3M9InN0MCI+DQogICAgPHBhdGggZD0iTTI4LDEwdjIwSDJWMTBoMTB2Nkg3LjNMMTUsMjcuNkwyMi43
+        LDE2SDE4di02SDI4eiIgY2xhc3M9IkJsYWNrIiAvPg0KICA8L2c+DQogIDxwYXRoIGQ9Ik0yOCw4SDJW
+        MmgyNlY4eiBNMTQsMTB2OGgtM2w0LDZsNC02aC0zdi04SDE0eiIgY2xhc3M9IkJsdWUiIC8+DQo8L3N2
+        Zz4L
+</value>
+  </data>
+  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
+  <data name="BarButtonNewSearch.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
+        dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAbdEVYdFRpdGxlAEFkZDtQbHVzO0JhcnM7UmliYm9u
+        O5UGMy8AAABgSURBVDhP3YxRCoAwDEN3QS/lqbxdtNKUTDJEHAh+vNGl6WsAXmFDsqwbkphtx4bkR4Kc
+        bceGRAUjzofFp0wVFPEnWrzk1e0CJfMS6I7ME4w4Sp1Ad8SGhII4/kZwD9oOmV+r+RzWkL4AAAAASUVO
+        RK5CYII=
+</value>
+  </data>
+  <data name="BarButtonNewSearch.ImageOptions.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
+        dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAbdEVYdFRpdGxlAEFkZDtQbHVzO0JhcnM7UmliYm9u
+        O5UGMy8AAACPSURBVFhH7c5RCoQwDEVRN+imXJW7i82HIOlFHhKiSD4Owp1p+xYzexXGShgrYayEsRJG
+        xbrtdhV/V2FU9IAe0AP+PSBeniW+46bg6HCG+I6bgqPDGeI7bgqODmeI77gpqJTLFRgVNGB8b13PnzAq
+        xoXfG/AERkUPoAHji/+9g1HRA7JgrISxEsZKGOvYcgB55Y6E3tOuXgAAAABJRU5ErkJggg==
+</value>
+  </data>
+  <data name="BarButtonSaveSearch.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAIYBAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgdmlld0JveD0iMCAwIDI1
+        IDI1IiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcvMjAwMC9zdmciIGlkPSJFYmVuZV8xIj4NCiAgPGRl
+        ZnM+DQogICAgPHN0eWxlPi5jbHMtMXtmaWxsOiM3MDZmNmY7fTwvc3R5bGU+DQogIDwvZGVmcz4NCiAg
+        PHBhdGggZD0iTTE5LjgzMzMsMS41VjkuOTM4Mkg1LjE2NjdWMS41SDEuNXYyMmgyMlYxLjVabTAsMTgu
+        NTMyOEg1LjE2Njd2LTYuNTVIMTkuODMzM1oiIGNsYXNzPSJjbHMtMSIgLz4NCiAgPHBhdGggZD0iTTYu
+        NzgzNywxLjVWOC4wNWg4LjQzODJWMS41Wk05LjUyMjYsNi44MTA1SDguMDA1OVYyLjczOTJIOS41MjI2
+        WiIgY2xhc3M9ImNscy0xIiAvPg0KPC9zdmc+Cw==
+</value>
+  </data>
+  <data name="BarButtonClearSearch.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAOgBAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgdmlld0JveD0iMCAwIDI1
+        IDI1IiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcvMjAwMC9zdmciIGlkPSJFYmVuZV8xIj4NCiAgPGRl
+        ZnM+DQogICAgPHN0eWxlPi5jbHMtMXtmaWxsOiNhNTI0MzE7fS5jbHMtMntmaWxsOiM2NDYzNjM7fTwv
+        c3R5bGU+DQogIDwvZGVmcz4NCiAgPHBhdGggZD0iTTEzLjk5MywxOC41ODE5bDguODQxLTguODQxYTIu
+        Mjc0MiwyLjI3NDIsMCwwLDAsMC0zLjIxNmwtNC4zNTktNC4zNTlhMi4yNzQyLDIuMjc0MiwwLDAsMC0z
+        LjIxNiwwbC04Ljg0MSw4Ljg0MVoiIGNsYXNzPSJjbHMtMSIgLz4NCiAgPHBhdGggZD0iTTUuNjQyLDEx
+        Ljc4MzFsLTMuNDc2LDMuNDc2YTIuMjc0MiwyLjI3NDIsMCwwLDAsMCwzLjIxNmw0LjM1OSw0LjM1OWEy
+        LjI3NDIsMi4yNzQyLDAsMCwwLDMuMjE2LDBsMy40NzYtMy40NzZaIiBjbGFzcz0iY2xzLTIiIC8+DQo8
+        L3N2Zz4L
+</value>
+  </data>
+  <data name="BarButtonStartSearch.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAALcBAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTmV4dCIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAgMzIg
+        MzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KPC9zdHls
+        ZT4NCiAgPHBhdGggZD0iTTguOSw0LjFDOC40LDMuOCw4LDQuMSw4LDQuNnYyMC43YzAsMC42LDAuNCww
+        LjgsMC45LDAuNWwxNi44LTEwLjNjMC41LTAuMywwLjUtMC44LDAtMS4xTDguOSw0LjF6IiBjbGFzcz0i
+        Qmx1ZSIgLz4NCjwvc3ZnPgs=
+</value>
+  </data>
+  <data name="BarStaticItem1.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAPcCAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iRmluZCIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAgMzIg
+        MzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9Cjwvc3R5
+        bGU+DQogIDxwYXRoIGQ9Ik0yOS41LDE5LjdMMjkuNSwxOS43TDI5LjUsMTkuN0MyOS41LDE5LjcsMjku
+        NSwxOS43LDI5LjUsMTkuN0wyMy44LDZsMCwwYy0wLjQtMS4yLTEuNS0yLTIuOC0yICBjLTEuNywwLTMs
+        MS4zLTMsM3YzaC00VjdjMC0xLjctMS4zLTMtMy0zQzkuNyw0LDguNiw0LjksOC4yLDZsMCwwTDIuNSwx
+        OS43YzAsMCwwLDAsMCwwbDAsMGgwQzIuMiwyMC40LDIsMjEuMiwyLDIyICBjMCwzLjMsMi43LDYsNiw2
+        czYtMi43LDYtNnYtNGg0djRjMCwzLjMsMi43LDYsNiw2czYtMi43LDYtNkMzMCwyMS4yLDI5LjgsMjAu
+        NCwyOS41LDE5Ljd6IE04LDI2Yy0yLjIsMC00LTEuOC00LTRzMS44LTQsNC00ICBzNCwxLjgsNCw0UzEw
+        LjIsMjYsOCwyNnogTTI0LDI2Yy0yLjIsMC00LTEuOC00LTRzMS44LTQsNC00czQsMS44LDQsNFMyNi4y
+        LDI2LDI0LDI2eiIgY2xhc3M9IkJsYWNrIiAvPg0KPC9zdmc+Cw==
+</value>
+  </data>
+  <data name="BarCheckboxOpenSearchInSameWindow.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAGgFAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgdmlld0JveD0iMCAwIDI1
+        IDI1IiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcvMjAwMC9zdmciIGlkPSJFYmVuZV8xIj4NCiAgPGRl
+        ZnM+DQogICAgPHN0eWxlPi5jbHMtMXtmaWxsOiM2NDYzNjM7fS5jbHMtMntmaWxsOiNhNTI0MzE7fTwv
+        c3R5bGU+DQogIDwvZGVmcz4NCiAgPHBhdGggZD0iTTE5LjQ0LDEzLjA4SDUuMzU1M1YxLjUyM0gxOS40
+        NFpNNy4xOTc3LDExLjE0ODJoMTAuNFYzLjQ1NDZINy4xOTc3WiIgY2xhc3M9ImNscy0xIiAvPg0KICA8
+        cGF0aCBkPSJNMTcuMDY4MiwyMy40NzdjLTQuMTE2NiwwLTcuMzI1NS00LjIxNTEtNy40Ni00LjM5NDhs
+        LS40NzE0LS42Mjg3LjQ3MTQtLjYyODhjLjEzNDktLjE4LDMuMzQzOC00LjM5NDMsNy40Ni00LjM5NDNz
+        Ny4zMjU1LDQuMjE0Niw3LjQ2LDQuMzk0M0wyNSwxOC40NTM1bC0uNDcxNC42Mjg3QzI0LjM5MzcsMTku
+        MjYxOSwyMS4xODQ4LDIzLjQ3NywxNy4wNjgyLDIzLjQ3N1ptLTUuNDkyMS01LjAyMzVjLjk2MjYsMS4w
+        NDY2LDMuMTAwOSwzLjAyODcsNS40OTIxLDMuMDI4N1MyMS41OTc3LDE5LjUsMjIuNTYsMTguNDUzNWMt
+        Ljk2MjYtMS4wNDYxLTMuMTAxLTMuMDI4My01LjQ5MjEtMy4wMjgzUzEyLjUzODcsMTcuNDA3NCwxMS41
+        NzYxLDE4LjQ1MzVaIiBjbGFzcz0iY2xzLTEiIC8+DQogIDxwYXRoIGQ9Ik0xOS42NTMsMTguNDUzNWEy
+        LjY5ODgsMi42OTg4LDAsMCwwLTIuNTg1My0yLjc5OTIsMi40MjUxLDIuNDI1MSwwLDAsMC0xLjM1OTUu
+        NDIyNSwxLjM1OSwxLjM1OSwwLDAsMSwuMjYzOS44MDYsMS4yNjEsMS4yNjEsMCwwLDEtMS4yMDczLDEu
+        MzA4MSwxLjEwMTcsMS4xMDE3LDAsMCwxLS4yNjctLjAzNDhjLS4wMDkyLjA5NzctLjAxNDYuMTk3MS0u
+        MDE0Ni4yOTc0YTIuNjk4MSwyLjY5ODEsMCwwLDAsMi41ODQ1LDIuNzk5MSwyLjY5ODcsMi42OTg3LDAs
+        MCwwLDIuNTg1My0yLjc5OTEiIGNsYXNzPSJjbHMtMSIgLz4NCiAgPHBhdGggZD0iTTkuNjA3OCwxOS4w
+        ODIybC0uNDcxNC0uNjI4Ny4yMjA5LS4yOTQ3SDEuODQyNHYtNy45NDZIMTIuMjQxOHY1LjA0MzRhMTAu
+        NjIyNywxMC42MjI3LDAsMCwxLDEuODQyNC0xLjExNDJWOC4yMThIMFYyMC4xNTM2SDEwLjU0MjhBMTIu
+        Mzc4MywxMi4zNzgzLDAsMCwxLDkuNjA3OCwxOS4wODIyWiIgY2xhc3M9ImNscy0xIiAvPg0KICA8cmVj
+        dCB4PSI1LjM1NTMiIHk9IjEuNTIzIiB3aWR0aD0iMTQuMDg0MiIgaGVpZ2h0PSI1Ljk2MjciIHJ4PSIw
+        IiByeT0iMCIgY2xhc3M9ImNscy0yIiAvPg0KICA8cmVjdCB4PSIwIiB5PSI4LjIxOCIgd2lkdGg9IjE0
+        LjA5OTQiIGhlaWdodD0iNS45NjI3IiByeD0iMCIgcnk9IjAiIGNsYXNzPSJjbHMtMiIgLz4NCjwvc3Zn
+        Pgs=
+</value>
+  </data>
+  <data name="BarButtonItem1.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAACECAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iRmlsbF9Eb3duIiBzdHlsZT0iZW5hYmxlLWJhY2tncm91bmQ6bmV3IDAg
+        MCAzMiAzMiI+DQogIDxzdHlsZSB0eXBlPSJ0ZXh0L2NzcyI+CgkuQmx1ZXtmaWxsOiMxMTc3RDc7fQoJ
+        LkJsYWNre2ZpbGw6IzcyNzI3Mjt9Cgkuc3Qwe29wYWNpdHk6MC41O30KPC9zdHlsZT4NCiAgPGcgY2xh
+        c3M9InN0MCI+DQogICAgPHBhdGggZD0iTTI4LDEwdjIwSDJWMTBoMTB2Nkg3LjNMMTUsMjcuNkwyMi43
+        LDE2SDE4di02SDI4eiIgY2xhc3M9IkJsYWNrIiAvPg0KICA8L2c+DQogIDxwYXRoIGQ9Ik0yOCw4SDJW
+        MmgyNlY4eiBNMTQsMTB2OGgtM2w0LDZsNC02aC0zdi04SDE0eiIgY2xhc3M9IkJsdWUiIC8+DQo8L3N2
+        Zz4L
+</value>
+  </data>
+  <data name="BarButtonItem4.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAIcCAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLlJlZHtmaWxsOiNEMTFDMUM7fQoJLkJs
+        YWNre2ZpbGw6IzcyNzI3Mjt9CgkuQmx1ZXtmaWxsOiMxMTc3RDc7fQoJLkdyZWVue2ZpbGw6IzAzOUMy
+        Mzt9CgkuWWVsbG93e2ZpbGw6I0ZGQjExNTt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
+        Y2l0eTowLjU7fQoJLnN0MXtvcGFjaXR5OjAuNzU7fQoJLnN0MntvcGFjaXR5OjAuMjU7fQo8L3N0eWxl
+        Pg0KICA8ZyBpZD0iRm9yd2FyZF8xXyI+DQogICAgPHBhdGggZD0iTTE2LDJDOC4zLDIsMiw4LjMsMiwx
+        NnM2LjMsMTQsMTQsMTRzMTQtNi4zLDE0LTE0UzIzLjcsMiwxNiwyeiBNMTYsMjR2LTZIOHYtNGg4Vjhs
+        OCw4TDE2LDI0eiIgY2xhc3M9IkdyZWVuIiAvPg0KICA8L2c+DQo8L3N2Zz4L
+</value>
+  </data>
+  <metadata name="ContextMenuStripSearchTerms.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>189, 17</value>
+  </metadata>
+  <metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>73</value>
+  </metadata>
+</root>

GUIs.ZooFlow/Search/SavedSearch.vb

@@ -0,0 +1,49 @@
+Imports System.Xml.Serialization
+Imports DevExpress.Utils.Svg
+
+Namespace SavedSearch
+    Public MustInherit Class SavedSearch
+        Public Property Name As String
+        Public Property Description As String
+        Public Property Image As SvgImage
+        Public Property Selected As Boolean
+        Public Overridable Property GroupText As String = ""
+
+        Public ReadOnly Property DisplayName As String
+            Get
+                Return Name
+            End Get
+        End Property
+    End Class
+
+    Public Class PredefinedDateSearch
+        Inherits SavedSearch
+
+        'Public Property Image As SvgImage
+        Public Overrides Property GroupText As String = "Vordefiniert"
+
+        Public Property DateConstraint As Search.SearchRunner.DateConstraint
+    End Class
+
+    Public Class CustomSearch
+        Inherits SavedSearch
+
+        'Public Property Image As SvgImage
+        Public Overrides Property GroupText As String = "Eigene"
+
+        Public Tokens As New List(Of Search.SearchToken.Token)
+    End Class
+
+    <XmlInclude(GetType(Search.SearchToken.Token))>
+    <XmlInclude(GetType(Search.SearchToken.AttributeValueToken))>
+    <XmlInclude(GetType(Search.SearchToken.ValueOnlyToken))>
+    Public Class CustomSearchSerializable
+        Public Property Name As String
+        Public Property Description As String
+        Public Property ImageName As String
+        Public Property GroupText As String
+        Public Property Tokens As New List(Of Search.SearchToken.Token)
+    End Class
+End Namespace
+
+

GUIs.ZooFlow/Search/SearchLoader.vb

@@ -0,0 +1,216 @@
+Imports System.IO
+Imports System.Xml.Serialization
+Imports DevExpress.Utils
+Imports DevExpress.Utils.Svg
+Imports DigitalData.GUIs.ZooFlow.Search.SearchToken
+Imports DigitalData.Modules.Base
+Imports DigitalData.Modules.Config
+Imports DigitalData.Modules.Logging
+Imports DigitalData.Modules.Language
+Imports DigitalData.Modules.Database
+Imports DigitalData.Modules.ZooFlow.State
+
+Namespace Search
+    Public Class SearchLoader
+        Inherits BaseClass
+
+        Private ReadOnly Images As SvgImageCollection
+        Private ReadOnly ImageTable As List(Of ImageTableItem)
+        Private ReadOnly Serializer As XmlSerializer
+        Private ReadOnly Database As MSSQLServer
+        Private ReadOnly UserState As UserState
+
+        Public Sub New(pLogConfig As LogConfig, pDatabase As MSSQLServer, pUserState As UserState, pSvgImages As SvgImageCollection)
+            MyBase.New(pLogConfig)
+
+            Images = pSvgImages
+            ImageTable = GetImageTable(pSvgImages)
+            Database = pDatabase
+            UserState = pUserState
+            Serializer = New XmlSerializer(GetType(SavedSearch.CustomSearchSerializable))
+        End Sub
+
+        Public Sub CreateCustomSearch(pTitle As String, pDescription As String, pTokens As List(Of Token), pImage As String)
+            Dim oSearch As New SavedSearch.CustomSearch With {
+                .Name = pTitle,
+                .Description = pDescription,
+                .Tokens = pTokens,
+                .Image = Images.Item(pImage)
+            }
+
+            Try
+                Dim oBuffer As Byte() = SerializeSearch(oSearch)
+                Dim oBase64 = System.Convert.ToBase64String(oBuffer)
+
+                If Database.ExecuteNonQuery(
+                    $"INSERT INTO TBIDB_SEARCH_DEFINITION (TITLE, DESCRIPTION, XML_VALUE, SYS_SEARCH, ADDED_WHO) 
+                    VALUES ('{pTitle}', '{pDescription}', '{oBase64}', 0, '{UserState.UserName}')"
+                ) = True Then
+                    Dim oSearchId = Database.GetScalarValue("SELECT MAX(GUID) FROM TBIDB_SEARCH_DEFINITION")
+                    Database.ExecuteNonQuery(
+                        $"INSERT INTO TBIDB_SEARCH_DEF_RELATIONS (SEARCH_ID, USR_ID, ADDED_WHO)
+                        VALUES ({oSearchId}, {UserState.UserId}, '{UserState.UserName}')")
+                End If
+            Catch ex As Exception
+                Logger.Warn("Custom Search could not be saved!")
+                Logger.Error(ex)
+            End Try
+        End Sub
+
+        Public Function LoadSearches() As List(Of SavedSearch.SavedSearch)
+            Dim oSearches As New List(Of SavedSearch.SavedSearch)
+            Dim oCustomSearches = LoadCustomSearches()
+            Dim oPredefinedSearches = LoadPredefinedSearches()
+
+            Return oSearches.
+                Concat(oCustomSearches).
+                Concat(oPredefinedSearches).
+                ToList()
+        End Function
+
+        Public Function LoadCustomSearches() As List(Of SavedSearch.SavedSearch)
+            Dim oSearches As New List(Of SavedSearch.SavedSearch)
+            Dim oSQL As String = $"
+                SELECT DEF.*
+                FROM [TBIDB_SEARCH_DEFINITION] DEF
+                JOIN [TBIDB_SEARCH_DEF_RELATIONS] REL ON REL.SEARCH_ID = DEF.GUID
+                WHERE REL.USR_ID = {UserState.UserId}
+            "
+            Dim oTable = Database.GetDatatable(oSQL)
+
+            For Each oRow As DataRow In oTable.Rows
+                Dim oBase64 = oRow.Item("XML_VALUE")
+                Dim oBuffer = System.Convert.FromBase64String(oBase64)
+                Dim oSearch = DeserializeSearch(oBuffer)
+                oSearches.Add(oSearch)
+            Next
+
+            Return oSearches
+        End Function
+
+        Public Function LoadPredefinedSearches() As List(Of SavedSearch.SavedSearch)
+            Return New List(Of SavedSearch.SavedSearch) From {
+                New SavedSearch.PredefinedDateSearch() With {
+                    .Name = "Heute",
+                    .Description = "Dokumente, die heute abgelegt wurden",
+                    .DateConstraint = SearchRunner.DateConstraint.Today,
+                    .Image = Images.Item("today")
+                },
+                New SavedSearch.PredefinedDateSearch() With {
+                    .Name = "Gestern",
+                    .Description = "Dokumente, die gestern abgelegt wurden",
+                    .DateConstraint = SearchRunner.DateConstraint.Yesterday,
+                    .Image = Images.Item("yesterday")
+                },
+                New SavedSearch.PredefinedDateSearch() With {
+                    .Name = "Letzte 7 Tage",
+                    .Description = "Dokumente, die in den letzten 7 Tagen abgelegt wurden",
+                    .DateConstraint = SearchRunner.DateConstraint.Last7Days,
+                    .Image = Images.Item("week")
+                },
+                New SavedSearch.PredefinedDateSearch() With {
+                    .Name = "Dieser Monat",
+                    .Description = "Dokumente, die in diesem Monat abgelegt wurden",
+                    .DateConstraint = SearchRunner.DateConstraint.CurrentMonth,
+                    .Image = Images.Item("month")
+                },
+                New SavedSearch.PredefinedDateSearch() With {
+                    .Name = "Letzter Monat",
+                    .Description = "Dokumente, die im letzten Monat abgelegt wurden",
+                    .DateConstraint = SearchRunner.DateConstraint.LastMonth,
+                    .Image = Images.Item("month")
+                },
+                New SavedSearch.PredefinedDateSearch() With {
+                    .Name = "Dieses Jahr",
+                    .Description = "Dokumente, die in diesem Jahr abgelegt wurden",
+                    .DateConstraint = SearchRunner.DateConstraint.CurrentYear,
+                    .Image = Images.Item("year")
+                },
+                New SavedSearch.PredefinedDateSearch() With {
+                    .Name = "Letztes Jahr",
+                    .Description = "Dokumente, die im letzten Jahr abgelegt wurden",
+                    .DateConstraint = SearchRunner.DateConstraint.LastYear,
+                    .Image = Images.Item("year")
+                }
+            }
+        End Function
+
+        Private Function ConvertSvgImageToString(pImage As SvgImage) As String
+            Dim oItem = ImageTable.Where(Function(item) item.Image.Equals(pImage)).FirstOrDefault()
+            If oItem Is Nothing Then
+                Return Nothing
+            End If
+
+            Return oItem.Name
+        End Function
+
+        Private Function ConvertStringToImageName(pName As String) As SvgImage
+            Dim oItem = ImageTable.Where(Function(item) item.Name.Equals(pName)).FirstOrDefault()
+            If oItem Is Nothing Then
+                Return Nothing
+            End If
+
+            Return oItem.Image
+        End Function
+
+        Private Function GetImageTable(pImageCollection As SvgImageCollection) As List(Of ImageTableItem)
+            Dim oList As New List(Of ImageTableItem)
+
+            For Each oImageName In pImageCollection.Keys
+                Dim oSvgImage = pImageCollection.Item(oImageName)
+                oList.Add(New ImageTableItem(oImageName, oSvgImage))
+            Next
+
+            Return oList
+        End Function
+
+        Private Function SerializeSearch(pSearch As SavedSearch.CustomSearch) As Byte()
+            Try
+                Dim oSearch As New SavedSearch.CustomSearchSerializable With {
+                    .Name = pSearch.Name,
+                    .Description = pSearch.Description,
+                    .GroupText = pSearch.GroupText,
+                    .Tokens = pSearch.Tokens,
+                    .ImageName = ConvertSvgImageToString(pSearch.Image)
+                }
+
+                Using oStream As New MemoryStream
+                    Serializer.Serialize(oStream, oSearch)
+                    Return oStream.ToArray()
+                End Using
+            Catch ex As Exception
+                Logger.Error(ex)
+                Return Nothing
+            End Try
+        End Function
+
+        Private Function DeserializeSearch(pBytes As Byte()) As SavedSearch.CustomSearch
+            Try
+                Using oStream As New MemoryStream(pBytes)
+                    Dim oSearch As SavedSearch.CustomSearchSerializable = Serializer.Deserialize(oStream)
+
+                    Return New SavedSearch.CustomSearch With {
+                        .Name = oSearch.Name,
+                        .Description = oSearch.Description,
+                        .GroupText = oSearch.GroupText,
+                        .Tokens = oSearch.Tokens,
+                        .Image = ConvertStringToImageName(oSearch.ImageName)
+                    }
+                End Using
+            Catch ex As Exception
+                Logger.Error(ex)
+                Return Nothing
+            End Try
+        End Function
+
+        Private Class ImageTableItem
+            Public ReadOnly Name As String
+            Public ReadOnly Image As SvgImage
+
+            Public Sub New(pName As String, pImage As SvgImage)
+                Name = pName
+                Image = pImage
+            End Sub
+        End Class
+    End Class
+End Namespace

GUIs.ZooFlow/Search/SearchRunner.vb

@@ -0,0 +1,445 @@
+Imports DigitalData.GUIs.Common
+Imports DigitalData.Modules.Base
+Imports DigitalData.Modules.Logging
+Imports DigitalData.Modules.ZooFlow
+Imports System.Threading.Tasks
+
+Namespace Search
+    Public Class SearchRunner
+        Inherits BaseClass
+
+        Private Const SEARCH_FACT_DATE_DEFAULT As String = "ADDED_WHEN"
+
+        Public Const CREATED_TOMORROW As String = "TOMORROW"
+        Public Const CREATED_TODAY As String = "ECM_CREATED_TODAY"
+        Public Const CREATED_YESTERDAY As String = "ECM_CREATED_YESTERDAY"
+        Public Const CREATED_LAST_7_DAYS As String = "ECM_CREATED_LAST7DAYS"
+        Public Const CREATED_YEAR_CURRENT As String = "ECM_CREATED_YEAR_CURRENT"
+        Public Const CREATED_YEAR_LAST As String = "ECM_CREATED_YEAR_LAST"
+        Public Const CREATED_MONTH_CURR As String = "ECM_CREATED_MONTH_CURRENT"
+        Public Const CREATED_MONTH_LAST As String = "ECM_CREATED_MONTH_LAST"
+
+        Public Enum DateConstraint
+            Today
+            Tomorrow
+            Yesterday
+            Last7Days
+            CurrentMonth
+            LastMonth
+            CurrentYear
+            LastYear
+            Undefined
+        End Enum
+
+        Public Enum TokenOperator
+            [And]
+            [Or]
+        End Enum
+
+        Public Event NeedsRefresh As EventHandler(Of Integer)
+        Public Event NeedsNewSavedSearch As EventHandler
+        Public Event Closed As EventHandler(Of Integer)
+
+        Private Property _ActiveDateConstraint As String = String.Empty
+        Public ReadOnly Property ActiveDateConstraint As String
+            Get
+                Return _ActiveDateConstraint
+            End Get
+        End Property
+
+        Private _ActiveSearchTokens As New List(Of SearchToken.Token)
+        Private _ActiveDateAttribute As String = SEARCH_FACT_DATE_DEFAULT
+        Private _ActiveTokenOperator As TokenOperator = TokenOperator.And
+
+        Public ReadOnly Property ActiveDateAttribute As String
+            Get
+                Return _ActiveDateAttribute
+            End Get
+        End Property
+
+        Public ReadOnly Property ActiveTokens As List(Of SearchToken.Token)
+            Get
+                Return _ActiveSearchTokens
+            End Get
+        End Property
+
+        Public Property BaseSearchSQL As String
+        Public Property ExplicitDate As Boolean = False
+
+        Private ReadOnly Environment As Environment
+        Private ReadOnly SearchId As String
+        Private ReadOnly UserId As Integer
+        Private ReadOnly UserLanguage As String
+
+        Public Sub New(pLogConfig As LogConfig, pEnvironment As Environment, pSearchId As String)
+            MyBase.New(pLogConfig)
+            Environment = pEnvironment
+            SearchId = pSearchId
+            UserId = My.Application.User.UserId
+            UserLanguage = My.Application.User.Language
+        End Sub
+
+        Public Function RunWithDataTable(pDatatable As DataTable) As SearchResult
+            Return RunWithDataTable(pDatatable, "Suche")
+        End Function
+
+        Public Function RunWithDataTable(pDatatable As DataTable, pTitle As String) As SearchResult
+            Dim oParams = GetParams(pTitle)
+            oParams.Results.Add(New DocumentResultList.DocumentResult() With {
+                .Title = pTitle,
+                .Datatable = pDatatable
+            })
+
+            If pDatatable.Rows.Count = 1 Then
+                oParams.ShowFileList = False
+            End If
+
+            Dim oForm As New frmDocumentResultList(My.LogConfig, Environment, oParams)
+            AddEventHandlers(oForm)
+            oForm.Show()
+
+            Return New SearchResult(pDatatable.Rows.Count)
+        End Function
+
+        ''' <summary>
+        ''' Only search for Term. Used for sidebar quicksearch.
+        ''' </summary>
+        Public Async Function RunWithSearchTerm(pSearchTerm As String) As Task(Of SearchResult)
+            Return Await RunWithSearchOptions(New SearchOptions With {.SearchString = pSearchTerm})
+        End Function
+
+        Public Async Function RunWithSearchTerm(pSearchTerm As String, pDateFrom As Date, pDateTo As Date, pSearchTitle As String) As Task(Of SearchResult)
+            Return Await RunWithSearchOptions(New SearchOptions With {
+                .SearchString = pSearchTerm,
+                .SearchTitle = pSearchTitle,
+                .DateFrom = pDateFrom,
+                .DateTo = pDateTo
+            })
+        End Function
+
+        Public Async Function RunWithTokens(pTokens As IEnumerable(Of Search.SearchToken.Token)) As Task(Of SearchResult)
+            Return Await RunWithSearchOptions(New SearchOptions With {.SearchTokens = pTokens})
+        End Function
+
+        Public Async Function RunWithTokens(pTokens As IEnumerable(Of Search.SearchToken.Token), pDateFrom As Date, pDateTo As Date, pSearchTitle As String) As Task(Of SearchResult)
+            If pTokens.Count = 0 And
+            pDateFrom = Date.MinValue And
+            pDateTo = Date.MinValue And
+            _ActiveDateConstraint = String.Empty Then
+                Return New SearchResult(0)
+            End If
+
+            Return Await RunWithSearchOptions(New SearchOptions With {
+                .SearchTokens = pTokens,
+                .DateFrom = pDateFrom,
+                .DateTo = pDateTo
+            })
+        End Function
+
+
+        'Public Async Function RunWithSearchTerm(pSearchTerm As String, pDateFrom As Date, pDateTo As Date) As Task(Of SearchResult)
+        '    Return Await RunWithSearchTerm(pSearchTerm, pDateFrom, pDateTo, Nothing, Nothing)
+        'End Function
+
+        Private Async Function RunWithSearchOptions(pOptions As SearchOptions) As Task(Of SearchResult)
+            Dim oDateConstraint = Await GetDateConstraint(pOptions.DateFrom, pOptions.DateTo)
+            Dim oWindowTitle = GetResultWindowString(pOptions.SearchString, pOptions.SearchTitle)
+            Dim oParams = GetParams(oWindowTitle)
+            Dim oTokens = pOptions.SearchTokens
+            Dim oSearchTerm = pOptions.SearchString
+
+            Dim oSQL = String.Empty
+
+            If oTokens IsNot Nothing AndAlso oTokens.Count > 0 Then
+                _ActiveSearchTokens = oTokens
+                Await InsertSearchTokens(oTokens)
+                oSQL = $"EXEC PRIDB_SEARCH_GET_TOKEN_RESULT_DOCS {UserId}, '{oDateConstraint}', '{UserLanguage}'"
+            ElseIf oSearchTerm IsNot Nothing Then
+                _ActiveSearchTokens.Clear()
+                oSQL = $"EXEC PRIDB_SEARCH_GET_TEXT_RESULTS {UserId},'{pOptions.SearchString}','{oDateConstraint}', '{UserLanguage}'"
+            Else
+                _ActiveSearchTokens.Clear()
+                oSQL = $"EXEC PRIDB_SEARCH_GET_TEXT_RESULTS {UserId},'{String.Empty}','{oDateConstraint}', '{UserLanguage}'"
+            End If
+
+            If Await My.Database.ExecuteNonQueryIDBAsync(oSQL) = True Then
+                Dim oDTDocResult = Await My.Database.GetDatatableIDBAsync(BaseSearchSQL)
+
+                If oDTDocResult Is Nothing Then
+                    Return New SearchResult("Error in Search Query")
+                End If
+
+                Dim oRowCount = oDTDocResult.Rows.Count
+                If oRowCount > 0 Then
+                    oParams.Results.Add(New DocumentResultList.DocumentResult() With {
+                        .Title = SearchId,
+                        .Datatable = oDTDocResult
+                    })
+
+                    If oDTDocResult.Rows.Count = 1 Then
+                        oParams.ShowFileList = False
+                    End If
+
+                    Dim oForm As New frmDocumentResultList(My.LogConfig, Environment, oParams)
+                    AddEventHandlers(oForm)
+                    oForm.Show()
+
+                    Return New SearchResult(oRowCount)
+                Else
+                    Return New SearchResult(oRowCount)
+
+                End If
+            Else
+                Return New SearchResult("Error in Search Function")
+
+            End If
+        End Function
+
+        Private Sub AddEventHandlers(pForm As frmDocumentResultList)
+            ' TODO: Implement   
+            'AddHandler pForm.NeedsRefresh, AddressOf Form_NeedsRefresh
+            AddHandler pForm.FormClosed, AddressOf Form_Closed
+
+            ' Only setup event if it is actually used
+            If NeedsNewSavedSearchEvent IsNot Nothing Then
+                AddHandler pForm.NeedsNewSavedSearch, AddressOf Form_NeedsNewSavedSearch
+            End If
+
+            ' Only setup event if it is actually used
+            If NeedsRefreshEvent IsNot Nothing Then
+                AddHandler pForm.NeedsRefresh, AddressOf Form_NeedsRefresh
+            End If
+        End Sub
+
+        Private Sub Form_NeedsNewSavedSearch(sender As Object, e As EventArgs)
+            RaiseEvent NeedsNewSavedSearch(sender, e)
+        End Sub
+
+        Private Sub Form_NeedsRefresh(sender As Object, e As Integer)
+            RaiseEvent NeedsRefresh(sender, e)
+        End Sub
+
+        Private Async Function GetDateConstraint(pDateFrom As Date, pDateTo As Date) As Task(Of String)
+            Dim oSimpleDateConstraint = $"{_ActiveDateAttribute}~{_ActiveDateConstraint}"
+            Dim oExplicitConstraint = Await MaybeSetExplicitDateConstraint(pDateFrom, pDateTo)
+
+            If IsNothing(oExplicitConstraint) Then
+                Return oSimpleDateConstraint
+            Else
+                Return oExplicitConstraint
+            End If
+        End Function
+
+        Private Async Function InsertSearchTokens(pTokens As IEnumerable(Of Search.SearchToken.Token)) As Task
+            Logger.Debug("Deleting previous user tokens..")
+            Await My.Database.ExecuteNonQueryIDBAsync($"DELETE FROM TBIDB_SEARCH_INPUT_USER WHERE USR_ID = {UserId}")
+
+            If pTokens Is Nothing Then
+                Logger.Warn("Token Object was nothing!")
+                Exit Function
+            End If
+
+            If pTokens.Count = 0 Then
+                Logger.Warn("Token Object was empty!")
+                Exit Function
+            End If
+
+            Dim oOperatorString
+
+            Select Case _ActiveTokenOperator
+                Case TokenOperator.Or
+                    oOperatorString = "OR"
+                Case Else
+                    oOperatorString = "AND"
+            End Select
+
+
+            For Each oToken In pTokens
+                Dim oSQLInsert As String = $"
+                    INSERT INTO [dbo].[TBIDB_SEARCH_INPUT_USER] ([USR_ID], [ATTR_ID], [ATTR_TITLE], [TERM_ID], [OPERATOR])
+                    VALUES ({UserId}, {oToken.AttributeId}, '{oToken.AttributeTitle}', {oToken.TermId}, '{oOperatorString}')"
+
+                Dim oResult = Await My.Database.ExecuteNonQueryIDBAsync(oSQLInsert)
+                Logger.Warn("Inserting Tokens failed!")
+            Next
+        End Function
+
+
+        Private Async Function MaybeSetExplicitDateConstraint(pDateFrom As Date, pDateTo As Date) As Task(Of String)
+            If pDateFrom.Equals(Date.MinValue) = False Then
+                ExplicitDate = True
+
+                Dim oDateTo As Date
+                If pDateTo.Equals(Date.MinValue) Then
+                    oDateTo = pDateFrom
+                Else
+                    oDateTo = pDateTo
+                End If
+                Dim oProc = $"EXEC PRIDB_SEARCH_ADD_USR_DATE {UserId},'{pDateFrom}','{oDateTo}'"
+                If Await My.Database.ExecuteNonQueryIDBAsync(oProc) = True Then
+                    Return $"{_ActiveDateAttribute}~DATEPART"
+                Else
+                    Return Nothing
+                End If
+            End If
+
+            Return Nothing
+        End Function
+
+        Private Sub Form_Closed(sender As Object, e As EventArgs)
+            RaiseEvent Closed(sender, 0)
+        End Sub
+
+        Private Function GetParams(pWindowTitle As String) As DocumentResultList.Params
+            Dim oParams = New DocumentResultList.Params() With {
+            .WindowGuid = SearchId,
+            .WindowTitle = pWindowTitle,
+            .OperationModeOverride = Modules.ZooFlow.Constants.OperationMode.ZooFlow,
+            .ProfileGuid = 35452,
+            .ColumnNames = New DocumentResultList.ColumnNames With {
+                .ObjectIdColumn = "DocID"
+            },
+            .ShowBackNavigation = False
+        }
+            Return oParams
+        End Function
+
+        Private Function GetResultWindowString(pSearchContent As String, pWindowTitle As String) As String
+            Dim oWindowString
+
+            ' This is the default title
+            If UserLanguage = DigitalData.Modules.ZooFlow.State.UserState.LANG_DE_DE Then
+                oWindowString = $"Suche"
+            Else
+                oWindowString = $"Search"
+            End If
+
+            ' If a Search String is given, we might take this
+            If pSearchContent <> String.Empty Then
+                If UserLanguage = DigitalData.Modules.ZooFlow.State.UserState.LANG_DE_DE Then
+                    Return $"Suche Nach '{pSearchContent}'"
+                Else
+                    Return $"Search For '{pSearchContent}'"
+                End If
+            End If
+
+            ' Window Title overrides everything
+            If pWindowTitle IsNot Nothing Then
+                oWindowString = pWindowTitle
+            End If
+
+            Return oWindowString
+        End Function
+
+        Public Sub SetDateConstraint()
+            _ActiveDateConstraint = String.Empty
+        End Sub
+
+        Public Sub SetDateConstraint(pConstraintName As String)
+            _ActiveDateConstraint = pConstraintName
+        End Sub
+
+        Public Sub SetDateConstraint(pConstraint As DateConstraint)
+            _ActiveDateConstraint = DateConstraintToConstant(pConstraint)
+        End Sub
+
+        Public Sub SetTokenOperator(pOperator As TokenOperator)
+            _ActiveTokenOperator = pOperator
+        End Sub
+
+        Public Function DateConstraintToConstant(pConstraint As DateConstraint) As String
+            Select Case pConstraint
+                Case DateConstraint.Today
+                    Return CREATED_TODAY
+
+                Case DateConstraint.Yesterday
+                    Return CREATED_YESTERDAY
+
+                Case DateConstraint.Tomorrow
+                    Return CREATED_TOMORROW
+
+                Case DateConstraint.Last7Days
+                    Return CREATED_LAST_7_DAYS
+
+                Case DateConstraint.CurrentMonth
+                    Return CREATED_MONTH_CURR
+
+                Case DateConstraint.LastMonth
+                    Return CREATED_MONTH_LAST
+
+                Case DateConstraint.CurrentYear
+                    Return CREATED_YEAR_CURRENT
+
+                Case DateConstraint.LastYear
+                    Return CREATED_YEAR_LAST
+
+                Case Else
+                    Return String.Empty
+
+            End Select
+        End Function
+        Public Function ConstantToDateConstraint(pConstant As String) As DateConstraint
+            Select Case pConstant
+                Case CREATED_TODAY
+                    Return DateConstraint.Today
+                Case CREATED_YESTERDAY
+                    Return DateConstraint.Yesterday
+                Case CREATED_TOMORROW
+                    Return DateConstraint.Tomorrow
+                Case CREATED_LAST_7_DAYS
+                    Return DateConstraint.Last7Days
+                Case CREATED_MONTH_CURR
+                    Return DateConstraint.CurrentMonth
+                Case CREATED_MONTH_LAST
+                    Return DateConstraint.LastMonth
+                Case CREATED_YEAR_CURRENT
+                    Return DateConstraint.CurrentYear
+                Case CREATED_YEAR_LAST
+                    Return DateConstraint.LastYear
+                Case Else
+                    Return DateConstraint.Undefined
+            End Select
+        End Function
+
+        Public Sub SetDateAttribute(pAttributeName As String)
+            _ActiveDateAttribute = pAttributeName
+        End Sub
+
+        Public Sub SetDateAttribute()
+            _ActiveDateAttribute = SEARCH_FACT_DATE_DEFAULT
+        End Sub
+
+        Public Class SearchOptions
+            Public SearchTitle As String
+
+            Public SearchString As String
+            Public SearchTokens As IEnumerable(Of Search.SearchToken.Token)
+
+            Public DateFrom As Date
+            Public DateTo As Date
+        End Class
+
+        Public Class SearchResult
+            Public OK As Boolean = True
+            Public Count As Integer = 0
+            Public ErrorMessage As String = String.Empty
+
+            ''' <summary>
+            ''' Returns a positive Search Result
+            ''' </summary>
+            Public Sub New(pCountResults As Integer)
+                Count = pCountResults
+            End Sub
+
+            ''' <summary>
+            ''' Returns a failed search result with an error message
+            ''' </summary>
+            ''' <param name="pMessage"></param>
+            Public Sub New(pMessage As String)
+                OK = False
+                ErrorMessage = pMessage
+            End Sub
+        End Class
+    End Class
+End Namespace
+

GUIs.ZooFlow/Search/SearchToken.vb

@@ -0,0 +1,45 @@
+Namespace Search
+    Public Class SearchToken
+
+        Public Class Token
+            Public AttributeTitle As String
+            Public AttributeId As Integer
+            Public TermValue As String
+            Public TermId As Integer
+        End Class
+
+        Public Class ValueOnlyToken
+            Inherits Token
+
+            Public Overrides Function GetHashCode() As Integer
+                Return TermId.GetHashCode
+            End Function
+
+            Public Overrides Function Equals(obj As Object) As Boolean
+                Return GetHashCode() = DirectCast(obj, ValueOnlyToken).GetHashCode()
+            End Function
+
+            Public Overrides Function ToString() As String
+                Return TermValue
+            End Function
+        End Class
+
+        Public Class AttributeValueToken
+            Inherits Token
+
+            Public Overrides Function GetHashCode() As Integer
+                Return (TermId.GetHashCode & AttributeId.GetHashCode).GetHashCode()
+            End Function
+
+            Public Overrides Function Equals(obj As Object) As Boolean
+                Return Me.GetHashCode() = DirectCast(obj, AttributeValueToken).GetHashCode()
+            End Function
+
+            Public Overrides Function ToString() As String
+                Return $"{TermValue} ({AttributeTitle})"
+            End Function
+        End Class
+
+    End Class
+
+End Namespace

GUIs.ZooFlow/Search/State.vb

@@ -0,0 +1,6 @@
+Namespace Search
+    Public Class State
+        Public Property SelectInStringAttributeIds As String = ""
+        Public Property SelectInIntegerAttributeIds As String = ""
+    End Class
+End Namespace

GUIs.ZooFlow/Search/Test/SearchCriteria.vb

@@ -0,0 +1,11 @@
+Namespace Search
+    Public Class SearchCriteria
+        Public Property ParenLeft As String = ""
+        Public Property Key As String
+        Public Property Value As Object
+        Public Property ParentRight As String = ""
+        Public Property JoinOperator As String = "AND"
+    End Class
+
+
+End Namespace

GUIs.ZooFlow/Search/Test/SearchFilter.vb

@@ -0,0 +1,38 @@
+Namespace Search
+    Public Class SearchFilter
+
+        Public Shared Property DefaultFilters As New List(Of FilterTimeframe) From {
+            New FilterTimeframe() With {.Name = "Kein", .DisableFilter = True, .[To] = Nothing},
+            New FilterTimeframe() With {.Name = "Eigener", .CustomFilter = True, .[To] = Date.Now, .From = Date.Now},
+            New FilterTimeframe() With {
+                .Name = "letzte 7 Tage",
+                .From = Date.Now.Subtract(TimeSpan.FromDays(7))
+            },
+            New FilterTimeframe() With {
+                .Name = "letzte 14 Tage",
+                .From = Date.Now.Subtract(TimeSpan.FromDays(14))
+            },
+            New FilterTimeframe() With {
+                .Name = "letzte 30 Tage",
+                .From = Date.Now.Subtract(TimeSpan.FromDays(30))
+            },
+            New FilterTimeframe() With {
+                .Name = "aktueller Monat",
+                .From = New Date(Now.Year, Now.Month, 1)
+            }
+        }
+
+        Public Class FilterTimeframe
+            Public Property Name As String
+            Public Property From As Date
+            Public Property [To] As Date = Date.Now
+            Public Property DisableFilter As Boolean = False
+            Public Property CustomFilter As Boolean = False
+
+            Public Overrides Function ToString() As String
+                Return Name.ToString
+            End Function
+        End Class
+    End Class
+
+End Namespace

GUIs.ZooFlow/Search/Test/frmSearchNeu.Designer.vb

@@ -0,0 +1,320 @@
+Imports DevExpress.XtraEditors
+Imports DevExpress.XtraGrid
+Imports DevExpress.XtraGrid.Views.Grid
+
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
+Partial Class frmSearchNeu
+    Inherits DevExpress.XtraBars.Ribbon.RibbonForm
+
+    'Form overrides dispose to clean up the component list.
+    <System.Diagnostics.DebuggerNonUserCode()> _
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        If disposing AndAlso components IsNot Nothing Then
+            components.Dispose()
+        End If
+        MyBase.Dispose(disposing)
+    End Sub
+
+    'Required by the Windows Form Designer
+    Private components As System.ComponentModel.IContainer
+
+    'NOTE: The following procedure is required by the Windows Form Designer
+    'It can be modified using the Windows Form Designer.  
+    'Do not modify it using the code editor.
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+        Me.NavBarControl1 = New DevExpress.XtraNavBar.NavBarControl()
+        Me.NavBarGroup1 = New DevExpress.XtraNavBar.NavBarGroup()
+        Me.SplitContainerControl1 = New DevExpress.XtraEditors.SplitContainerControl()
+        Me.SplitContainerControl2 = New DevExpress.XtraEditors.SplitContainerControl()
+        Me.SplitContainerControl3 = New DevExpress.XtraEditors.SplitContainerControl()
+        Me.Button1 = New System.Windows.Forms.Button()
+        Me.cmbSelect = New DevExpress.XtraEditors.ComboBoxEdit()
+        Me.SearchControl2 = New DevExpress.XtraEditors.TokenEdit()
+        Me.GridControl1 = New DevExpress.XtraGrid.GridControl()
+        Me.GridView1 = New DevExpress.XtraGrid.Views.Grid.GridView()
+        Me.colParenLeft = New DevExpress.XtraGrid.Columns.GridColumn()
+        Me.colAttribute = New DevExpress.XtraGrid.Columns.GridColumn()
+        Me.colOperator = New DevExpress.XtraGrid.Columns.GridColumn()
+        Me.colValue = New DevExpress.XtraGrid.Columns.GridColumn()
+        Me.colParenRight = New DevExpress.XtraGrid.Columns.GridColumn()
+        Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
+        Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
+        Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
+        Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
+        Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
+        CType(Me.NavBarControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.SplitContainerControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SplitContainerControl1.SuspendLayout()
+        CType(Me.SplitContainerControl2, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SplitContainerControl2.SuspendLayout()
+        CType(Me.SplitContainerControl3, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SplitContainerControl3.SuspendLayout()
+        CType(Me.cmbSelect.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.SearchControl2.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.GridView1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SuspendLayout()
+        '
+        'NavBarControl1
+        '
+        Me.NavBarControl1.ActiveGroup = Me.NavBarGroup1
+        Me.NavBarControl1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.NavBarControl1.Groups.AddRange(New DevExpress.XtraNavBar.NavBarGroup() {Me.NavBarGroup1})
+        Me.NavBarControl1.Location = New System.Drawing.Point(0, 0)
+        Me.NavBarControl1.Name = "NavBarControl1"
+        Me.NavBarControl1.OptionsNavPane.ExpandedWidth = 163
+        Me.NavBarControl1.Size = New System.Drawing.Size(163, 193)
+        Me.NavBarControl1.TabIndex = 4
+        Me.NavBarControl1.Text = "NavBarControl1"
+        '
+        'NavBarGroup1
+        '
+        Me.NavBarGroup1.Caption = "NavBarGroup1"
+        Me.NavBarGroup1.Expanded = True
+        Me.NavBarGroup1.Name = "NavBarGroup1"
+        '
+        'SplitContainerControl1
+        '
+        Me.SplitContainerControl1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.SplitContainerControl1.Location = New System.Drawing.Point(0, 0)
+        Me.SplitContainerControl1.Name = "SplitContainerControl1"
+        Me.SplitContainerControl1.Panel1.Controls.Add(Me.NavBarControl1)
+        Me.SplitContainerControl1.Panel1.Text = "Panel1"
+        Me.SplitContainerControl1.Panel2.Text = "Panel2"
+        Me.SplitContainerControl1.Size = New System.Drawing.Size(984, 193)
+        Me.SplitContainerControl1.SplitterPosition = 163
+        Me.SplitContainerControl1.TabIndex = 7
+        '
+        'SplitContainerControl2
+        '
+        Me.SplitContainerControl2.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.SplitContainerControl2.Horizontal = False
+        Me.SplitContainerControl2.Location = New System.Drawing.Point(0, 94)
+        Me.SplitContainerControl2.Name = "SplitContainerControl2"
+        Me.SplitContainerControl2.Panel1.Controls.Add(Me.SplitContainerControl3)
+        Me.SplitContainerControl2.Panel1.Text = "Panel1"
+        Me.SplitContainerControl2.Panel2.Controls.Add(Me.SplitContainerControl1)
+        Me.SplitContainerControl2.Panel2.Text = "Panel2"
+        Me.SplitContainerControl2.Size = New System.Drawing.Size(984, 493)
+        Me.SplitContainerControl2.SplitterPosition = 290
+        Me.SplitContainerControl2.TabIndex = 8
+        '
+        'SplitContainerControl3
+        '
+        Me.SplitContainerControl3.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.SplitContainerControl3.Horizontal = False
+        Me.SplitContainerControl3.IsSplitterFixed = True
+        Me.SplitContainerControl3.Location = New System.Drawing.Point(0, 0)
+        Me.SplitContainerControl3.Name = "SplitContainerControl3"
+        Me.SplitContainerControl3.Panel1.Controls.Add(Me.Button1)
+        Me.SplitContainerControl3.Panel1.Controls.Add(Me.cmbSelect)
+        Me.SplitContainerControl3.Panel1.Controls.Add(Me.SearchControl2)
+        Me.SplitContainerControl3.Panel1.Text = "Panel1"
+        Me.SplitContainerControl3.Panel2.Controls.Add(Me.GridControl1)
+        Me.SplitContainerControl3.Panel2.Text = "Panel2"
+        Me.SplitContainerControl3.Size = New System.Drawing.Size(984, 290)
+        Me.SplitContainerControl3.SplitterPosition = 55
+        Me.SplitContainerControl3.TabIndex = 9
+        '
+        'Button1
+        '
+        Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button1.Location = New System.Drawing.Point(886, 6)
+        Me.Button1.Name = "Button1"
+        Me.Button1.Size = New System.Drawing.Size(95, 44)
+        Me.Button1.TabIndex = 5
+        Me.Button1.Text = "Suchen"
+        Me.Button1.UseVisualStyleBackColor = True
+        '
+        'cmbSelect
+        '
+        Me.cmbSelect.Location = New System.Drawing.Point(3, 6)
+        Me.cmbSelect.Name = "cmbSelect"
+        Me.cmbSelect.Properties.Appearance.BackColor = System.Drawing.Color.Transparent
+        Me.cmbSelect.Properties.Appearance.Font = New System.Drawing.Font("Segoe UI", 20.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.cmbSelect.Properties.Appearance.Options.UseBackColor = True
+        Me.cmbSelect.Properties.Appearance.Options.UseFont = True
+        Me.cmbSelect.Properties.BorderStyle = DevExpress.XtraEditors.Controls.BorderStyles.Simple
+        Me.cmbSelect.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
+        Me.cmbSelect.Properties.Items.AddRange(New Object() {"Alle", "Belege", "Rechnungen", "Lieferscheine", "Aufträge", "Angebote", "Kunde Schaum", "Kunde medacom"})
+        Me.cmbSelect.Properties.TextEditStyle = DevExpress.XtraEditors.Controls.TextEditStyles.DisableTextEditor
+        Me.cmbSelect.Size = New System.Drawing.Size(113, 44)
+        Me.cmbSelect.TabIndex = 4
+        '
+        'SearchControl2
+        '
+        Me.SearchControl2.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.SearchControl2.Location = New System.Drawing.Point(115, 6)
+        Me.SearchControl2.Name = "SearchControl2"
+        Me.SearchControl2.Properties.Appearance.BackColor = System.Drawing.Color.Transparent
+        Me.SearchControl2.Properties.Appearance.Font = New System.Drawing.Font("Segoe UI", 20.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.SearchControl2.Properties.Appearance.Options.UseBackColor = True
+        Me.SearchControl2.Properties.Appearance.Options.UseFont = True
+        Me.SearchControl2.Properties.BorderStyle = DevExpress.XtraEditors.Controls.BorderStyles.Simple
+        Me.SearchControl2.Properties.EditMode = DevExpress.XtraEditors.TokenEditMode.Manual
+        Me.SearchControl2.Properties.EditValueType = DevExpress.XtraEditors.TokenEditValueType.List
+        Me.SearchControl2.Properties.PopupFilterMode = DevExpress.XtraEditors.TokenEditPopupFilterMode.Contains
+        Me.SearchControl2.Properties.Separators.AddRange(New String() {",", "-", "ODER", "OR", "AND", "UND"})
+        Me.SearchControl2.Size = New System.Drawing.Size(772, 44)
+        Me.SearchControl2.TabIndex = 3
+        '
+        'GridControl1
+        '
+        Me.GridControl1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.GridControl1.Location = New System.Drawing.Point(0, 0)
+        Me.GridControl1.MainView = Me.GridView1
+        Me.GridControl1.Name = "GridControl1"
+        Me.GridControl1.Size = New System.Drawing.Size(984, 225)
+        Me.GridControl1.TabIndex = 8
+        Me.GridControl1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView1})
+        '
+        'GridView1
+        '
+        Me.GridView1.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colParenLeft, Me.colAttribute, Me.colOperator, Me.colValue, Me.colParenRight})
+        Me.GridView1.GridControl = Me.GridControl1
+        Me.GridView1.Name = "GridView1"
+        '
+        'colParenLeft
+        '
+        Me.colParenLeft.Caption = "("
+        Me.colParenLeft.FieldName = "ParentLeft"
+        Me.colParenLeft.Name = "colParenLeft"
+        Me.colParenLeft.Visible = True
+        Me.colParenLeft.VisibleIndex = 0
+        '
+        'colAttribute
+        '
+        Me.colAttribute.Caption = "Attribut"
+        Me.colAttribute.FieldName = "Key"
+        Me.colAttribute.Name = "colAttribute"
+        Me.colAttribute.Visible = True
+        Me.colAttribute.VisibleIndex = 1
+        '
+        'colOperator
+        '
+        Me.colOperator.Caption = "Operand"
+        Me.colOperator.FieldName = "Op"
+        Me.colOperator.Name = "colOperator"
+        Me.colOperator.Visible = True
+        Me.colOperator.VisibleIndex = 2
+        '
+        'colValue
+        '
+        Me.colValue.Caption = "Wert"
+        Me.colValue.FieldName = "Value"
+        Me.colValue.Name = "colValue"
+        Me.colValue.Visible = True
+        Me.colValue.VisibleIndex = 3
+        '
+        'colParenRight
+        '
+        Me.colParenRight.Caption = ")"
+        Me.colParenRight.FieldName = "ParenRight"
+        Me.colParenRight.Name = "colParenRight"
+        Me.colParenRight.Visible = True
+        Me.colParenRight.VisibleIndex = 4
+        '
+        'RibbonControl1
+        '
+        Me.RibbonControl1.CommandLayout = DevExpress.XtraBars.Ribbon.CommandLayout.Simplified
+        Me.RibbonControl1.ExpandCollapseItem.Id = 0
+        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItem1})
+        Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
+        Me.RibbonControl1.MaxItemId = 2
+        Me.RibbonControl1.Name = "RibbonControl1"
+        Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
+        Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
+        Me.RibbonControl1.Size = New System.Drawing.Size(984, 94)
+        Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
+        '
+        'BarButtonItem1
+        '
+        Me.BarButtonItem1.Caption = "BarButtonItem1"
+        Me.BarButtonItem1.Id = 1
+        Me.BarButtonItem1.Name = "BarButtonItem1"
+        '
+        'RibbonPage1
+        '
+        Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup2})
+        Me.RibbonPage1.Name = "RibbonPage1"
+        Me.RibbonPage1.Text = "RibbonPage1"
+        '
+        'RibbonPageGroup1
+        '
+        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem1)
+        Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
+        Me.RibbonPageGroup1.Text = "RibbonPageGroup1"
+        '
+        'RibbonPageGroup2
+        '
+        Me.RibbonPageGroup2.Name = "RibbonPageGroup2"
+        Me.RibbonPageGroup2.Text = "RibbonPageGroup2"
+        '
+        'RibbonStatusBar1
+        '
+        Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 587)
+        Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
+        Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
+        Me.RibbonStatusBar1.Size = New System.Drawing.Size(984, 22)
+        '
+        'RibbonPage2
+        '
+        Me.RibbonPage2.Name = "RibbonPage2"
+        Me.RibbonPage2.Text = "RibbonPage2"
+        '
+        'frmSearchNeu
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(984, 609)
+        Me.Controls.Add(Me.SplitContainerControl2)
+        Me.Controls.Add(Me.RibbonStatusBar1)
+        Me.Controls.Add(Me.RibbonControl1)
+        Me.Name = "frmSearchNeu"
+        Me.Ribbon = Me.RibbonControl1
+        Me.StatusBar = Me.RibbonStatusBar1
+        Me.Text = "frmSearchNeu"
+        CType(Me.NavBarControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.SplitContainerControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.SplitContainerControl1.ResumeLayout(False)
+        CType(Me.SplitContainerControl2, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.SplitContainerControl2.ResumeLayout(False)
+        CType(Me.SplitContainerControl3, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.SplitContainerControl3.ResumeLayout(False)
+        CType(Me.cmbSelect.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.SearchControl2.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.GridView1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+    Friend WithEvents NavBarControl1 As DevExpress.XtraNavBar.NavBarControl
+    Friend WithEvents NavBarGroup1 As DevExpress.XtraNavBar.NavBarGroup
+    Friend WithEvents SplitContainerControl1 As SplitContainerControl
+    Friend WithEvents SplitContainerControl2 As SplitContainerControl
+    Friend WithEvents SplitContainerControl3 As SplitContainerControl
+    Friend WithEvents GridControl1 As GridControl
+    Friend WithEvents GridView1 As GridView
+    Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
+    Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
+    Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents RibbonPageGroup2 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar
+    Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage
+    Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents colParenLeft As Columns.GridColumn
+    Friend WithEvents colAttribute As Columns.GridColumn
+    Friend WithEvents colOperator As Columns.GridColumn
+    Friend WithEvents colValue As Columns.GridColumn
+    Friend WithEvents colParenRight As Columns.GridColumn
+    Friend WithEvents Button1 As Button
+    Friend WithEvents cmbSelect As ComboBoxEdit
+    Friend WithEvents SearchControl2 As TokenEdit
+End Class

GUIs.ZooFlow/Search/Test/frmSearchNeu.resx

@@ -0,0 +1,120 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+</root>

GUIs.ZooFlow/Search/Test/frmSearchNeu.vb

@@ -0,0 +1,121 @@
+Imports System.Collections
+Imports System.ComponentModel
+Imports DevExpress.XtraEditors
+Imports DigitalData.GUIs.ZooFlow.Search
+Imports DigitalData.GUIs.ZooFlow.Search.SearchToken
+Imports DigitalData.Modules.EDMI.API
+
+Public Class frmSearchNeu
+    Private Database As DatabaseWithFallback
+
+    Private TokenListDefault As New Dictionary(Of String, Object)
+    Private TokenListOperands As New Dictionary(Of String, Object)
+    Private TokenListAttrValues As New Dictionary(Of String, Object)
+
+
+
+    Private Sub XtraForm1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
+        Database = New DatabaseWithFallback(My.LogConfig, My.Application.Service.Client, My.DatabaseECM, My.DatabaseIDB)
+
+        'Dim oTokens = Search.GetAttributeTokens()
+        'AddTokens(SearchControl2, oTokens)
+
+        'GridControl1.DataSource = Search.Query
+        'cmbSelect.SelectedIndex = 0
+    End Sub
+
+    Private Sub SetTokens(Editor As TokenEdit, Tokens As Dictionary(Of String, Object))
+        Editor.Properties.Tokens.Clear()
+        AddTokens(Editor, Tokens)
+    End Sub
+
+    Private Sub AddTokens(Editor As TokenEdit, Tokens As Dictionary(Of String, Object))
+        For Each oToken In Tokens
+            Dim oTokenEditToken = New TokenEditToken With {
+                .Description = oToken.Key,
+                .Value = oToken.Value
+            }
+            Editor.Properties.Tokens.Add(oTokenEditToken)
+        Next
+    End Sub
+
+    Private Sub SearchControl2_Properties_TokenAdded(sender As Object, e As DevExpress.XtraEditors.TokenEditTokenAddedEventArgs) Handles SearchControl2.Properties.TokenAdded
+        Dim oEditor As TokenEdit = sender
+        SetNewTokens(oEditor)
+    End Sub
+
+    Private Sub SearchControl2_Properties_TokenRemoved(sender As Object, e As TokenEditTokenRemovedEventArgs) Handles SearchControl2.Properties.TokenRemoved
+        Dim oEditor As TokenEdit = sender
+        SetNewTokens(oEditor)
+    End Sub
+
+    Private Sub SetNewTokens(pEditor As TokenEdit)
+        'Dim oLastToken = pEditor.GetTokenList().LastOrDefault()
+        'pEditor.Properties.BeginUpdate()
+
+        'If oLastToken IsNot Nothing Then
+        '    Select Case oLastToken.Value.GetType
+
+        '        Case GetType(AttributeKeyToken)
+        '            ' After the attribute key comes an operator
+        '            SetTokens(pEditor, Search.GetOperatorTokens(GetType(String)))
+        '            Search.InputMode = InputMode.Operator
+
+        '        Case GetType(AttributeOperatorToken)
+        '            ' After the attribute operator comes a value
+        '            SetTokens(pEditor, TokenListAttrValues)
+        '            Search.InputMode = InputMode.Value
+
+        '        Case GetType(AttributeValueToken)
+        '            ' After the attribute value comes another value
+        '            SetTokens(pEditor, TokenListAttrValues)
+        '            Search.InputMode = InputMode.Value
+
+        '        Case Else
+        '            SetTokens(pEditor, TokenListDefault)
+        '            Search.InputMode = InputMode.Default
+
+        '    End Select
+        'Else
+        '    SetTokens(pEditor, TokenListDefault)
+        '    Search.InputMode = InputMode.Default
+        'End If
+
+        'pEditor.Properties.EndUpdate()
+    End Sub
+
+    Private Sub SearchControl2_CustomDrawTokenGlyph(sender As Object, e As TokenEditCustomDrawTokenGlyphEventArgs) Handles SearchControl2.CustomDrawTokenGlyph
+        '' Set Background according to token type
+        'Select Case e.Value.GetType()
+        '    Case GetType(AttributeKeyToken)
+        '        e.Graphics.FillRectangle(New SolidBrush(ColorTranslator.FromHtml("#F87171")), e.Bounds)
+
+        '    Case GetType(AttributeOperatorToken)
+        '        e.Graphics.FillRectangle(New SolidBrush(ColorTranslator.FromHtml("#34D399")), e.Bounds)
+
+        '    Case GetType(AttributeValueToken)
+        '        e.Graphics.FillRectangle(New SolidBrush(ColorTranslator.FromHtml("#60A5FA")), e.Bounds)
+        '    Case Else
+        'End Select
+
+        '' Draw the glyph on top
+        '' This fixes: https://supportcenter.devexpress.com/ticket/details/t215578/tokenedit-glyph-is-not-visible-when-customdrawtokentext-is-used
+        'e.DefaultDraw()
+    End Sub
+
+    Private Sub SearchControl2_KeyUp(sender As Object, e As KeyEventArgs) Handles SearchControl2.KeyUp
+        'If Search.InputMode = InputMode.Value And e.KeyCode = Keys.Enter And SearchControl2.IsPopupOpen Then
+        '    Search.Query.Add(New SearchCriteria With {
+        '        .ParenLeft = False,
+        '        .Key = "test",
+        '        .Op = OperatorToken.Equals,
+        '        .Value = "test",
+        '        .ParentRight = False
+        '    })
+        'End If
+    End Sub
+
+    Private Sub RibbonControl1_Click(sender As Object, e As EventArgs) Handles RibbonControl1.Click
+
+    End Sub
+End Class

GUIs.ZooFlow/Search/TokenEditEx.vb

@@ -0,0 +1,89 @@
+Imports System.ComponentModel
+Imports DevExpress.XtraEditors
+Imports DevExpress.XtraEditors.Drawing
+Imports DevExpress.XtraEditors.Registrator
+Imports DevExpress.XtraEditors.Repository
+Imports DevExpress.XtraEditors.ViewInfo
+
+Public Class RepositoryItemTokenEditEx
+    Inherits RepositoryItemTokenEdit
+
+    ' The unique name for the custom editor
+    Public Const CustomEditName As String = "TokenEditEx"
+
+    Shared Sub New()
+        RegisterTokenEditEx()
+    End Sub
+
+    ' Return the unique name
+    Public Overrides ReadOnly Property EditorTypeName() As String
+        Get
+            Return CustomEditName
+        End Get
+    End Property
+
+    Public Shared Sub RegisterTokenEditEx()
+        EditorRegistrationInfo.Default.Editors.Add(
+            New EditorClassInfo(CustomEditName,
+                                GetType(TokenEditEx),
+                                GetType(RepositoryItemTokenEditEx),
+                                GetType(TokenEditViewInfoEx),
+                                New TokenEditPainter,
+                                True))
+    End Sub
+End Class
+
+Public Class TokenEditViewInfoEx
+    Inherits TokenEditViewInfo
+
+    Const InnerMargin = 3
+
+    Public Sub New(item As RepositoryItem)
+        MyBase.New(item)
+    End Sub
+
+    Protected Overrides ReadOnly Property IndentBetweenItems As Integer
+        Get
+            Return InnerMargin
+        End Get
+    End Property
+
+    Protected Overrides ReadOnly Property ContentRectMargin As Integer
+        Get
+            Return InnerMargin
+        End Get
+    End Property
+
+    Protected Overrides ReadOnly Property IndentBetweenRows As Integer
+        Get
+            Return InnerMargin
+        End Get
+    End Property
+
+
+End Class
+
+
+<ToolboxItem(True)>
+Public Class TokenEditEx
+    Inherits TokenEdit
+
+    Shared Sub New()
+        RepositoryItemTokenEditEx.RegisterTokenEditEx()
+    End Sub
+
+
+
+    Public Overrides ReadOnly Property EditorTypeName() As String
+        Get
+            Return RepositoryItemTokenEditEx.CustomEditName
+        End Get
+    End Property
+
+    <DesignerSerializationVisibility(DesignerSerializationVisibility.Content)>
+    Public Shadows ReadOnly Property Properties As RepositoryItemTokenEditEx
+        Get
+            Return TryCast(MyBase.Properties, RepositoryItemTokenEditEx)
+        End Get
+    End Property
+End Class

GUIs.ZooFlow/Search/frmEditSearch.Designer.vb

@@ -0,0 +1,232 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class frmEditSearch
+    Inherits DevExpress.XtraBars.Ribbon.RibbonForm
+
+    'Form overrides dispose to clean up the component list.
+    <System.Diagnostics.DebuggerNonUserCode()> _
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        If disposing AndAlso components IsNot Nothing Then
+            components.Dispose()
+        End If
+        MyBase.Dispose(disposing)
+    End Sub
+
+    'Required by the Windows Form Designer
+    Private components As System.ComponentModel.IContainer
+
+    'NOTE: The following procedure is required by the Windows Form Designer
+    'It can be modified using the Windows Form Designer.  
+    'Do not modify it using the code editor.
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+        Me.components = New System.ComponentModel.Container()
+        Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
+        Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
+        Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
+        Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
+        Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
+        Me.LayoutControl1 = New DevExpress.XtraLayout.LayoutControl()
+        Me.TextEdit1 = New DevExpress.XtraEditors.TextEdit()
+        Me.ImageComboBoxEdit1 = New DevExpress.XtraEditors.ImageComboBoxEdit()
+        Me.TextEdit2 = New DevExpress.XtraEditors.MemoEdit()
+        Me.Root = New DevExpress.XtraLayout.LayoutControlGroup()
+        Me.LayoutControlItem1 = New DevExpress.XtraLayout.LayoutControlItem()
+        Me.LayoutControlItem2 = New DevExpress.XtraLayout.LayoutControlItem()
+        Me.LayoutControlItem3 = New DevExpress.XtraLayout.LayoutControlItem()
+        Me.SvgImageCollection1 = New DevExpress.Utils.SvgImageCollection(Me.components)
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.LayoutControl1.SuspendLayout()
+        CType(Me.TextEdit1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.ImageComboBoxEdit1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.TextEdit2.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.Root, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.SvgImageCollection1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SuspendLayout()
+        '
+        'RibbonControl1
+        '
+        Me.RibbonControl1.ColorScheme = DevExpress.XtraBars.Ribbon.RibbonControlColorScheme.Green
+        Me.RibbonControl1.CommandLayout = DevExpress.XtraBars.Ribbon.CommandLayout.Simplified
+        Me.RibbonControl1.ExpandCollapseItem.Id = 0
+        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItem1})
+        Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
+        Me.RibbonControl1.MaxItemId = 2
+        Me.RibbonControl1.Name = "RibbonControl1"
+        Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
+        Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
+        Me.RibbonControl1.ShowDisplayOptionsMenuButton = DevExpress.Utils.DefaultBoolean.[False]
+        Me.RibbonControl1.ShowExpandCollapseButton = DevExpress.Utils.DefaultBoolean.[False]
+        Me.RibbonControl1.ShowPageHeadersMode = DevExpress.XtraBars.Ribbon.ShowPageHeadersMode.Hide
+        Me.RibbonControl1.ShowToolbarCustomizeItem = False
+        Me.RibbonControl1.Size = New System.Drawing.Size(422, 63)
+        Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
+        Me.RibbonControl1.Toolbar.ShowCustomizeItem = False
+        '
+        'BarButtonItem1
+        '
+        Me.BarButtonItem1.Caption = "Speichern"
+        Me.BarButtonItem1.Id = 1
+        Me.BarButtonItem1.Name = "BarButtonItem1"
+        '
+        'RibbonPage1
+        '
+        Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1})
+        Me.RibbonPage1.Name = "RibbonPage1"
+        Me.RibbonPage1.Text = "RibbonPage1"
+        '
+        'RibbonPageGroup1
+        '
+        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem1)
+        Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
+        Me.RibbonPageGroup1.Text = "RibbonPageGroup1"
+        '
+        'RibbonStatusBar1
+        '
+        Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 301)
+        Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
+        Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
+        Me.RibbonStatusBar1.Size = New System.Drawing.Size(422, 24)
+        '
+        'RibbonPage2
+        '
+        Me.RibbonPage2.Name = "RibbonPage2"
+        Me.RibbonPage2.Text = "RibbonPage2"
+        '
+        'LayoutControl1
+        '
+        Me.LayoutControl1.Controls.Add(Me.TextEdit1)
+        Me.LayoutControl1.Controls.Add(Me.ImageComboBoxEdit1)
+        Me.LayoutControl1.Controls.Add(Me.TextEdit2)
+        Me.LayoutControl1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.LayoutControl1.Location = New System.Drawing.Point(0, 63)
+        Me.LayoutControl1.Name = "LayoutControl1"
+        Me.LayoutControl1.Root = Me.Root
+        Me.LayoutControl1.Size = New System.Drawing.Size(422, 238)
+        Me.LayoutControl1.TabIndex = 2
+        Me.LayoutControl1.Text = "LayoutControl1"
+        '
+        'TextEdit1
+        '
+        Me.TextEdit1.Location = New System.Drawing.Point(96, 20)
+        Me.TextEdit1.MenuManager = Me.RibbonControl1
+        Me.TextEdit1.Name = "TextEdit1"
+        Me.TextEdit1.Size = New System.Drawing.Size(306, 20)
+        Me.TextEdit1.StyleController = Me.LayoutControl1
+        Me.TextEdit1.TabIndex = 4
+        '
+        'ImageComboBoxEdit1
+        '
+        Me.ImageComboBoxEdit1.Location = New System.Drawing.Point(96, 198)
+        Me.ImageComboBoxEdit1.MenuManager = Me.RibbonControl1
+        Me.ImageComboBoxEdit1.Name = "ImageComboBoxEdit1"
+        Me.ImageComboBoxEdit1.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
+        Me.ImageComboBoxEdit1.Size = New System.Drawing.Size(306, 20)
+        Me.ImageComboBoxEdit1.StyleController = Me.LayoutControl1
+        Me.ImageComboBoxEdit1.TabIndex = 6
+        '
+        'TextEdit2
+        '
+        Me.TextEdit2.Location = New System.Drawing.Point(96, 60)
+        Me.TextEdit2.MenuManager = Me.RibbonControl1
+        Me.TextEdit2.Name = "TextEdit2"
+        Me.TextEdit2.Size = New System.Drawing.Size(306, 118)
+        Me.TextEdit2.StyleController = Me.LayoutControl1
+        Me.TextEdit2.TabIndex = 5
+        '
+        'Root
+        '
+        Me.Root.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True]
+        Me.Root.GroupBordersVisible = False
+        Me.Root.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem1, Me.LayoutControlItem2, Me.LayoutControlItem3})
+        Me.Root.Name = "Root"
+        Me.Root.Size = New System.Drawing.Size(422, 238)
+        Me.Root.TextVisible = False
+        '
+        'LayoutControlItem1
+        '
+        Me.LayoutControlItem1.Control = Me.TextEdit1
+        Me.LayoutControlItem1.Location = New System.Drawing.Point(0, 0)
+        Me.LayoutControlItem1.Name = "LayoutControlItem1"
+        Me.LayoutControlItem1.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
+        Me.LayoutControlItem1.Size = New System.Drawing.Size(402, 40)
+        Me.LayoutControlItem1.Text = "Titel"
+        Me.LayoutControlItem1.TextSize = New System.Drawing.Size(64, 13)
+        '
+        'LayoutControlItem2
+        '
+        Me.LayoutControlItem2.Control = Me.TextEdit2
+        Me.LayoutControlItem2.Location = New System.Drawing.Point(0, 40)
+        Me.LayoutControlItem2.Name = "LayoutControlItem2"
+        Me.LayoutControlItem2.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
+        Me.LayoutControlItem2.Size = New System.Drawing.Size(402, 138)
+        Me.LayoutControlItem2.Text = "Beschreibung"
+        Me.LayoutControlItem2.TextSize = New System.Drawing.Size(64, 13)
+        '
+        'LayoutControlItem3
+        '
+        Me.LayoutControlItem3.Control = Me.ImageComboBoxEdit1
+        Me.LayoutControlItem3.Location = New System.Drawing.Point(0, 178)
+        Me.LayoutControlItem3.Name = "LayoutControlItem3"
+        Me.LayoutControlItem3.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
+        Me.LayoutControlItem3.Size = New System.Drawing.Size(402, 40)
+        Me.LayoutControlItem3.Text = "Icon"
+        Me.LayoutControlItem3.TextSize = New System.Drawing.Size(64, 13)
+        '
+        'SvgImageCollection1
+        '
+        Me.SvgImageCollection1.Add("today", "image://svgimages/scheduling/dayview.svg")
+        Me.SvgImageCollection1.Add("month", "image://svgimages/scheduling/monthview.svg")
+        Me.SvgImageCollection1.Add("week", "image://svgimages/scheduling/next7days.svg")
+        Me.SvgImageCollection1.Add("year", "image://svgimages/scheduling/groupbynone.svg")
+        Me.SvgImageCollection1.Add("yesterday", "image://svgimages/scheduling/today.svg")
+        Me.SvgImageCollection1.Add("invoice", "image://svgimages/business objects/bo_invoice.svg")
+        '
+        'frmEditSearch
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(422, 325)
+        Me.Controls.Add(Me.LayoutControl1)
+        Me.Controls.Add(Me.RibbonStatusBar1)
+        Me.Controls.Add(Me.RibbonControl1)
+        Me.Name = "frmEditSearch"
+        Me.Ribbon = Me.RibbonControl1
+        Me.StatusBar = Me.RibbonStatusBar1
+        Me.Text = "frmEditSearch"
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.LayoutControl1.ResumeLayout(False)
+        CType(Me.TextEdit1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.ImageComboBoxEdit1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.TextEdit2.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.Root, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.SvgImageCollection1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+
+    Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
+    Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
+    Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar
+    Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage
+    Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents LayoutControl1 As DevExpress.XtraLayout.LayoutControl
+    Friend WithEvents TextEdit1 As DevExpress.XtraEditors.TextEdit
+    Friend WithEvents ImageComboBoxEdit1 As DevExpress.XtraEditors.ImageComboBoxEdit
+    Friend WithEvents TextEdit2 As DevExpress.XtraEditors.MemoEdit
+    Friend WithEvents Root As DevExpress.XtraLayout.LayoutControlGroup
+    Friend WithEvents LayoutControlItem1 As DevExpress.XtraLayout.LayoutControlItem
+    Friend WithEvents LayoutControlItem2 As DevExpress.XtraLayout.LayoutControlItem
+    Friend WithEvents LayoutControlItem3 As DevExpress.XtraLayout.LayoutControlItem
+    Friend WithEvents SvgImageCollection1 As DevExpress.Utils.SvgImageCollection
+End Class

GUIs.ZooFlow/Search/frmEditSearch.resx

@@ -0,0 +1,123 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <metadata name="SvgImageCollection1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 17</value>
+  </metadata>
+</root>

GUIs.ZooFlow/Search/frmEditSearch.vb

@@ -0,0 +1,48 @@
+Imports DevExpress.Utils
+Imports DevExpress.Utils.Svg
+
+Public Class frmEditSearch
+    Public ReadOnly Property Images As SvgImageCollection
+        Get
+            Return SvgImageCollection1
+        End Get
+    End Property
+
+    Public Property IsNew As Boolean = False
+
+    Public Property Title As String = ""
+    Public Property Description As String = ""
+    Public Property ImageString As String = ""
+    Public Property Image As SvgImage = Nothing
+
+    Private Sub frmEditSearch_Load(sender As Object, e As EventArgs) Handles Me.Load
+        If IsNew Then
+            Text = "Neue Suche"
+        Else
+            Text = "Suche bearbeiten"
+        End If
+
+        For Each oImage As SvgImageInfo In Images.ImageInfos
+            Dim oItem = New DevExpress.XtraEditors.Controls.ImageComboBoxItem(oImage.Name, oImage.Bitmap)
+            ImageComboBoxEdit1.Properties.Items.Add(oItem)
+        Next
+    End Sub
+
+    Private Sub TextEdit1_EditValueChanged(sender As Object, e As EventArgs) Handles TextEdit1.EditValueChanged
+        Title = TextEdit1.EditValue
+    End Sub
+
+    Private Sub TextEdit2_EditValueChanged(sender As Object, e As EventArgs) Handles TextEdit2.EditValueChanged
+        Description = TextEdit2.EditValue
+    End Sub
+
+    Private Sub ImageComboBoxEdit1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ImageComboBoxEdit1.SelectedIndexChanged
+        ImageString = ImageComboBoxEdit1.Text
+        'Image = ImageComboBoxEdit1.EditValue
+    End Sub
+
+    Private Sub BarButtonItem1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem1.ItemClick
+        DialogResult = DialogResult.OK
+        Close()
+    End Sub
+End Class

GUIs.ZooFlow/Search/frmSearchFlow.Designer.vb

@@ -0,0 +1,759 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
+Partial Class frmSearchFlow
+    Inherits DevExpress.XtraBars.Ribbon.RibbonForm
+
+    'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
+    <System.Diagnostics.DebuggerNonUserCode()>
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        Try
+            If disposing AndAlso components IsNot Nothing Then
+                components.Dispose()
+            End If
+        Finally
+            MyBase.Dispose(disposing)
+        End Try
+    End Sub
+
+    'Wird vom Windows Form-Designer benötigt.
+    Private components As System.ComponentModel.IContainer
+
+    'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
+    'Das Bearbeiten ist mit dem Windows Form-Designer möglich.  
+    'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
+    <System.Diagnostics.DebuggerStepThrough()>
+    Private Sub InitializeComponent()
+        Me.components = New System.ComponentModel.Container()
+        Dim ItemTemplate2 As DevExpress.XtraGrid.Views.Tile.ItemTemplate = New DevExpress.XtraGrid.Views.Tile.ItemTemplate()
+        Dim TableColumnDefinition5 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
+        Dim TableColumnDefinition6 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
+        Dim TileViewItemElement6 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
+        Dim TileViewItemElement7 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
+        Dim TableRowDefinition4 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
+        Dim TableColumnDefinition7 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
+        Dim TableColumnDefinition8 As DevExpress.XtraEditors.TableLayout.TableColumnDefinition = New DevExpress.XtraEditors.TableLayout.TableColumnDefinition()
+        Dim TableRowDefinition5 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
+        Dim TableRowDefinition6 As DevExpress.XtraEditors.TableLayout.TableRowDefinition = New DevExpress.XtraEditors.TableLayout.TableRowDefinition()
+        Dim TileViewItemElement8 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
+        Dim TileViewItemElement9 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
+        Dim TileViewItemElement10 As DevExpress.XtraGrid.Views.Tile.TileViewItemElement = New DevExpress.XtraGrid.Views.Tile.TileViewItemElement()
+        Me.colName = New DevExpress.XtraGrid.Columns.TileViewColumn()
+        Me.colImage = New DevExpress.XtraGrid.Columns.TileViewColumn()
+        Me.colDescription = New DevExpress.XtraGrid.Columns.TileViewColumn()
+        Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
+        Me.lblResults = New DevExpress.XtraBars.BarStaticItem()
+        Me.chkOperatorAnd = New DevExpress.XtraBars.BarCheckItem()
+        Me.chkOperatorOr = New DevExpress.XtraBars.BarCheckItem()
+        Me.chkDatefilter2 = New DevExpress.XtraBars.BarCheckItem()
+        Me.BarCheckItem4 = New DevExpress.XtraBars.BarCheckItem()
+        Me.chkSearchEverywhere = New DevExpress.XtraBars.BarCheckItem()
+        Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
+        Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
+        Me.btnSaveSearch = New DevExpress.XtraBars.BarButtonItem()
+        Me.chkGridVertical = New DevExpress.XtraBars.BarCheckItem()
+        Me.chkGridHorizontal = New DevExpress.XtraBars.BarCheckItem()
+        Me.BarEditItem1 = New DevExpress.XtraBars.BarEditItem()
+        Me.RepositoryItemTrackBar1 = New DevExpress.XtraEditors.Repository.RepositoryItemTrackBar()
+        Me.BarEditItem2 = New DevExpress.XtraBars.BarEditItem()
+        Me.RepositoryItemTrackBar2 = New DevExpress.XtraEditors.Repository.RepositoryItemTrackBar()
+        Me.BarCheckItem1 = New DevExpress.XtraBars.BarCheckItem()
+        Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
+        Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonPageGroup5 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonPage3 = New DevExpress.XtraBars.Ribbon.RibbonPage()
+        Me.RibbonPageGroup3 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RepositoryItemMarqueeProgressBar1 = New DevExpress.XtraEditors.Repository.RepositoryItemMarqueeProgressBar()
+        Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
+        Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
+        Me.PanelControl1 = New DevExpress.XtraEditors.PanelControl()
+        Me.PanelControl2 = New DevExpress.XtraEditors.PanelControl()
+        Me.LayoutControl1 = New DevExpress.XtraLayout.LayoutControl()
+        Me.txtSearchInput = New DigitalData.GUIs.ZooFlow.TokenEditEx()
+        Me.GridSearches = New DevExpress.XtraGrid.GridControl()
+        Me.ViewSearches = New DevExpress.XtraGrid.Views.Tile.TileView()
+        Me.colGroupText = New DevExpress.XtraGrid.Columns.TileViewColumn()
+        Me.colSelected = New DevExpress.XtraGrid.Columns.TileViewColumn()
+        Me.DateEditFrom = New DevExpress.XtraEditors.DateEdit()
+        Me.DateEditTo = New DevExpress.XtraEditors.DateEdit()
+        Me.CheckEdit1 = New DevExpress.XtraEditors.ToggleSwitch()
+        Me.ComboBoxDateAttributes = New DevExpress.XtraEditors.ComboBoxEdit()
+        Me.Root = New DevExpress.XtraLayout.LayoutControlGroup()
+        Me.LayoutControlGroupDate2 = New DevExpress.XtraLayout.LayoutControlGroup()
+        Me.LayoutControlItem2 = New DevExpress.XtraLayout.LayoutControlItem()
+        Me.LayoutControlItem4 = New DevExpress.XtraLayout.LayoutControlItem()
+        Me.EmptySpaceItem1 = New DevExpress.XtraLayout.EmptySpaceItem()
+        Me.LayoutControlItem6 = New DevExpress.XtraLayout.LayoutControlItem()
+        Me.LayoutControlItem8 = New DevExpress.XtraLayout.LayoutControlItem()
+        Me.LayoutControlGroup3 = New DevExpress.XtraLayout.LayoutControlGroup()
+        Me.LayoutControlItem3 = New DevExpress.XtraLayout.LayoutControlItem()
+        Me.LayoutControlItem7 = New DevExpress.XtraLayout.LayoutControlItem()
+        Me.SvgImageCollection1 = New DevExpress.Utils.SvgImageCollection(Me.components)
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.RepositoryItemTrackBar1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.RepositoryItemTrackBar2, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.RepositoryItemMarqueeProgressBar1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.PanelControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.PanelControl1.SuspendLayout()
+        CType(Me.PanelControl2, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.PanelControl2.SuspendLayout()
+        CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.LayoutControl1.SuspendLayout()
+        CType(Me.txtSearchInput.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.GridSearches, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.ViewSearches, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.DateEditFrom.Properties.CalendarTimeProperties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.DateEditFrom.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.DateEditTo.Properties.CalendarTimeProperties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.DateEditTo.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.CheckEdit1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.ComboBoxDateAttributes.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.Root, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.LayoutControlGroupDate2, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.LayoutControlItem4, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.EmptySpaceItem1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.LayoutControlItem6, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.LayoutControlItem8, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.LayoutControlGroup3, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.LayoutControlItem7, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.SvgImageCollection1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SuspendLayout()
+        '
+        'colName
+        '
+        Me.colName.Caption = "Name"
+        Me.colName.FieldName = "DisplayName"
+        Me.colName.Name = "colName"
+        Me.colName.Visible = True
+        Me.colName.VisibleIndex = 0
+        '
+        'colImage
+        '
+        Me.colImage.Caption = "Image"
+        Me.colImage.FieldName = "Image"
+        Me.colImage.Name = "colImage"
+        Me.colImage.Visible = True
+        Me.colImage.VisibleIndex = 2
+        '
+        'colDescription
+        '
+        Me.colDescription.Caption = "Beschreibung"
+        Me.colDescription.FieldName = "Description"
+        Me.colDescription.Name = "colDescription"
+        Me.colDescription.Visible = True
+        Me.colDescription.VisibleIndex = 1
+        '
+        'RibbonControl1
+        '
+        Me.RibbonControl1.ColorScheme = DevExpress.XtraBars.Ribbon.RibbonControlColorScheme.Green
+        Me.RibbonControl1.ExpandCollapseItem.Id = 0
+        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.lblResults, Me.chkOperatorAnd, Me.chkOperatorOr, Me.chkDatefilter2, Me.BarCheckItem4, Me.chkSearchEverywhere, Me.BarButtonItem1, Me.BarButtonItem2, Me.btnSaveSearch, Me.chkGridVertical, Me.chkGridHorizontal, Me.BarEditItem1, Me.BarEditItem2, Me.BarCheckItem1})
+        Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
+        Me.RibbonControl1.MaxItemId = 30
+        Me.RibbonControl1.Name = "RibbonControl1"
+        Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1, Me.RibbonPage3})
+        Me.RibbonControl1.RepositoryItems.AddRange(New DevExpress.XtraEditors.Repository.RepositoryItem() {Me.RepositoryItemMarqueeProgressBar1, Me.RepositoryItemTrackBar1, Me.RepositoryItemTrackBar2})
+        Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
+        Me.RibbonControl1.ShowDisplayOptionsMenuButton = DevExpress.Utils.DefaultBoolean.[False]
+        Me.RibbonControl1.ShowPageHeadersMode = DevExpress.XtraBars.Ribbon.ShowPageHeadersMode.Show
+        Me.RibbonControl1.ShowToolbarCustomizeItem = False
+        Me.RibbonControl1.Size = New System.Drawing.Size(954, 160)
+        Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
+        Me.RibbonControl1.Toolbar.ShowCustomizeItem = False
+        '
+        'lblResults
+        '
+        Me.lblResults.Caption = "Noch keine Ergebnisse"
+        Me.lblResults.Id = 2
+        Me.lblResults.ItemAppearance.Normal.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lblResults.ItemAppearance.Normal.Options.UseFont = True
+        Me.lblResults.Name = "lblResults"
+        '
+        'chkOperatorAnd
+        '
+        Me.chkOperatorAnd.BindableChecked = True
+        Me.chkOperatorAnd.Caption = "UND Verknüpfung"
+        Me.chkOperatorAnd.Checked = True
+        Me.chkOperatorAnd.GroupIndex = 1
+        Me.chkOperatorAnd.Id = 16
+        Me.chkOperatorAnd.ImageOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.link3
+        Me.chkOperatorAnd.Name = "chkOperatorAnd"
+        Me.chkOperatorAnd.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.SmallWithText
+        '
+        'chkOperatorOr
+        '
+        Me.chkOperatorOr.Caption = "ODER Verknüpfung"
+        Me.chkOperatorOr.GroupIndex = 1
+        Me.chkOperatorOr.Id = 17
+        Me.chkOperatorOr.ImageOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.unlink1
+        Me.chkOperatorOr.Name = "chkOperatorOr"
+        Me.chkOperatorOr.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.SmallWithText
+        '
+        'chkDatefilter2
+        '
+        Me.chkDatefilter2.Caption = "Datumsfilter anzeigen"
+        Me.chkDatefilter2.Id = 18
+        Me.chkDatefilter2.ImageOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.actions_calendar1
+        Me.chkDatefilter2.Name = "chkDatefilter2"
+        '
+        'BarCheckItem4
+        '
+        Me.BarCheckItem4.Caption = "Volltext durchsuchen"
+        Me.BarCheckItem4.Enabled = False
+        Me.BarCheckItem4.Id = 19
+        Me.BarCheckItem4.ImageOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.viewmergeddata1
+        Me.BarCheckItem4.Name = "BarCheckItem4"
+        '
+        'chkSearchEverywhere
+        '
+        Me.chkSearchEverywhere.Caption = "Prozessübergreifend suchen"
+        Me.chkSearchEverywhere.Id = 20
+        Me.chkSearchEverywhere.ImageOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.bo_category1
+        Me.chkSearchEverywhere.Name = "chkSearchEverywhere"
+        '
+        'BarButtonItem1
+        '
+        Me.BarButtonItem1.Caption = "Suchen"
+        Me.BarButtonItem1.Id = 21
+        Me.BarButtonItem1.ImageOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.enablesearch
+        Me.BarButtonItem1.Name = "BarButtonItem1"
+        '
+        'BarButtonItem2
+        '
+        Me.BarButtonItem2.Caption = "Zurücksetzen"
+        Me.BarButtonItem2.Id = 22
+        Me.BarButtonItem2.ImageOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.undo
+        Me.BarButtonItem2.Name = "BarButtonItem2"
+        '
+        'btnSaveSearch
+        '
+        Me.btnSaveSearch.Caption = "Aktuelle Suche speichern"
+        Me.btnSaveSearch.Id = 23
+        Me.btnSaveSearch.ImageOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.bo_security_permission_action
+        Me.btnSaveSearch.Name = "btnSaveSearch"
+        '
+        'chkGridVertical
+        '
+        Me.chkGridVertical.Caption = "Gruppen vertikal"
+        Me.chkGridVertical.GroupIndex = 1
+        Me.chkGridVertical.Id = 24
+        Me.chkGridVertical.ImageOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.alignverticalcenter
+        Me.chkGridVertical.Name = "chkGridVertical"
+        '
+        'chkGridHorizontal
+        '
+        Me.chkGridHorizontal.Caption = "Gruppen horizontal"
+        Me.chkGridHorizontal.GroupIndex = 1
+        Me.chkGridHorizontal.Id = 25
+        Me.chkGridHorizontal.ImageOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.alignhorizontalcenter
+        Me.chkGridHorizontal.Name = "chkGridHorizontal"
+        '
+        'BarEditItem1
+        '
+        Me.BarEditItem1.Caption = "Zeilen"
+        Me.BarEditItem1.Edit = Me.RepositoryItemTrackBar1
+        Me.BarEditItem1.Id = 26
+        Me.BarEditItem1.Name = "BarEditItem1"
+        '
+        'RepositoryItemTrackBar1
+        '
+        Me.RepositoryItemTrackBar1.LabelAppearance.Options.UseTextOptions = True
+        Me.RepositoryItemTrackBar1.LabelAppearance.TextOptions.HAlignment = DevExpress.Utils.HorzAlignment.Center
+        Me.RepositoryItemTrackBar1.Maximum = 5
+        Me.RepositoryItemTrackBar1.Name = "RepositoryItemTrackBar1"
+        '
+        'BarEditItem2
+        '
+        Me.BarEditItem2.Caption = "BarEditItem2"
+        Me.BarEditItem2.Edit = Me.RepositoryItemTrackBar2
+        Me.BarEditItem2.Id = 27
+        Me.BarEditItem2.Name = "BarEditItem2"
+        '
+        'RepositoryItemTrackBar2
+        '
+        Me.RepositoryItemTrackBar2.LabelAppearance.Options.UseTextOptions = True
+        Me.RepositoryItemTrackBar2.LabelAppearance.TextOptions.HAlignment = DevExpress.Utils.HorzAlignment.Center
+        Me.RepositoryItemTrackBar2.Maximum = 5
+        Me.RepositoryItemTrackBar2.Name = "RepositoryItemTrackBar2"
+        '
+        'BarCheckItem1
+        '
+        Me.BarCheckItem1.Caption = "Kanban Ansicht"
+        Me.BarCheckItem1.Id = 28
+        Me.BarCheckItem1.ImageOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.columnheaders
+        Me.BarCheckItem1.Name = "BarCheckItem1"
+        '
+        'RibbonPage1
+        '
+        Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup2, Me.RibbonPageGroup5})
+        Me.RibbonPage1.Name = "RibbonPage1"
+        Me.RibbonPage1.Text = "Suche"
+        '
+        'RibbonPageGroup1
+        '
+        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem1)
+        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem2)
+        Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
+        Me.RibbonPageGroup1.Text = "Allgemein"
+        '
+        'RibbonPageGroup2
+        '
+        Me.RibbonPageGroup2.ItemLinks.Add(Me.BarCheckItem4)
+        Me.RibbonPageGroup2.ItemLinks.Add(Me.chkSearchEverywhere)
+        Me.RibbonPageGroup2.ItemLinks.Add(Me.chkDatefilter2)
+        Me.RibbonPageGroup2.Name = "RibbonPageGroup2"
+        Me.RibbonPageGroup2.Text = "Sucheinstellungen"
+        '
+        'RibbonPageGroup5
+        '
+        Me.RibbonPageGroup5.Enabled = False
+        Me.RibbonPageGroup5.ItemLinks.Add(Me.chkOperatorAnd)
+        Me.RibbonPageGroup5.ItemLinks.Add(Me.chkOperatorOr)
+        Me.RibbonPageGroup5.Name = "RibbonPageGroup5"
+        Me.RibbonPageGroup5.Text = "Begriffsverknüpfung"
+        '
+        'RibbonPage3
+        '
+        Me.RibbonPage3.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup3})
+        Me.RibbonPage3.Name = "RibbonPage3"
+        Me.RibbonPage3.Text = "Layout"
+        '
+        'RibbonPageGroup3
+        '
+        Me.RibbonPageGroup3.ItemLinks.Add(Me.chkGridVertical)
+        Me.RibbonPageGroup3.ItemLinks.Add(Me.chkGridHorizontal)
+        Me.RibbonPageGroup3.ItemLinks.Add(Me.BarCheckItem1)
+        Me.RibbonPageGroup3.ItemLinks.Add(Me.BarEditItem1)
+        Me.RibbonPageGroup3.ItemLinks.Add(Me.BarEditItem2)
+        Me.RibbonPageGroup3.Name = "RibbonPageGroup3"
+        Me.RibbonPageGroup3.Text = "RibbonPageGroup3"
+        '
+        'RepositoryItemMarqueeProgressBar1
+        '
+        Me.RepositoryItemMarqueeProgressBar1.Name = "RepositoryItemMarqueeProgressBar1"
+        '
+        'RibbonStatusBar1
+        '
+        Me.RibbonStatusBar1.BackColor = System.Drawing.Color.Red
+        Me.RibbonStatusBar1.ItemLinks.Add(Me.lblResults)
+        Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 674)
+        Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
+        Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
+        Me.RibbonStatusBar1.Size = New System.Drawing.Size(954, 22)
+        '
+        'RibbonPage2
+        '
+        Me.RibbonPage2.Name = "RibbonPage2"
+        Me.RibbonPage2.Text = "RibbonPage2"
+        '
+        'PanelControl1
+        '
+        Me.PanelControl1.Controls.Add(Me.PanelControl2)
+        Me.PanelControl1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.PanelControl1.Location = New System.Drawing.Point(0, 160)
+        Me.PanelControl1.Name = "PanelControl1"
+        Me.PanelControl1.Padding = New System.Windows.Forms.Padding(30)
+        Me.PanelControl1.Size = New System.Drawing.Size(954, 514)
+        Me.PanelControl1.TabIndex = 3
+        '
+        'PanelControl2
+        '
+        Me.PanelControl2.Controls.Add(Me.LayoutControl1)
+        Me.PanelControl2.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.PanelControl2.Location = New System.Drawing.Point(32, 32)
+        Me.PanelControl2.Margin = New System.Windows.Forms.Padding(0)
+        Me.PanelControl2.Name = "PanelControl2"
+        Me.PanelControl2.Size = New System.Drawing.Size(890, 450)
+        Me.PanelControl2.TabIndex = 3
+        '
+        'LayoutControl1
+        '
+        Me.LayoutControl1.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer))
+        Me.LayoutControl1.Controls.Add(Me.txtSearchInput)
+        Me.LayoutControl1.Controls.Add(Me.GridSearches)
+        Me.LayoutControl1.Controls.Add(Me.DateEditFrom)
+        Me.LayoutControl1.Controls.Add(Me.DateEditTo)
+        Me.LayoutControl1.Controls.Add(Me.CheckEdit1)
+        Me.LayoutControl1.Controls.Add(Me.ComboBoxDateAttributes)
+        Me.LayoutControl1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.LayoutControl1.Location = New System.Drawing.Point(2, 2)
+        Me.LayoutControl1.Name = "LayoutControl1"
+        Me.LayoutControl1.OptionsView.GroupStyle = DevExpress.Utils.GroupStyle.Title
+        Me.LayoutControl1.OptionsView.ItemBorderColor = System.Drawing.Color.Transparent
+        Me.LayoutControl1.Root = Me.Root
+        Me.LayoutControl1.Size = New System.Drawing.Size(886, 446)
+        Me.LayoutControl1.TabIndex = 0
+        Me.LayoutControl1.Text = "LayoutControl1"
+        '
+        'txtSearchInput
+        '
+        Me.txtSearchInput.Location = New System.Drawing.Point(10, 10)
+        Me.txtSearchInput.MenuManager = Me.RibbonControl1
+        Me.txtSearchInput.Name = "txtSearchInput"
+        Me.txtSearchInput.Properties.Appearance.BackColor = System.Drawing.Color.White
+        Me.txtSearchInput.Properties.Appearance.Font = New System.Drawing.Font("Segoe UI", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtSearchInput.Properties.Appearance.Options.UseBackColor = True
+        Me.txtSearchInput.Properties.Appearance.Options.UseFont = True
+        Me.txtSearchInput.Properties.NullText = "Suchbegriff eingeben.."
+        Me.txtSearchInput.Properties.PopupFilterMode = DevExpress.XtraEditors.TokenEditPopupFilterMode.Contains
+        Me.txtSearchInput.Properties.Separators.AddRange(New String() {","})
+        Me.txtSearchInput.Properties.ShowDropDownOnClick = DevExpress.Utils.DefaultBoolean.[False]
+        Me.txtSearchInput.Size = New System.Drawing.Size(866, 44)
+        Me.txtSearchInput.StyleController = Me.LayoutControl1
+        Me.txtSearchInput.TabIndex = 4
+        '
+        'GridSearches
+        '
+        Me.GridSearches.Location = New System.Drawing.Point(14, 100)
+        Me.GridSearches.MainView = Me.ViewSearches
+        Me.GridSearches.MenuManager = Me.RibbonControl1
+        Me.GridSearches.Name = "GridSearches"
+        Me.GridSearches.Size = New System.Drawing.Size(858, 183)
+        Me.GridSearches.TabIndex = 1
+        Me.GridSearches.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.ViewSearches})
+        '
+        'ViewSearches
+        '
+        Me.ViewSearches.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colName, Me.colDescription, Me.colImage, Me.colGroupText, Me.colSelected})
+        Me.ViewSearches.ColumnSet.CheckedColumn = Me.colSelected
+        Me.ViewSearches.ColumnSet.GroupColumn = Me.colGroupText
+        Me.ViewSearches.GridControl = Me.GridSearches
+        Me.ViewSearches.Name = "ViewSearches"
+        Me.ViewSearches.OptionsTiles.IndentBetweenGroups = 20
+        Me.ViewSearches.OptionsTiles.ItemPadding = New System.Windows.Forms.Padding(10, 4, 10, 4)
+        Me.ViewSearches.OptionsTiles.ItemSize = New System.Drawing.Size(170, 70)
+        Me.ViewSearches.OptionsTiles.Orientation = System.Windows.Forms.Orientation.Vertical
+        Me.ViewSearches.OptionsTiles.RowCount = 2
+        Me.ViewSearches.OptionsTiles.VerticalContentAlignment = DevExpress.Utils.VertAlignment.Center
+        Me.ViewSearches.SortInfo.AddRange(New DevExpress.XtraGrid.Columns.GridColumnSortInfo() {New DevExpress.XtraGrid.Columns.GridColumnSortInfo(Me.colGroupText, DevExpress.Data.ColumnSortOrder.Ascending)})
+        TableColumnDefinition5.Length.Value = 35.0R
+        TableColumnDefinition5.PaddingRight = 5
+        TableColumnDefinition6.Length.Value = 129.0R
+        ItemTemplate2.Columns.Add(TableColumnDefinition5)
+        ItemTemplate2.Columns.Add(TableColumnDefinition6)
+        TileViewItemElement6.Column = Me.colName
+        TileViewItemElement6.ColumnIndex = 1
+        TileViewItemElement6.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
+        TileViewItemElement6.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.Squeeze
+        TileViewItemElement6.Text = "colName"
+        TileViewItemElement6.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
+        TileViewItemElement7.Column = Me.colImage
+        TileViewItemElement7.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
+        TileViewItemElement7.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.Squeeze
+        TileViewItemElement7.Text = "colImage"
+        TileViewItemElement7.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
+        ItemTemplate2.Elements.Add(TileViewItemElement6)
+        ItemTemplate2.Elements.Add(TileViewItemElement7)
+        ItemTemplate2.Name = "DefaultSmall"
+        TableRowDefinition4.Length.Value = 43.0R
+        ItemTemplate2.Rows.Add(TableRowDefinition4)
+        Me.ViewSearches.Templates.Add(ItemTemplate2)
+        TableColumnDefinition7.Length.Value = 35.0R
+        TableColumnDefinition7.PaddingRight = 5
+        TableColumnDefinition8.Length.Value = 111.0R
+        Me.ViewSearches.TileColumns.Add(TableColumnDefinition7)
+        Me.ViewSearches.TileColumns.Add(TableColumnDefinition8)
+        TableRowDefinition5.Length.Value = 17.0R
+        TableRowDefinition6.Length.Value = 45.0R
+        Me.ViewSearches.TileRows.Add(TableRowDefinition5)
+        Me.ViewSearches.TileRows.Add(TableRowDefinition6)
+        TileViewItemElement8.Appearance.Normal.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Bold)
+        TileViewItemElement8.Appearance.Normal.Options.UseFont = True
+        TileViewItemElement8.Column = Me.colName
+        TileViewItemElement8.ColumnIndex = 1
+        TileViewItemElement8.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
+        TileViewItemElement8.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.Squeeze
+        TileViewItemElement8.Text = "colName"
+        TileViewItemElement8.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
+        TileViewItemElement9.Column = Me.colImage
+        TileViewItemElement9.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
+        TileViewItemElement9.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.Squeeze
+        TileViewItemElement9.RowIndex = 1
+        TileViewItemElement9.Text = "colImage"
+        TileViewItemElement9.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
+        TileViewItemElement10.Column = Me.colDescription
+        TileViewItemElement10.ColumnIndex = 1
+        TileViewItemElement10.ImageOptions.ImageAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
+        TileViewItemElement10.ImageOptions.ImageScaleMode = DevExpress.XtraEditors.TileItemImageScaleMode.Squeeze
+        TileViewItemElement10.RowIndex = 1
+        TileViewItemElement10.Text = "colDescription"
+        TileViewItemElement10.TextAlignment = DevExpress.XtraEditors.TileItemContentAlignment.MiddleCenter
+        Me.ViewSearches.TileTemplate.Add(TileViewItemElement8)
+        Me.ViewSearches.TileTemplate.Add(TileViewItemElement9)
+        Me.ViewSearches.TileTemplate.Add(TileViewItemElement10)
+        '
+        'colGroupText
+        '
+        Me.colGroupText.Caption = "Gruppe"
+        Me.colGroupText.FieldName = "GroupText"
+        Me.colGroupText.Name = "colGroupText"
+        Me.colGroupText.SortMode = DevExpress.XtraGrid.ColumnSortMode.Custom
+        Me.colGroupText.Visible = True
+        Me.colGroupText.VisibleIndex = 3
+        '
+        'colSelected
+        '
+        Me.colSelected.Caption = "Selected"
+        Me.colSelected.FieldName = "Selected"
+        Me.colSelected.Name = "colSelected"
+        Me.colSelected.Visible = True
+        Me.colSelected.VisibleIndex = 4
+        '
+        'DateEditFrom
+        '
+        Me.DateEditFrom.EditValue = Nothing
+        Me.DateEditFrom.Location = New System.Drawing.Point(101, 326)
+        Me.DateEditFrom.MenuManager = Me.RibbonControl1
+        Me.DateEditFrom.Name = "DateEditFrom"
+        Me.DateEditFrom.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
+        Me.DateEditFrom.Properties.CalendarTimeProperties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
+        Me.DateEditFrom.Size = New System.Drawing.Size(778, 20)
+        Me.DateEditFrom.StyleController = Me.LayoutControl1
+        Me.DateEditFrom.TabIndex = 5
+        '
+        'DateEditTo
+        '
+        Me.DateEditTo.EditValue = Nothing
+        Me.DateEditTo.Location = New System.Drawing.Point(101, 379)
+        Me.DateEditTo.MenuManager = Me.RibbonControl1
+        Me.DateEditTo.Name = "DateEditTo"
+        Me.DateEditTo.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
+        Me.DateEditTo.Properties.CalendarTimeProperties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
+        Me.DateEditTo.Size = New System.Drawing.Size(778, 20)
+        Me.DateEditTo.StyleController = Me.LayoutControl1
+        Me.DateEditTo.TabIndex = 7
+        '
+        'CheckEdit1
+        '
+        Me.CheckEdit1.Location = New System.Drawing.Point(4, 353)
+        Me.CheckEdit1.MenuManager = Me.RibbonControl1
+        Me.CheckEdit1.Name = "CheckEdit1"
+        Me.CheckEdit1.Properties.OffText = "Datum bis deaktiviert"
+        Me.CheckEdit1.Properties.OnText = "Datum bis aktiviert"
+        Me.CheckEdit1.Size = New System.Drawing.Size(878, 19)
+        Me.CheckEdit1.StyleController = Me.LayoutControl1
+        Me.CheckEdit1.TabIndex = 8
+        '
+        'ComboBoxDateAttributes
+        '
+        Me.ComboBoxDateAttributes.Location = New System.Drawing.Point(101, 409)
+        Me.ComboBoxDateAttributes.MenuManager = Me.RibbonControl1
+        Me.ComboBoxDateAttributes.Name = "ComboBoxDateAttributes"
+        Me.ComboBoxDateAttributes.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
+        Me.ComboBoxDateAttributes.Size = New System.Drawing.Size(778, 20)
+        Me.ComboBoxDateAttributes.StyleController = Me.LayoutControl1
+        Me.ComboBoxDateAttributes.TabIndex = 9
+        '
+        'Root
+        '
+        Me.Root.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True]
+        Me.Root.GroupBordersVisible = False
+        Me.Root.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlGroupDate2, Me.LayoutControlGroup3, Me.LayoutControlItem7})
+        Me.Root.Name = "Root"
+        Me.Root.Padding = New DevExpress.XtraLayout.Utils.Padding(0, 0, 0, 0)
+        Me.Root.Size = New System.Drawing.Size(886, 446)
+        Me.Root.TextVisible = False
+        '
+        'LayoutControlGroupDate2
+        '
+        Me.LayoutControlGroupDate2.AppearanceGroup.BackColor = System.Drawing.Color.FromArgb(CType(CType(165, Byte), Integer), CType(CType(36, Byte), Integer), CType(CType(19, Byte), Integer))
+        Me.LayoutControlGroupDate2.AppearanceGroup.BorderColor = System.Drawing.Color.FromArgb(CType(CType(165, Byte), Integer), CType(CType(36, Byte), Integer), CType(CType(19, Byte), Integer))
+        Me.LayoutControlGroupDate2.AppearanceGroup.Options.UseBackColor = True
+        Me.LayoutControlGroupDate2.AppearanceGroup.Options.UseBorderColor = True
+        Me.LayoutControlGroupDate2.BestFitWeight = 0
+        Me.LayoutControlGroupDate2.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem2, Me.LayoutControlItem4, Me.EmptySpaceItem1, Me.LayoutControlItem6, Me.LayoutControlItem8})
+        Me.LayoutControlGroupDate2.Location = New System.Drawing.Point(0, 297)
+        Me.LayoutControlGroupDate2.Name = "LayoutControlGroupDate2"
+        Me.LayoutControlGroupDate2.Padding = New DevExpress.XtraLayout.Utils.Padding(0, 0, 0, 0)
+        Me.LayoutControlGroupDate2.Size = New System.Drawing.Size(886, 149)
+        Me.LayoutControlGroupDate2.Text = "Eigenes Datum"
+        Me.LayoutControlGroupDate2.Visibility = DevExpress.XtraLayout.Utils.LayoutVisibility.Never
+        '
+        'LayoutControlItem2
+        '
+        Me.LayoutControlItem2.Control = Me.DateEditFrom
+        Me.LayoutControlItem2.Location = New System.Drawing.Point(0, 0)
+        Me.LayoutControlItem2.Name = "LayoutControlItem2"
+        Me.LayoutControlItem2.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
+        Me.LayoutControlItem2.Size = New System.Drawing.Size(882, 30)
+        Me.LayoutControlItem2.Text = "Datum Von"
+        Me.LayoutControlItem2.TextSize = New System.Drawing.Size(82, 13)
+        '
+        'LayoutControlItem4
+        '
+        Me.LayoutControlItem4.Control = Me.DateEditTo
+        Me.LayoutControlItem4.Enabled = False
+        Me.LayoutControlItem4.Location = New System.Drawing.Point(0, 53)
+        Me.LayoutControlItem4.Name = "LayoutControlItem4"
+        Me.LayoutControlItem4.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
+        Me.LayoutControlItem4.Size = New System.Drawing.Size(882, 30)
+        Me.LayoutControlItem4.Text = "Datum Bis"
+        Me.LayoutControlItem4.TextSize = New System.Drawing.Size(82, 13)
+        '
+        'EmptySpaceItem1
+        '
+        Me.EmptySpaceItem1.AllowHotTrack = False
+        Me.EmptySpaceItem1.Location = New System.Drawing.Point(0, 113)
+        Me.EmptySpaceItem1.Name = "EmptySpaceItem1"
+        Me.EmptySpaceItem1.Size = New System.Drawing.Size(882, 10)
+        Me.EmptySpaceItem1.TextSize = New System.Drawing.Size(0, 0)
+        '
+        'LayoutControlItem6
+        '
+        Me.LayoutControlItem6.Control = Me.CheckEdit1
+        Me.LayoutControlItem6.Location = New System.Drawing.Point(0, 30)
+        Me.LayoutControlItem6.Name = "LayoutControlItem6"
+        Me.LayoutControlItem6.Size = New System.Drawing.Size(882, 23)
+        Me.LayoutControlItem6.TextSize = New System.Drawing.Size(0, 0)
+        Me.LayoutControlItem6.TextVisible = False
+        '
+        'LayoutControlItem8
+        '
+        Me.LayoutControlItem8.Control = Me.ComboBoxDateAttributes
+        Me.LayoutControlItem8.Location = New System.Drawing.Point(0, 83)
+        Me.LayoutControlItem8.Name = "LayoutControlItem8"
+        Me.LayoutControlItem8.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
+        Me.LayoutControlItem8.Size = New System.Drawing.Size(882, 30)
+        Me.LayoutControlItem8.Text = "Datums Attribut"
+        Me.LayoutControlItem8.TextSize = New System.Drawing.Size(82, 13)
+        '
+        'LayoutControlGroup3
+        '
+        Me.LayoutControlGroup3.AppearanceGroup.BorderColor = System.Drawing.Color.FromArgb(CType(CType(165, Byte), Integer), CType(CType(36, Byte), Integer), CType(CType(19, Byte), Integer))
+        Me.LayoutControlGroup3.AppearanceGroup.Options.UseBorderColor = True
+        Me.LayoutControlGroup3.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem3})
+        Me.LayoutControlGroup3.Location = New System.Drawing.Point(0, 64)
+        Me.LayoutControlGroup3.Name = "LayoutControlGroup3"
+        Me.LayoutControlGroup3.Size = New System.Drawing.Size(886, 233)
+        Me.LayoutControlGroup3.Text = "Meine Suchen"
+        '
+        'LayoutControlItem3
+        '
+        Me.LayoutControlItem3.Control = Me.GridSearches
+        Me.LayoutControlItem3.Location = New System.Drawing.Point(0, 0)
+        Me.LayoutControlItem3.Name = "LayoutControlItem3"
+        Me.LayoutControlItem3.Size = New System.Drawing.Size(862, 187)
+        Me.LayoutControlItem3.TextSize = New System.Drawing.Size(0, 0)
+        Me.LayoutControlItem3.TextVisible = False
+        '
+        'LayoutControlItem7
+        '
+        Me.LayoutControlItem7.Control = Me.txtSearchInput
+        Me.LayoutControlItem7.Location = New System.Drawing.Point(0, 0)
+        Me.LayoutControlItem7.Name = "LayoutControlItem7"
+        Me.LayoutControlItem7.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
+        Me.LayoutControlItem7.Size = New System.Drawing.Size(886, 64)
+        Me.LayoutControlItem7.TextSize = New System.Drawing.Size(0, 0)
+        Me.LayoutControlItem7.TextVisible = False
+        '
+        'SvgImageCollection1
+        '
+        Me.SvgImageCollection1.Add("today", "image://svgimages/scheduling/dayview.svg")
+        Me.SvgImageCollection1.Add("month", "image://svgimages/scheduling/monthview.svg")
+        Me.SvgImageCollection1.Add("week", "image://svgimages/scheduling/next7days.svg")
+        Me.SvgImageCollection1.Add("year", "image://svgimages/scheduling/groupbynone.svg")
+        Me.SvgImageCollection1.Add("yesterday", "image://svgimages/scheduling/today.svg")
+        Me.SvgImageCollection1.Add("invoice", "image://svgimages/business objects/bo_invoice.svg")
+        '
+        'frmSearchFlow
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(954, 696)
+        Me.Controls.Add(Me.PanelControl1)
+        Me.Controls.Add(Me.RibbonStatusBar1)
+        Me.Controls.Add(Me.RibbonControl1)
+        Me.IconOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.ZooFlow_CW_DevExpress
+        Me.Name = "frmSearchFlow"
+        Me.Ribbon = Me.RibbonControl1
+        Me.StatusBar = Me.RibbonStatusBar1
+        Me.Text = "Search Flow"
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.RepositoryItemTrackBar1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.RepositoryItemTrackBar2, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.RepositoryItemMarqueeProgressBar1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.PanelControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.PanelControl1.ResumeLayout(False)
+        CType(Me.PanelControl2, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.PanelControl2.ResumeLayout(False)
+        CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.LayoutControl1.ResumeLayout(False)
+        CType(Me.txtSearchInput.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.GridSearches, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.ViewSearches, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.DateEditFrom.Properties.CalendarTimeProperties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.DateEditFrom.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.DateEditTo.Properties.CalendarTimeProperties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.DateEditTo.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.CheckEdit1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.ComboBoxDateAttributes.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.Root, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.LayoutControlGroupDate2, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.LayoutControlItem4, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.EmptySpaceItem1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.LayoutControlItem6, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.LayoutControlItem8, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.LayoutControlGroup3, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.LayoutControlItem7, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.SvgImageCollection1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+
+    Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
+    Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
+    Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar
+    Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage
+    Friend WithEvents PanelControl1 As DevExpress.XtraEditors.PanelControl
+    Friend WithEvents PanelControl2 As DevExpress.XtraEditors.PanelControl
+    Friend WithEvents LayoutControl1 As DevExpress.XtraLayout.LayoutControl
+    Friend WithEvents Root As DevExpress.XtraLayout.LayoutControlGroup
+    Friend WithEvents GridSearches As DevExpress.XtraGrid.GridControl
+    Friend WithEvents ViewSearches As DevExpress.XtraGrid.Views.Tile.TileView
+    Friend WithEvents colName As DevExpress.XtraGrid.Columns.TileViewColumn
+    Friend WithEvents colDescription As DevExpress.XtraGrid.Columns.TileViewColumn
+    Friend WithEvents DateEditFrom As DevExpress.XtraEditors.DateEdit
+    Friend WithEvents LayoutControlGroupDate2 As DevExpress.XtraLayout.LayoutControlGroup
+    Friend WithEvents LayoutControlItem2 As DevExpress.XtraLayout.LayoutControlItem
+    Friend WithEvents DateEditTo As DevExpress.XtraEditors.DateEdit
+    Friend WithEvents LayoutControlItem4 As DevExpress.XtraLayout.LayoutControlItem
+    Friend WithEvents EmptySpaceItem1 As DevExpress.XtraLayout.EmptySpaceItem
+    Friend WithEvents LayoutControlGroup3 As DevExpress.XtraLayout.LayoutControlGroup
+    Friend WithEvents LayoutControlItem3 As DevExpress.XtraLayout.LayoutControlItem
+    Friend WithEvents CheckEdit1 As DevExpress.XtraEditors.ToggleSwitch
+    Friend WithEvents LayoutControlItem6 As DevExpress.XtraLayout.LayoutControlItem
+    Friend WithEvents lblResults As DevExpress.XtraBars.BarStaticItem
+    Friend WithEvents RepositoryItemMarqueeProgressBar1 As DevExpress.XtraEditors.Repository.RepositoryItemMarqueeProgressBar
+    Friend WithEvents SvgImageCollection1 As DevExpress.Utils.SvgImageCollection
+    Friend WithEvents colImage As DevExpress.XtraGrid.Columns.TileViewColumn
+    Friend WithEvents txtSearchInput As TokenEditEx
+    Friend WithEvents LayoutControlItem7 As DevExpress.XtraLayout.LayoutControlItem
+    Friend WithEvents ComboBoxDateAttributes As DevExpress.XtraEditors.ComboBoxEdit
+    Friend WithEvents LayoutControlItem8 As DevExpress.XtraLayout.LayoutControlItem
+    Friend WithEvents RibbonPageGroup2 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents chkOperatorAnd As DevExpress.XtraBars.BarCheckItem
+    Friend WithEvents chkOperatorOr As DevExpress.XtraBars.BarCheckItem
+    Friend WithEvents chkDatefilter2 As DevExpress.XtraBars.BarCheckItem
+    Friend WithEvents BarCheckItem4 As DevExpress.XtraBars.BarCheckItem
+    Friend WithEvents chkSearchEverywhere As DevExpress.XtraBars.BarCheckItem
+    Friend WithEvents RibbonPageGroup5 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents colGroupText As DevExpress.XtraGrid.Columns.TileViewColumn
+    Friend WithEvents btnSaveSearch As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents chkGridVertical As DevExpress.XtraBars.BarCheckItem
+    Friend WithEvents chkGridHorizontal As DevExpress.XtraBars.BarCheckItem
+    Friend WithEvents RibbonPage3 As DevExpress.XtraBars.Ribbon.RibbonPage
+    Friend WithEvents RibbonPageGroup3 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents BarEditItem1 As DevExpress.XtraBars.BarEditItem
+    Friend WithEvents RepositoryItemTrackBar1 As DevExpress.XtraEditors.Repository.RepositoryItemTrackBar
+    Friend WithEvents BarEditItem2 As DevExpress.XtraBars.BarEditItem
+    Friend WithEvents RepositoryItemTrackBar2 As DevExpress.XtraEditors.Repository.RepositoryItemTrackBar
+    Friend WithEvents BarCheckItem1 As DevExpress.XtraBars.BarCheckItem
+    Friend WithEvents colSelected As DevExpress.XtraGrid.Columns.TileViewColumn
+End Class

GUIs.ZooFlow/Search/frmSearchFlow.resx

@@ -0,0 +1,123 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <metadata name="SvgImageCollection1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 17</value>
+  </metadata>
+</root>

GUIs.ZooFlow/Search/frmSearchFlow.vb

@@ -0,0 +1,396 @@
+Imports DevExpress.LookAndFeel
+Imports DevExpress.Skins
+Imports DevExpress.Utils.Svg
+Imports DevExpress.XtraEditors
+Imports DevExpress.XtraEditors.Controls
+Imports DevExpress.XtraGrid
+Imports DevExpress.XtraGrid.Views.Tile
+Imports DevExpress.XtraSplashScreen
+Imports DigitalData.GUIs.ZooFlow.ClassConstants
+Imports DigitalData.GUIs.ZooFlow.SavedSearch
+Imports DigitalData.GUIs.ZooFlow.Search
+Imports DigitalData.GUIs.ZooFlow.Search.SearchToken
+Imports DigitalData.Modules.Language
+Imports DigitalData.Modules.Logging
+
+Public Class frmSearchFlow
+    Private ReadOnly LogConfig As LogConfig = My.LogConfig
+    Private ReadOnly Logger = My.LogConfig.GetLogger()
+    Private SearchLoader As SearchLoader
+    Private SearchRunner As SearchRunner
+
+    Private TokenTable As DataTable = Nothing
+    Private FormLoading As Boolean = True
+
+    Private ReadOnly TokenListDefault As New Dictionary(Of String, Object)
+    Private ReadOnly TokenListOperands As New Dictionary(Of String, Object)
+    Private ReadOnly TokenListAttrValues As New Dictionary(Of String, Object)
+
+    Private Sub frmFlowSearch2_Load(sender As Object, e As EventArgs) Handles MyBase.Load
+        SearchLoader = New SearchLoader(My.LogConfig, My.DatabaseIDB, My.Application.User, SvgImageCollection1)
+
+        SearchRunner = New SearchRunner(My.LogConfig, My.Application.GetEnvironment, "FlowSearch") With {
+            .BaseSearchSQL = SQL_FLOW_SEARCH_BASE
+        }
+
+        AddHandler SearchRunner.NeedsNewSavedSearch, AddressOf SearchRunner_NewSavedSearch
+
+        TokenTable = GetTokenTable()
+        ComboBoxDateAttributes.Properties.Items.AddRange(LoadDateAttributes())
+        ComboBoxDateAttributes.SelectedIndex = 0
+
+        GridSearches.DataSource = SearchLoader.LoadSearches()
+
+        Dim oTokens = GetTokensFromTable(Of AttributeValueToken)(TokenTable)
+        AddTokens(txtSearchInput, oTokens)
+
+        ViewSearches.FocusedRowHandle = GridControl.InvalidRowHandle
+
+        FormLoading = False
+
+
+    End Sub
+
+    Private Sub SearchRunner_NewSavedSearch(sender As Object, e As EventArgs)
+        Dim oForm As New frmEditSearch With {.IsNew = True}
+
+        If oForm.ShowDialog() = DialogResult.OK Then
+
+            ' Get active tokens and create the search
+            Dim oTokens = SearchRunner.ActiveTokens
+            SearchLoader.CreateCustomSearch(oForm.Title, oForm.Description, oTokens, oForm.ImageString)
+
+            ' Reload the searches
+            GridSearches.DataSource = SearchLoader.LoadSearches()
+
+        End If
+    End Sub
+
+    Public Function GetTokenTable() As DataTable
+        Dim oSQL = $"EXEC PRIDB_SEARCH_AUTOSUGGEST '{My.Application.User.Language}', {My.Application.User.UserId}"
+        Dim oTable = My.Database.GetDatatableIDB(oSQL)
+        Return oTable
+    End Function
+
+    Public Function GetTokensFromTable(Of T As {New, Token})(pTable As DataTable) As List(Of T)
+        Try
+            Dim oTokens As New List(Of T)
+            Dim oTermValueBlackList As New List(Of String) From {"", " "}
+
+            For Each oRow As DataRow In pTable.Rows
+                Dim oTermValue = oRow.Item("TERM")
+                Dim oTermId = oRow.ItemEx("TERM_ID", 0)
+                Dim oAttributeTitle = oRow.Item("ATTR_TITLE")
+                Dim oAttributeId = oRow.ItemEx("ATTR_ID", 0)
+
+                If oTermValueBlackList.Contains(oTermValue) Then
+                    Continue For
+                End If
+
+                oTokens.Add(New T() With {
+                    .AttributeId = oAttributeId,
+                    .AttributeTitle = oAttributeTitle,
+                    .TermId = oTermId,
+                    .TermValue = oTermValue
+                })
+            Next
+
+            Return oTokens.
+                OrderBy(Function(token) token.TermValue).
+                Distinct().
+                ToList()
+
+        Catch ex As Exception
+            Logger.error(ex)
+            Return New List(Of T)
+        End Try
+    End Function
+
+    Private Function LoadDateAttributes() As List(Of String)
+        Try
+            Dim oAttributes = My.Tables.DTIDB_ATTRIBUTE.
+           AsEnumerable().
+           Where(Function(row) CBool(row.Item("SYS_ATTRIBUTE")) = False).
+           Where(Function(row) row.Item("TYP_ID") = 5 Or row.Item("TYP_ID") = 6).
+           Select(Function(row) row.Item("ATTR_TITLE")).
+           Cast(Of String).
+           ToList()
+
+            If My.Application.User.Language = "de-DE" Then
+                oAttributes.Add(IDB_ADDED_WHEN_String_German)
+            Else
+                oAttributes.Add(IDB_ADDED_WHEN_String_Englisch)
+            End If
+
+            Return oAttributes
+        Catch ex As Exception
+            Logger.error(ex)
+            Return New List(Of String)
+        End Try
+    End Function
+
+    Private Function GetTokens() As IEnumerable(Of Token)
+        Dim oTokens = txtSearchInput.GetTokenList()
+        Return oTokens.Select(Of Token)(Function(token) token.Value).ToList()
+    End Function
+
+    Private Async Sub SearchControl2_KeyUp(sender As Object, e As KeyEventArgs) Handles txtSearchInput.KeyUp
+        If e.KeyCode = Keys.Enter And txtSearchInput.IsPopupOpen = False Then
+            Await RunSearch2(GetTokens())
+        End If
+    End Sub
+
+    Private Async Sub TileView1_ItemClick(sender As Object, e As TileViewItemClickEventArgs) Handles ViewSearches.ItemClick
+        Dim oSearch = ViewSearches.GetRow(ViewSearches.FocusedRowHandle)
+
+        If TypeOf oSearch Is CustomSearch Then
+            Dim oCustomSearch As CustomSearch = oSearch
+            Await RunSearch2(oCustomSearch.Tokens)
+        Else
+            Await RunSearch2(GetTokens())
+        End If
+    End Sub
+
+    Private Async Sub BarButtonItem1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem1.ItemClick
+        Await RunSearch2(GetTokens())
+    End Sub
+
+    Private Async Function RunSearch2(pTokens As IEnumerable(Of Token)) As Threading.Tasks.Task
+        Dim oHandle = StartUpdateUI()
+        Dim oSearchTitle As String = "Suche"
+
+        Try
+            ' If the user clicked on a Search Tile, it will set the date constraint for this search
+            Dim oSearch = ViewSearches.GetRow(ViewSearches.FocusedRowHandle)
+            If oSearch IsNot Nothing AndAlso TypeOf oSearch Is SavedSearch.PredefinedDateSearch Then
+                Dim oDateSearch As SavedSearch.PredefinedDateSearch = oSearch
+                oSearchTitle = oDateSearch.DisplayName
+                SearchRunner.SetDateConstraint(oDateSearch.DateConstraint)
+            Else
+                SearchRunner.SetDateConstraint()
+            End If
+
+            ' If the user selected a custom date range, process it including the 'with end date' toggle
+            Dim oDateFrom, oDateTo As Date
+            If chkDatefilter2.Checked Then
+                oDateFrom = DateEditFrom.EditValue
+                oDateTo = DateEditTo.EditValue
+                If CheckEdit1.IsOn = False Then
+                    oDateTo = Nothing
+                End If
+            Else
+                oDateFrom = Nothing
+                oDateTo = Nothing
+            End If
+
+            ' Run the actual search
+            Dim oResult As SearchRunner.SearchResult
+            If chkSearchEverywhere.Checked Then
+                Dim oToken = pTokens.First()
+                oResult = Await SearchRunner.RunWithSearchTerm(oToken.TermValue, oDateFrom, oDateTo, oSearchTitle)
+            Else
+                oResult = Await SearchRunner.RunWithTokens(pTokens, oDateFrom, oDateTo, oSearchTitle)
+            End If
+
+            ' If there was an error, show the message
+            ' otherwise just show the count of results and color it
+            ' if none were found
+            If oResult.OK = False Then
+                SetStatusBarColor(Color.OrangeRed, Color.White)
+                lblResults.Caption = oResult.ErrorMessage
+
+            ElseIf oResult.Count = 0 Then
+                SetStatusBarColor(Color.OrangeRed, Color.White)
+                lblResults.Caption = $"Keine Ergebnisse"
+
+            Else
+                lblResults.Caption = $"{oResult.Count} Ergebnisse"
+
+            End If
+
+            ' Reset the clicked tile
+            ViewSearches.FocusedRowHandle = GridControl.InvalidRowHandle
+
+        Catch ex As Exception
+            MsgBox(ex.Message)
+        Finally
+            StopUpdateUI(oHandle)
+        End Try
+    End Function
+
+    Private Function StartUpdateUI() As IOverlaySplashScreenHandle
+        SetStatusBarColor(Color.FromArgb(255, 240, 240, 240), Color.Black)
+        Dim oHandle = SplashScreenManager.ShowOverlayForm(LayoutControl1)
+        Return oHandle
+    End Function
+
+    Private Sub StopUpdateUI(pHandle As IOverlaySplashScreenHandle)
+        SplashScreenManager.CloseOverlayForm(pHandle)
+    End Sub
+
+    Private Sub SetStatusBarColor(pColor As Color, pForeColor As Color)
+        ' Change color for StatusBarBackground
+        Dim element As SkinElement = SkinManager.GetSkinElement(SkinProductId.Ribbon, UserLookAndFeel.Default, "StatusBarBackground")
+        element.Color.SolidImageCenterColor = pColor
+        element.Color.BackColor = pColor
+        element.Color.ForeColor = pForeColor
+
+        ' Change color for StatusBarFormBackground
+        Dim element2 As SkinElement = SkinManager.GetSkinElement(SkinProductId.Ribbon, UserLookAndFeel.Default, "StatusBarFormBackground")
+        element2.Color.SolidImageCenterColor = pColor
+        element2.Color.BackColor = pColor
+        element2.Color.ForeColor = pForeColor
+
+        ' Force update of LookAndFeel
+        LookAndFeelHelper.ForceDefaultLookAndFeelChanged()
+    End Sub
+
+    Private Sub CheckEdit1_Properties_EditValueChanged(sender As Object, e As EventArgs) Handles CheckEdit1.Properties.EditValueChanged
+        DateEditTo.Enabled = CheckEdit1.IsOn
+    End Sub
+
+    Private Sub SetTokens(pEditor As TokenEdit, Tokens As IEnumerable(Of Token))
+        pEditor.Properties.Tokens.Clear()
+        AddTokens(pEditor, Tokens)
+    End Sub
+
+    Private Sub ClearTokens(pEditor As TokenEdit)
+        pEditor.EditValue = Nothing
+    End Sub
+
+    Private Sub AddTokens(pEditor As TokenEdit, Tokens As IEnumerable(Of Token))
+        For Each oToken In Tokens
+            Dim oTokenEditToken = New TokenEditToken With {
+                .Description = oToken.ToString,
+                .Value = oToken
+            }
+            pEditor.Properties.Tokens.Add(oTokenEditToken)
+        Next
+    End Sub
+
+    Private Sub SearchControl2_CustomDrawTokenGlyph(sender As Object, e As TokenEditCustomDrawTokenGlyphEventArgs) Handles txtSearchInput.CustomDrawTokenGlyph
+        ' Set Background according to token type
+        Select Case e.Value.GetType()
+            Case GetType(AttributeValueToken)
+                e.Graphics.FillRectangle(New SolidBrush(Color.FromArgb(255, 255, 214, 49)), e.Bounds)
+
+            Case GetType(ValueOnlyToken)
+                e.Graphics.FillRectangle(New SolidBrush(Color.FromArgb(255, 255, 214, 49)), e.Bounds)
+        End Select
+
+        ' Draw the glyph on top
+        ' This fixes: https://supportcenter.devexpress.com/ticket/details/t215578/tokenedit-glyph-is-not-visible-when-customdrawtokentext-is-used
+        e.DefaultDraw()
+    End Sub
+
+    Private Sub ComboBoxDateAttributes_EditValueChanged(sender As Object, e As EventArgs) Handles ComboBoxDateAttributes.EditValueChanged
+        Dim oEditValue As String = ComboBoxDateAttributes.EditValue
+
+        If oEditValue = IDB_ADDED_WHEN_String_German Or oEditValue = IDB_ADDED_WHEN_String_Englisch Then
+            SearchRunner.SetDateAttribute()
+        Else
+            SearchRunner.SetDateAttribute(oEditValue)
+        End If
+    End Sub
+
+    Private Sub TokenEditEx1_Properties_TokenAdding(sender As Object, e As TokenEditTokenAddingEventArgs) Handles txtSearchInput.Properties.TokenAdding
+        ' Prevent adding more than two tokens for now
+        If txtSearchInput.GetTokenList.Count >= 2 Then
+            e.Cancel = True
+        End If
+    End Sub
+
+    Private Sub BarCheckItem3_CheckedChanged(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles chkDatefilter2.CheckedChanged
+        If chkDatefilter2.Checked Then
+            LayoutControlGroupDate2.Visibility = DevExpress.XtraLayout.Utils.LayoutVisibility.Always
+        Else
+            LayoutControlGroupDate2.Visibility = DevExpress.XtraLayout.Utils.LayoutVisibility.Never
+        End If
+    End Sub
+
+    Private Sub chkSearchEverywhere_CheckedChanged(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles chkSearchEverywhere.CheckedChanged
+        Dim oTokens As IEnumerable(Of Token)
+
+        If chkSearchEverywhere.Checked = True Then
+            ' Create a list of tokens that only contains every term once,
+            ' without caring about attribute names.
+            oTokens = GetTokensFromTable(Of ValueOnlyToken)(TokenTable)
+            RibbonPageGroup5.Enabled = False
+        Else
+            ' Create a list of tokens where every term - attribute value is present once.
+            oTokens = GetTokensFromTable(Of AttributeValueToken)(TokenTable)
+            RibbonPageGroup5.Enabled = True
+        End If
+
+        ClearTokens(txtSearchInput)
+        SetTokens(txtSearchInput, oTokens)
+    End Sub
+
+    Private Sub chkOperatorAnd_CheckedChanged(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles chkOperatorAnd.CheckedChanged
+        If chkOperatorAnd.Checked And FormLoading = False Then
+            SearchRunner.SetTokenOperator(SearchRunner.TokenOperator.And)
+        End If
+    End Sub
+
+    Private Sub chkOperatorOr_CheckedChanged(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles chkOperatorOr.CheckedChanged
+        If chkOperatorOr.Checked And FormLoading = False Then
+            SearchRunner.SetTokenOperator(SearchRunner.TokenOperator.Or)
+        End If
+    End Sub
+
+    Private Sub TokenEditEx1_Properties_TokenAdded(sender As Object, e As TokenEditTokenAddedEventArgs) Handles txtSearchInput.Properties.TokenAdded
+
+    End Sub
+
+    Private Sub BarButtonItem2_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem2.ItemClick
+        FormLoading = True
+        DateEditFrom.EditValue = Nothing
+        DateEditTo.EditValue = Nothing
+        CheckEdit1.IsOn = False
+        ComboBoxDateAttributes.SelectedIndex = 0
+        txtSearchInput.EditValue = Nothing
+        FormLoading = False
+    End Sub
+
+    Private Sub chkGridVertical_CheckedChanged(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles chkGridVertical.CheckedChanged
+        ViewSearches.OptionsTiles.Orientation = Orientation.Vertical
+    End Sub
+
+    Private Sub chkGridHorizontal_CheckedChanged(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles chkGridHorizontal.CheckedChanged
+        ViewSearches.OptionsTiles.Orientation = Orientation.Horizontal
+    End Sub
+
+    Private Sub BarEditItem1_EditValueChanged(sender As Object, e As EventArgs) Handles BarEditItem1.EditValueChanged
+        ViewSearches.OptionsTiles.ColumnCount = BarEditItem1.EditValue
+    End Sub
+
+    Private Sub BarEditItem2_EditValueChanged(sender As Object, e As EventArgs) Handles BarEditItem2.EditValueChanged
+        ViewSearches.OptionsTiles.RowCount = BarEditItem2.EditValue
+    End Sub
+
+    Private Sub BarCheckItem1_CheckedChanged(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarCheckItem1.CheckedChanged
+        If BarCheckItem1.Checked Then
+            ViewSearches.OptionsTiles.LayoutMode = TileViewLayoutMode.Kanban
+        Else
+            ViewSearches.OptionsTiles.LayoutMode = TileViewLayoutMode.Default
+        End If
+    End Sub
+
+    Private Sub ViewSearches_ItemCheckedChanged(sender As Object, e As TileViewItemClickEventArgs) Handles ViewSearches.ItemCheckedChanged
+        Dim oItem As TileViewItem = e.Item
+        Dim oSearch As SavedSearch.SavedSearch = ViewSearches.GetRow(oItem.RowHandle)
+
+        If TypeOf oSearch Is CustomSearch Then
+            'TODO: show ribbon controls to edit search
+        End If
+    End Sub
+
+    Private Sub ViewSearches_CustomColumnSort(sender As Object, e As Views.Base.CustomColumnSortEventArgs) Handles ViewSearches.CustomColumnSort
+        If TypeOf e.RowObject1 Is CustomSearch Or TypeOf e.RowObject2 Is CustomSearch Then
+            e.Result = -1
+            e.Handled = True
+        Else
+            e.Handled = False
+        End If
+    End Sub
+End Class