AppStd/EmailProfiler
8
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Improve Monitoring tab UI: add email limit panel

Browse Source 
Added a top panel to the Monitoring tab for specifying the number of emails to fetch, with a label and input field. Refactored grid layout by placing gridMonitoring inside a docked panel for better separation and flexibility. Updated designer code and .resx metadata to support new controls and lock them in the designer. No changes to business logic.
This commit is contained in:
OlgunR
2026-01-22 11:24:41 +01:00
parent 35bdee53e3
commit 6b291e82a7
2 changed files with 671 additions and 22 deletions
Download Patch File Download Diff File Expand all files Collapse all files

66
App/EmailProfiler.Form/frmMain.Designer.vb generated
View File

@@ -325,8 +325,10 @@ Partial Class frmMain
Me.Label3 = New System.Windows.Forms.Label()
Me.txtPasswort = New System.Windows.Forms.TextBox()
Me.tabMonitoring = New System.Windows.Forms.TabPage()
Me.pnlGridMonitoring = New DevExpress.XtraEditors.PanelControl()
Me.gridMonitoring = New DevExpress.XtraGrid.GridControl()
Me.GridView5 = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.pnlAbrufmenge = New DevExpress.XtraEditors.PanelControl()
Me.TBEMLP_HISTORYBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.BackgroundWorker1 = New System.ComponentModel.BackgroundWorker()
Me.TBEMLP_POLL_PROFILESTableAdapter = New EmailProfiler.Form.MyDatasetTableAdapters.TBEMLP_POLL_PROFILESTableAdapter()
@@ -339,6 +341,8 @@ Partial Class frmMain
Me.TBEMLP_CONFIGTableAdapter = New EmailProfiler.Form.MyDatasetTableAdapters.TBEMLP_CONFIGTableAdapter()
Me.FolderBrowserDialog1 = New System.Windows.Forms.FolderBrowserDialog()
Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.lblMonitoringLimit = New DevExpress.XtraEditors.LabelControl()
Me.txtMonitoringLimit = New DevExpress.XtraEditors.TextEdit()
GUIDLabel = New System.Windows.Forms.Label()
PROFILE_NAMELabel = New System.Windows.Forms.Label()
POLL_TYPELabel = New System.Windows.Forms.Label()
@@ -444,9 +448,14 @@ Partial Class frmMain
CType(Me.CHECK_INTERVALL_MINUTESNumericUpDown, System.ComponentModel.ISupportInitialize).BeginInit()
Me.GroupBox1.SuspendLayout()
Me.tabMonitoring.SuspendLayout()
CType(Me.pnlGridMonitoring, System.ComponentModel.ISupportInitialize).BeginInit()
Me.pnlGridMonitoring.SuspendLayout()
CType(Me.gridMonitoring, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridView5, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.pnlAbrufmenge, System.ComponentModel.ISupportInitialize).BeginInit()
Me.pnlAbrufmenge.SuspendLayout()
CType(Me.TBEMLP_HISTORYBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtMonitoringLimit.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'GUIDLabel
@@ -1089,7 +1098,7 @@ Partial Class frmMain
Me.GridControl4.Location = New System.Drawing.Point(3, 31)
Me.GridControl4.MainView = Me.GridView4
Me.GridControl4.Name = "GridControl4"
Me.GridControl4.Size = New System.Drawing.Size(245, 125)
Me.GridControl4.Size = New System.Drawing.Size(245, 99)
Me.GridControl4.TabIndex = 33
Me.GridControl4.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView4})
'
@@ -3415,7 +3424,8 @@ Partial Class frmMain
'tabMonitoring
'
Me.tabMonitoring.AutoScroll = True
Me.tabMonitoring.Controls.Add(Me.gridMonitoring)
Me.tabMonitoring.Controls.Add(Me.pnlGridMonitoring)
Me.tabMonitoring.Controls.Add(Me.pnlAbrufmenge)
Me.tabMonitoring.Location = New System.Drawing.Point(4, 32)
Me.tabMonitoring.Name = "tabMonitoring"
Me.tabMonitoring.Size = New System.Drawing.Size(1227, 558)
@@ -3423,15 +3433,22 @@ Partial Class frmMain
Me.tabMonitoring.Text = "Monitoring"
Me.tabMonitoring.UseVisualStyleBackColor = True
'
'pnlGridMonitoring
'
Me.pnlGridMonitoring.Controls.Add(Me.gridMonitoring)
Me.pnlGridMonitoring.Dock = System.Windows.Forms.DockStyle.Fill
Me.pnlGridMonitoring.Location = New System.Drawing.Point(0, 68)
Me.pnlGridMonitoring.Name = "pnlGridMonitoring"
Me.pnlGridMonitoring.Size = New System.Drawing.Size(1227, 490)
Me.pnlGridMonitoring.TabIndex = 2
'
'gridMonitoring
'
Me.gridMonitoring.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.gridMonitoring.Location = New System.Drawing.Point(32, 33)
Me.gridMonitoring.Dock = System.Windows.Forms.DockStyle.Fill
Me.gridMonitoring.Location = New System.Drawing.Point(3, 3)
Me.gridMonitoring.MainView = Me.GridView5
Me.gridMonitoring.Name = "gridMonitoring"
Me.gridMonitoring.Size = New System.Drawing.Size(1163, 491)
Me.gridMonitoring.Size = New System.Drawing.Size(1221, 484)
Me.gridMonitoring.TabIndex = 0
Me.gridMonitoring.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView5})
'
@@ -3448,6 +3465,16 @@ Partial Class frmMain
Me.GridView5.OptionsView.ShowAutoFilterRow = True
Me.GridView5.OptionsView.ShowGroupPanel = False
'
'pnlAbrufmenge
'
Me.pnlAbrufmenge.Controls.Add(Me.txtMonitoringLimit)
Me.pnlAbrufmenge.Controls.Add(Me.lblMonitoringLimit)
Me.pnlAbrufmenge.Dock = System.Windows.Forms.DockStyle.Top
Me.pnlAbrufmenge.Location = New System.Drawing.Point(0, 0)
Me.pnlAbrufmenge.Name = "pnlAbrufmenge"
Me.pnlAbrufmenge.Size = New System.Drawing.Size(1227, 68)
Me.pnlAbrufmenge.TabIndex = 1
'
'TBEMLP_HISTORYBindingSource
'
Me.TBEMLP_HISTORYBindingSource.DataMember = "TBEMLP_HISTORY"
@@ -3504,6 +3531,21 @@ Partial Class frmMain
Me.ContextMenuStrip1.Name = "ContextMenuStrip1"
Me.ContextMenuStrip1.Size = New System.Drawing.Size(61, 4)
'
'lblMonitoringLimit
'
Me.lblMonitoringLimit.Location = New System.Drawing.Point(35, 25)
Me.lblMonitoringLimit.Name = "lblMonitoringLimit"
Me.lblMonitoringLimit.Size = New System.Drawing.Size(197, 23)
Me.lblMonitoringLimit.TabIndex = 0
Me.lblMonitoringLimit.Text = "Abrufmenge an Emails:"
'
'txtMonitoringLimit
'
Me.txtMonitoringLimit.Location = New System.Drawing.Point(239, 19)
Me.txtMonitoringLimit.Name = "txtMonitoringLimit"
Me.txtMonitoringLimit.Size = New System.Drawing.Size(100, 38)
Me.txtMonitoringLimit.TabIndex = 1
'
'frmMain
'
Me.Appearance.Options.UseFont = True
@@ -3584,9 +3626,15 @@ Partial Class frmMain
Me.GroupBox1.ResumeLayout(False)
Me.GroupBox1.PerformLayout()
Me.tabMonitoring.ResumeLayout(False)
CType(Me.pnlGridMonitoring, System.ComponentModel.ISupportInitialize).EndInit()
Me.pnlGridMonitoring.ResumeLayout(False)
CType(Me.gridMonitoring, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GridView5, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.pnlAbrufmenge, System.ComponentModel.ISupportInitialize).EndInit()
Me.pnlAbrufmenge.ResumeLayout(False)
Me.pnlAbrufmenge.PerformLayout()
CType(Me.TBEMLP_HISTORYBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtMonitoringLimit.Properties, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
@@ -3852,4 +3900,8 @@ Partial Class frmMain
Friend WithEvents tabMonitoring As TabPage
Friend WithEvents gridMonitoring As DevExpress.XtraGrid.GridControl
Friend WithEvents GridView5 As DevExpress.XtraGrid.Views.Grid.GridView
Friend WithEvents pnlGridMonitoring As DevExpress.XtraEditors.PanelControl
Friend WithEvents pnlAbrufmenge As DevExpress.XtraEditors.PanelControl
Friend WithEvents txtMonitoringLimit As DevExpress.XtraEditors.TextEdit
Friend WithEvents lblMonitoringLimit As DevExpress.XtraEditors.LabelControl
End Class