This commit is contained in:
2022-02-11 14:37:18 +01:00
parent 98a1821f2b
commit 05b150f282
9 changed files with 644 additions and 58 deletions

View File

@@ -24,8 +24,8 @@ Partial Class frmFlowSearch
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()
Dim TileItemElement7 As DevExpress.XtraEditors.TileItemElement = New DevExpress.XtraEditors.TileItemElement()
Dim TileItemElement8 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()
@@ -49,7 +49,7 @@ Partial Class frmFlowSearch
Me.Label3 = New System.Windows.Forms.Label()
Me.CheckedListBoxCategories = New DevExpress.XtraEditors.CheckedListBoxControl()
Me.ToggleSwitchLastMonth = New DevExpress.XtraEditors.ToggleSwitch()
Me.ToggleSwitchCurrentMonth = 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()
@@ -67,7 +67,7 @@ Partial Class frmFlowSearch
Me.DockPanel1_Container.SuspendLayout()
CType(Me.CheckedListBoxCategories, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.ToggleSwitchLastMonth.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.ToggleSwitchCurrentMonth.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()
@@ -144,7 +144,7 @@ Partial Class frmFlowSearch
Me.TileControlMatch.Name = "TileControlMatch"
Me.TileControlMatch.ScrollMode = DevExpress.XtraEditors.TileControlScrollMode.ScrollBar
Me.TileControlMatch.ShowGroupText = True
Me.TileControlMatch.Size = New System.Drawing.Size(1035, 415)
Me.TileControlMatch.Size = New System.Drawing.Size(1035, 413)
Me.TileControlMatch.TabIndex = 2
Me.TileControlMatch.TabStop = False
Me.TileControlMatch.Text = "TileControl1"
@@ -161,8 +161,8 @@ Partial Class frmFlowSearch
'
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)
TileItemElement7.Text = "TileItem1"
Me.TileItem1.Elements.Add(TileItemElement7)
Me.TileItem1.Id = 0
Me.TileItem1.ItemSize = DevExpress.XtraEditors.TileItemSize.Wide
Me.TileItem1.Name = "TileItem1"
@@ -171,8 +171,8 @@ Partial Class frmFlowSearch
'
Me.TileItem2.AppearanceItem.Normal.BackColor = System.Drawing.Color.White
Me.TileItem2.AppearanceItem.Normal.Options.UseBackColor = True
TileItemElement2.Text = "TileItem2"
Me.TileItem2.Elements.Add(TileItemElement2)
TileItemElement8.Text = "TileItem2"
Me.TileItem2.Elements.Add(TileItemElement8)
Me.TileItem2.Id = 1
Me.TileItem2.ItemSize = DevExpress.XtraEditors.TileItemSize.Medium
Me.TileItem2.Name = "TileItem2"
@@ -198,7 +198,7 @@ Partial Class frmFlowSearch
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, 146)
Me.RibbonControl1.Size = New System.Drawing.Size(1237, 148)
Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
Me.RibbonControl1.Toolbar.ShowCustomizeItem = False
'
@@ -238,10 +238,10 @@ Partial Class frmFlowSearch
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, 146)
Me.panelContainer1.Location = New System.Drawing.Point(0, 148)
Me.panelContainer1.Name = "panelContainer1"
Me.panelContainer1.OriginalSize = New System.Drawing.Size(202, 200)
Me.panelContainer1.Size = New System.Drawing.Size(202, 499)
Me.panelContainer1.Size = New System.Drawing.Size(202, 497)
Me.panelContainer1.Tabbed = True
Me.panelContainer1.Text = "panelContainer1"
'
@@ -258,8 +258,8 @@ Partial Class frmFlowSearch
Me.DockPanel1.Options.AllowFloating = False
Me.DockPanel1.Options.ShowCloseButton = False
Me.DockPanel1.Options.ShowMaximizeButton = False
Me.DockPanel1.OriginalSize = New System.Drawing.Size(220, 421)
Me.DockPanel1.Size = New System.Drawing.Size(195, 421)
Me.DockPanel1.OriginalSize = New System.Drawing.Size(195, 421)
Me.DockPanel1.Size = New System.Drawing.Size(195, 419)
Me.DockPanel1.Text = "Einschränkungen"
'
'DockPanel1_Container
@@ -267,7 +267,7 @@ Partial Class frmFlowSearch
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.ToggleSwitchCurrentMonth)
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)
@@ -276,7 +276,7 @@ Partial Class frmFlowSearch
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, 421)
Me.DockPanel1_Container.Size = New System.Drawing.Size(195, 419)
Me.DockPanel1_Container.TabIndex = 0
'
'Label3
@@ -299,7 +299,7 @@ Partial Class frmFlowSearch
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, 201)
Me.CheckedListBoxCategories.Size = New System.Drawing.Size(174, 199)
Me.CheckedListBoxCategories.TabIndex = 15
'
'ToggleSwitchLastMonth
@@ -316,19 +316,19 @@ Partial Class frmFlowSearch
Me.ToggleSwitchLastMonth.Size = New System.Drawing.Size(151, 19)
Me.ToggleSwitchLastMonth.TabIndex = 14
'
'ToggleSwitchCurrentMonth
'ToggleSwitchMonth
'
Me.ToggleSwitchCurrentMonth.Location = New System.Drawing.Point(12, 150)
Me.ToggleSwitchCurrentMonth.MenuManager = Me.RibbonControl1
Me.ToggleSwitchCurrentMonth.Name = "ToggleSwitchCurrentMonth"
Me.ToggleSwitchCurrentMonth.Properties.Appearance.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.ToggleSwitchCurrentMonth.Properties.Appearance.ForeColor = System.Drawing.Color.White
Me.ToggleSwitchCurrentMonth.Properties.Appearance.Options.UseFont = True
Me.ToggleSwitchCurrentMonth.Properties.Appearance.Options.UseForeColor = True
Me.ToggleSwitchCurrentMonth.Properties.OffText = "Aktueller Monat"
Me.ToggleSwitchCurrentMonth.Properties.OnText = "Aktueller Monat"
Me.ToggleSwitchCurrentMonth.Size = New System.Drawing.Size(174, 19)
Me.ToggleSwitchCurrentMonth.TabIndex = 13
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
'
@@ -415,15 +415,15 @@ Partial Class frmFlowSearch
Me.DockPanel3.Location = New System.Drawing.Point(3, 46)
Me.DockPanel3.Name = "DockPanel3"
Me.DockPanel3.Options.AllowFloating = False
Me.DockPanel3.OriginalSize = New System.Drawing.Size(220, 421)
Me.DockPanel3.Size = New System.Drawing.Size(195, 421)
Me.DockPanel3.OriginalSize = New System.Drawing.Size(195, 421)
Me.DockPanel3.Size = New System.Drawing.Size(195, 419)
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, 421)
Me.DockPanel3_Container.Size = New System.Drawing.Size(195, 419)
Me.DockPanel3_Container.TabIndex = 0
'
'Panel1
@@ -434,7 +434,7 @@ Partial Class frmFlowSearch
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, 146)
Me.Panel1.Location = New System.Drawing.Point(202, 148)
Me.Panel1.Name = "Panel1"
Me.Panel1.Size = New System.Drawing.Size(1035, 66)
Me.Panel1.TabIndex = 0
@@ -444,9 +444,9 @@ Partial Class frmFlowSearch
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, 212)
Me.Panel3.Location = New System.Drawing.Point(202, 214)
Me.Panel3.Name = "Panel3"
Me.Panel3.Size = New System.Drawing.Size(1035, 415)
Me.Panel3.Size = New System.Drawing.Size(1035, 413)
Me.Panel3.TabIndex = 9
'
'frmFlowSearch
@@ -476,7 +476,7 @@ Partial Class frmFlowSearch
Me.DockPanel1_Container.PerformLayout()
CType(Me.CheckedListBoxCategories, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ToggleSwitchLastMonth.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ToggleSwitchCurrentMonth.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()
@@ -519,7 +519,7 @@ Partial Class frmFlowSearch
Friend WithEvents ToggleSwitchLastYear As DevExpress.XtraEditors.ToggleSwitch
Friend WithEvents ToggleSwitchCurrentYear As DevExpress.XtraEditors.ToggleSwitch
Friend WithEvents ToggleSwitchLastMonth As DevExpress.XtraEditors.ToggleSwitch
Friend WithEvents ToggleSwitchCurrentMonth 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