MS FlowSearchCriteria

2021-02-05 12:22:39 +01:00
parent 124cc97e3b
commit a05c1ad8e9
2 changed files with 122 additions and 36 deletions
--- a/GUIs.ZooFlow/Search/frmFlowSearch.Designer.vb
+++ b/GUIs.ZooFlow/Search/frmFlowSearch.Designer.vb
@@ -48,6 +48,8 @@ Partial Class frmFlowSearch
        Me.BarCheckItem1 = New DevExpress.XtraBars.BarCheckItem()
        Me.BarToggleSwitchItem1 = New DevExpress.XtraBars.BarToggleSwitchItem()
        Me.BarToggleSwitchItem2 = New DevExpress.XtraBars.BarToggleSwitchItem()
+        Me.BarEditItemDate = New DevExpress.XtraBars.BarEditItem()
+        Me.RepositoryItemComboBox1 = New DevExpress.XtraEditors.Repository.RepositoryItemComboBox()
        Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
        Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
        Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
@@ -55,6 +57,7 @@ Partial Class frmFlowSearch
        Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
        Me.Panel1.SuspendLayout()
        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.RepositoryItemComboBox1, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.SuspendLayout()
        '
        'Panel1
@@ -67,7 +70,7 @@ Partial Class frmFlowSearch
        Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top
        Me.Panel1.Location = New System.Drawing.Point(0, 159)
        Me.Panel1.Name = "Panel1"
-        Me.Panel1.Size = New System.Drawing.Size(1245, 61)
+        Me.Panel1.Size = New System.Drawing.Size(1237, 61)
        Me.Panel1.TabIndex = 0
        '
        'CheckButton1
@@ -117,13 +120,17 @@ Partial Class frmFlowSearch
        'Panel2
        '
        Me.Panel2.Dock = System.Windows.Forms.DockStyle.Bottom
-        Me.Panel2.Location = New System.Drawing.Point(0, 452)
+        Me.Panel2.Location = New System.Drawing.Point(0, 627)
        Me.Panel2.Name = "Panel2"
-        Me.Panel2.Size = New System.Drawing.Size(1245, 18)
+        Me.Panel2.Size = New System.Drawing.Size(1237, 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.DimGray
        Me.TileControlMatch.Dock = System.Windows.Forms.DockStyle.Fill
        Me.TileControlMatch.Groups.Add(Me.TileGroup2)
@@ -132,7 +139,8 @@ Partial Class frmFlowSearch
        Me.TileControlMatch.MaxId = 2
        Me.TileControlMatch.Name = "TileControlMatch"
        Me.TileControlMatch.ScrollMode = DevExpress.XtraEditors.TileControlScrollMode.ScrollBar
-        Me.TileControlMatch.Size = New System.Drawing.Size(1245, 232)
+        Me.TileControlMatch.ShowGroupText = True
+        Me.TileControlMatch.Size = New System.Drawing.Size(1237, 407)
        Me.TileControlMatch.TabIndex = 2
        Me.TileControlMatch.Text = "TileControl1"
        '
@@ -170,14 +178,15 @@ Partial Class frmFlowSearch
        'RibbonControl1
        '
        Me.RibbonControl1.ExpandCollapseItem.Id = 0
-        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarToggleSwitchItemDateALL, Me.BarToggleSwitchItemCURRENTYEAR, Me.BarToggleSwitchItemLASTYEAR, Me.BarToggleSwitchItemCURRENTMONTH, Me.BarToggleSwitchItemLASTMONTH, Me.BarButtonGroup1, Me.BarToggleSwitchItemTODAY, Me.BarToggleSwitchItemYESTERDAY, Me.BarCheckItem1, Me.BarToggleSwitchItem1, Me.BarToggleSwitchItem2})
+        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarToggleSwitchItemDateALL, Me.BarToggleSwitchItemCURRENTYEAR, Me.BarToggleSwitchItemLASTYEAR, Me.BarToggleSwitchItemCURRENTMONTH, Me.BarToggleSwitchItemLASTMONTH, Me.BarButtonGroup1, Me.BarToggleSwitchItemTODAY, Me.BarToggleSwitchItemYESTERDAY, Me.BarCheckItem1, Me.BarToggleSwitchItem1, Me.BarToggleSwitchItem2, Me.BarEditItemDate})
        Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
-        Me.RibbonControl1.MaxItemId = 12
+        Me.RibbonControl1.MaxItemId = 13
        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.RepositoryItemComboBox1})
        Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
        Me.RibbonControl1.ShowToolbarCustomizeItem = False
-        Me.RibbonControl1.Size = New System.Drawing.Size(1245, 159)
+        Me.RibbonControl1.Size = New System.Drawing.Size(1237, 159)
        Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
        Me.RibbonControl1.Toolbar.ShowCustomizeItem = False
        '
@@ -191,6 +200,7 @@ Partial Class frmFlowSearch
        '
        'BarToggleSwitchItemCURRENTYEAR
        '
+        Me.BarToggleSwitchItemCURRENTYEAR.Alignment = DevExpress.XtraBars.BarItemLinkAlignment.Left
        Me.BarToggleSwitchItemCURRENTYEAR.Caption = "Aktuelles Jahr"
        Me.BarToggleSwitchItemCURRENTYEAR.Id = 2
        Me.BarToggleSwitchItemCURRENTYEAR.Name = "BarToggleSwitchItemCURRENTYEAR"
@@ -250,6 +260,20 @@ Partial Class frmFlowSearch
        Me.BarToggleSwitchItem2.Id = 11
        Me.BarToggleSwitchItem2.Name = "BarToggleSwitchItem2"
        '
+        'BarEditItemDate
+        '
+        Me.BarEditItemDate.Caption = "Attribut "
+        Me.BarEditItemDate.Edit = Me.RepositoryItemComboBox1
+        Me.BarEditItemDate.EditWidth = 120
+        Me.BarEditItemDate.Id = 12
+        Me.BarEditItemDate.Name = "BarEditItemDate"
+        '
+        '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"
+        '
        'RibbonPage1
        '
        Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup2})
@@ -259,27 +283,28 @@ Partial Class frmFlowSearch
        'RibbonPageGroup1
        '
        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarToggleSwitchItemDateALL)
+        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarEditItemDate)
        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonGroup1)
-        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarToggleSwitchItemCURRENTMONTH)
-        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarToggleSwitchItemLASTMONTH)
-        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarToggleSwitchItemTODAY)
+        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarToggleSwitchItemTODAY, True)
        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarToggleSwitchItemYESTERDAY)
+        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarToggleSwitchItemCURRENTYEAR, True)
+        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarToggleSwitchItemLASTYEAR)
+        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarToggleSwitchItemLASTMONTH, True)
+        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarToggleSwitchItemCURRENTMONTH)
        Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
-        Me.RibbonPageGroup1.Text = "Datumeingränzung"
+        Me.RibbonPageGroup1.Text = "Eingrenzung Datum"
        '
        'RibbonPageGroup2
        '
-        Me.RibbonPageGroup2.ItemLinks.Add(Me.BarToggleSwitchItemCURRENTYEAR)
-        Me.RibbonPageGroup2.ItemLinks.Add(Me.BarToggleSwitchItemLASTYEAR)
        Me.RibbonPageGroup2.Name = "RibbonPageGroup2"
        Me.RibbonPageGroup2.Text = "RibbonPageGroup2"
        '
        'RibbonStatusBar1
        '
-        Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 470)
+        Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 645)
        Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
        Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
-        Me.RibbonStatusBar1.Size = New System.Drawing.Size(1245, 22)
+        Me.RibbonStatusBar1.Size = New System.Drawing.Size(1237, 22)
        '
        'RibbonPage2
        '
@@ -292,7 +317,7 @@ Partial Class frmFlowSearch
        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(1245, 492)
+        Me.ClientSize = New System.Drawing.Size(1237, 667)
        Me.Controls.Add(Me.TileControlMatch)
        Me.Controls.Add(Me.Panel2)
        Me.Controls.Add(Me.Panel1)
@@ -306,6 +331,7 @@ Partial Class frmFlowSearch
        Me.Panel1.ResumeLayout(False)
        Me.Panel1.PerformLayout()
        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.RepositoryItemComboBox1, System.ComponentModel.ISupportInitialize).EndInit()
        Me.ResumeLayout(False)
        Me.PerformLayout()

@@ -339,4 +365,6 @@ Partial Class frmFlowSearch
    Friend WithEvents BarToggleSwitchItem1 As DevExpress.XtraBars.BarToggleSwitchItem
    Friend WithEvents BarToggleSwitchItem2 As DevExpress.XtraBars.BarToggleSwitchItem
    Friend WithEvents CheckButton1 As DevExpress.XtraEditors.CheckButton
+    Friend WithEvents BarEditItemDate As DevExpress.XtraBars.BarEditItem
+    Friend WithEvents RepositoryItemComboBox1 As DevExpress.XtraEditors.Repository.RepositoryItemComboBox
 End Class