This commit is contained in:
2022-02-22 12:06:08 +01:00
parent c6c548afe4
commit 3367e4a5fb
5 changed files with 163 additions and 104 deletions

View File

@@ -186,6 +186,8 @@ Partial Class frmFlowSearch1
'
'DockPanel1
'
Me.DockPanel1.Appearance.BackColor = System.Drawing.Color.Lavender
Me.DockPanel1.Appearance.Options.UseBackColor = True
Me.DockPanel1.Appearance.Options.UseImage = True
Me.DockPanel1.Controls.Add(Me.DockPanel1_Container)
Me.DockPanel1.Dock = DevExpress.XtraBars.Docking.DockingStyle.Left
@@ -213,16 +215,18 @@ Partial Class frmFlowSearch1
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, 43)
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(203, 490)
Me.XtraTabControl1.Size = New System.Drawing.Size(203, 475)
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)
@@ -236,7 +240,7 @@ Partial Class frmFlowSearch1
Me.XtraTabPage1.Controls.Add(Me.ToggleSwitchYear_Last)
Me.XtraTabPage1.Controls.Add(Me.ToggleSwitchYear)
Me.XtraTabPage1.Name = "XtraTabPage1"
Me.XtraTabPage1.Size = New System.Drawing.Size(201, 467)
Me.XtraTabPage1.Size = New System.Drawing.Size(201, 452)
Me.XtraTabPage1.Text = "Standard"
'
'DateEditTill
@@ -365,13 +369,13 @@ Partial Class frmFlowSearch1
'XtraTabPage2
'
Me.XtraTabPage2.Name = "XtraTabPage2"
Me.XtraTabPage2.Size = New System.Drawing.Size(201, 467)
Me.XtraTabPage2.Size = New System.Drawing.Size(201, 452)
Me.XtraTabPage2.Text = "...tbd"
'
'Label1
'
Me.Label1.AutoSize = True
Me.Label1.Location = New System.Drawing.Point(3, 0)
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
@@ -380,7 +384,7 @@ Partial Class frmFlowSearch1
'cmbLimitationDateAttr
'
Me.cmbLimitationDateAttr.FormattingEnabled = True
Me.cmbLimitationDateAttr.Location = New System.Drawing.Point(6, 16)
Me.cmbLimitationDateAttr.Location = New System.Drawing.Point(7, 24)
Me.cmbLimitationDateAttr.Name = "cmbLimitationDateAttr"
Me.cmbLimitationDateAttr.Size = New System.Drawing.Size(178, 21)
Me.cmbLimitationDateAttr.TabIndex = 1
@@ -421,6 +425,8 @@ Partial Class frmFlowSearch1
'
'frmFlowSearch1
'
Me.Appearance.BackColor = System.Drawing.Color.Lavender
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(936, 769)

View File

@@ -217,7 +217,7 @@ Public Class frmFlowSearch1
MsgBox(ex.Message, MsgBoxStyle.Critical)
Logger.Error(ex)
End Try
Me.BringToFront()
End Sub
@@ -341,4 +341,8 @@ Public Class frmFlowSearch1
End If
End Sub
Private Sub DockPanel1_Click(sender As Object, e As EventArgs) Handles DockPanel1.Click
End Sub
End Class