Refactor monitoring grid to use GridViewMonitoring

Replaces all references to GridView5 with GridViewMonitoring for clarity and maintainability. Updates layout save/restore logic to use the new view, adds a helper for loading layouts, and improves default layout restoration. Cleans up designer and resource files, removing obsolete entries and ensuring correct initialization.
Add save/restore layout buttons to Monitoring grid
2026-01-28 11:28:19 +01:00 · 2026-01-27 13:31:15 +01:00 · 2026-01-27 13:04:52 +01:00 · 2026-01-27 12:50:04 +01:00 · 2026-01-27 12:48:12 +01:00 · 2026-01-27 12:46:38 +01:00
10 changed files with 318 additions and 102 deletions
--- a/App/EmailProfiler.Form/App.config
+++ b/App/EmailProfiler.Form/App.config
@@ -9,12 +9,10 @@
        </sectionGroup>
    </configSections>
    <connectionStrings>
-        <add name="EmailProfiler.Form.My.MySettings.MyDatasetConnString"
-            connectionString="Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM;User ID=sa;Password=dd;Encrypt=True;TrustServerCertificate=True"
-            providerName="System.Data.SqlClient" />
+        <add name="EmailProfiler.Form.My.MySettings.MyDatasetConnString" connectionString="Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM;User ID=sa;Password=dd;Encrypt=True;TrustServerCertificate=True" providerName="System.Data.SqlClient"/>
    </connectionStrings>
    <startup>
-        <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6.2"/>
+        <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.8"/>
    </startup>
  <runtime>
    <assemblyBinding xmlns="urn:schemas-microsoft-com:asm.v1">
--- a/App/EmailProfiler.Form/EmailProfiler.Form.vbproj
+++ b/App/EmailProfiler.Form/EmailProfiler.Form.vbproj
@@ -11,7 +11,7 @@
    <AssemblyName>EmailProfiler.Form</AssemblyName>
    <FileAlignment>512</FileAlignment>
    <MyType>WindowsForms</MyType>
-    <TargetFrameworkVersion>v4.6.2</TargetFrameworkVersion>
+    <TargetFrameworkVersion>v4.8</TargetFrameworkVersion>
    <AutoGenerateBindingRedirects>true</AutoGenerateBindingRedirects>
    <TargetFrameworkProfile />
  </PropertyGroup>
--- a/Project/Application.Designer.vb
+++ b/Project/Application.Designer.vb
@@ -1,10 +1,10 @@
 '------------------------------------------------------------------------------
 ' <auto-generated>
-'     Dieser Code wurde von einem Tool generiert.
-'     Laufzeitversion:4.0.30319.42000
+'     This code was generated by a tool.
+'     Runtime Version:4.0.30319.42000
 '
-'     Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-'     der Code erneut generiert wird.
+'     Changes to this file may cause incorrect behavior and will be lost if
+'     the code is regenerated.
 ' </auto-generated>
 '------------------------------------------------------------------------------

@@ -14,10 +14,10 @@ Option Explicit On

 Namespace My
    
-    'HINWEIS: Diese Datei wird automatisch generiert und darf nicht direkt bearbeitet werden.  Wenn Sie Änderungen vornehmen möchten
-    ' oder in dieser Datei Buildfehler auftreten, wechseln Sie zum Projekt-Designer.
-    ' (Wechseln Sie dazu zu den Projekteigenschaften, oder doppelklicken Sie auf den Knoten "Mein Projekt" im
-    ' Projektmappen-Explorer). Nehmen Sie auf der Registerkarte "Anwendung" entsprechende Änderungen vor.
+    'NOTE: This file is auto-generated; do not modify it directly.  To make changes,
+    ' or if you encounter build errors in this file, go to the Project Designer
+    ' (go to Project Properties or double-click the My Project node in
+    ' Solution Explorer), and make changes on the Application tab.
    '
    Partial Friend Class MyApplication
        
@@ -34,5 +34,11 @@ Namespace My
        Protected Overrides Sub OnCreateMainForm()
            Me.MainForm = Global.EmailProfiler.Form.frmMain
        End Sub
+        
+        <Global.System.Diagnostics.DebuggerStepThroughAttribute()>  _
+        Protected Overrides Function OnInitialize(ByVal commandLineArgs As System.Collections.ObjectModel.ReadOnlyCollection(Of String)) As Boolean
+            Me.MinimumSplashScreenDisplayTime = 0
+            Return MyBase.OnInitialize(commandLineArgs)
+        End Function
    End Class
 End Namespace
--- a/Project/Application.myapp
+++ b/Project/Application.myapp
@@ -1,11 +1,12 @@
 <?xml version="1.0" encoding="utf-8"?>
-<MyApplicationData xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
+<MyApplicationData xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
  <MySubMain>true</MySubMain>
-  <MainForm>Form1</MainForm>
+  <MainForm>frmMain</MainForm>
  <SingleInstance>false</SingleInstance>
  <ShutdownMode>0</ShutdownMode>
  <EnableVisualStyles>true</EnableVisualStyles>
  <AuthenticationMode>0</AuthenticationMode>
-  <ApplicationType>0</ApplicationType>
+  <MinimumSplashScreenDisplayTime>0</MinimumSplashScreenDisplayTime>
  <SaveMySettingsOnExit>true</SaveMySettingsOnExit>
+  <HighDpiMode>0</HighDpiMode>
 </MyApplicationData>
--- a/App/EmailProfiler.Form/My
+++ b/App/EmailProfiler.Form/My
@@ -13,7 +13,7 @@ Imports System.Runtime.InteropServices
 <Assembly: AssemblyCompany("Digital Data")>
 <Assembly: AssemblyProduct("EmailProfiler Config")>
 <Assembly: AssemblyCopyright("Copyright © 2025")>
-<Assembly: AssemblyTrademark("3.1.0")>
+<Assembly: AssemblyTrademark("3.2.0")>

 <Assembly: ComVisible(False)>

@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")>

-<Assembly: AssemblyVersion("3.1.0.0")>
+<Assembly: AssemblyVersion("3.2.0.0")>
 <Assembly: AssemblyFileVersion("1.0.0.0")>
--- a/Project/Resources.Designer.vb
+++ b/Project/Resources.Designer.vb
@@ -1,10 +1,10 @@
 '------------------------------------------------------------------------------
 ' <auto-generated>
-'     Dieser Code wurde von einem Tool generiert.
-'     Laufzeitversion:4.0.30319.42000
+'     This code was generated by a tool.
+'     Runtime Version:4.0.30319.42000
 '
-'     Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-'     der Code erneut generiert wird.
+'     Changes to this file may cause incorrect behavior and will be lost if
+'     the code is regenerated.
 ' </auto-generated>
 '------------------------------------------------------------------------------

@@ -15,12 +15,12 @@ Imports System

 Namespace My.Resources
    
-    'Diese Klasse wurde von der StronglyTypedResourceBuilder automatisch generiert
-    '-Klasse über ein Tool wie ResGen oder Visual Studio automatisch generiert.
-    'Um einen Member hinzuzufügen oder zu entfernen, bearbeiten Sie die .ResX-Datei und führen dann ResGen
-    'mit der /str-Option erneut aus, oder Sie erstellen Ihr VS-Projekt neu.
+    'This class was auto-generated by the StronglyTypedResourceBuilder
+    'class via a tool like ResGen or Visual Studio.
+    'To add or remove a member, edit your .ResX file then rerun ResGen
+    'with the /str option, or rebuild your VS project.
    '''<summary>
-    '''  Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
+    '''  A strongly-typed resource class, for looking up localized strings, etc.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "17.0.0.0"),  _
     Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
@@ -33,7 +33,7 @@ Namespace My.Resources
        Private resourceCulture As Global.System.Globalization.CultureInfo
        
        '''<summary>
-        '''  Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird.
+        '''  Returns the cached ResourceManager instance used by this class.
        '''</summary>
        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
        Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
@@ -47,8 +47,8 @@ Namespace My.Resources
        End Property
        
        '''<summary>
-        '''  Überschreibt die CurrentUICulture-Eigenschaft des aktuellen Threads für alle
-        '''  Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden.
+        '''  Overrides the current thread's CurrentUICulture property for all
+        '''  resource lookups using this strongly typed resource class.
        '''</summary>
        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
        Friend Property Culture() As Global.System.Globalization.CultureInfo
@@ -61,7 +61,7 @@ Namespace My.Resources
        End Property
        
        '''<summary>
-        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
        '''</summary>
        Friend ReadOnly Property arrow_Down_16xMD() As System.Drawing.Bitmap
            Get
@@ -71,7 +71,7 @@ Namespace My.Resources
        End Property
        
        '''<summary>
-        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
        '''</summary>
        Friend ReadOnly Property arrow_right() As System.Drawing.Bitmap
            Get
@@ -81,7 +81,7 @@ Namespace My.Resources
        End Property
        
        '''<summary>
-        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
        '''</summary>
        Friend ReadOnly Property email_go() As System.Drawing.Bitmap
            Get
@@ -91,7 +91,7 @@ Namespace My.Resources
        End Property
        
        '''<summary>
-        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
        '''</summary>
        Friend ReadOnly Property Encrypt() As System.Drawing.Bitmap
            Get
@@ -101,7 +101,7 @@ Namespace My.Resources
        End Property
        
        '''<summary>
-        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
        '''</summary>
        Friend ReadOnly Property folder_Closed_16xLG() As System.Drawing.Bitmap
            Get
@@ -111,7 +111,7 @@ Namespace My.Resources
        End Property
        
        '''<summary>
-        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
        '''</summary>
        Friend ReadOnly Property handdrawn_arrow_down() As System.Drawing.Bitmap
            Get
@@ -121,7 +121,7 @@ Namespace My.Resources
        End Property
        
        '''<summary>
-        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
        '''</summary>
        Friend ReadOnly Property key_16xLG() As System.Drawing.Bitmap
            Get
@@ -131,7 +131,7 @@ Namespace My.Resources
        End Property
        
        '''<summary>
-        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
        '''</summary>
        Friend ReadOnly Property refresh_16xLG() As System.Drawing.Bitmap
            Get
@@ -141,7 +141,7 @@ Namespace My.Resources
        End Property
        
        '''<summary>
-        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
        '''</summary>
        Friend ReadOnly Property save_16xMD() As System.Drawing.Bitmap
            Get
--- a/Project/Settings.Designer.vb
+++ b/Project/Settings.Designer.vb
@@ -1,10 +1,10 @@
 '------------------------------------------------------------------------------
 ' <auto-generated>
-'     Dieser Code wurde von einem Tool generiert.
-'     Laufzeitversion:4.0.30319.42000
+'     This code was generated by a tool.
+'     Runtime Version:4.0.30319.42000
 '
-'     Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-'     der Code erneut generiert wird.
+'     Changes to this file may cause incorrect behavior and will be lost if
+'     the code is regenerated.
 ' </auto-generated>
 '------------------------------------------------------------------------------

@@ -22,7 +22,7 @@ Namespace My
        
        Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
        
-#Region "Automatische My.Settings-Speicherfunktion"
+#Region "My.Settings Auto-Save Functionality"
 #If _MyType = "WindowsForms" Then
    Private Shared addedHandler As Boolean

--- a/App/EmailProfiler.Form/frmMain.Designer.vb
+++ b/App/EmailProfiler.Form/frmMain.Designer.vb
@@ -324,6 +324,17 @@ Partial Class frmMain
        Me.txtUser = New System.Windows.Forms.TextBox()
        Me.Label3 = New System.Windows.Forms.Label()
        Me.txtPasswort = New System.Windows.Forms.TextBox()
+        Me.tabMonitoring = New System.Windows.Forms.TabPage()
+        Me.pnlMonitoringGrid = New DevExpress.XtraEditors.PanelControl()
+        Me.gridMonitoring = New DevExpress.XtraGrid.GridControl()
+        Me.GridViewMonitoring = New DevExpress.XtraGrid.Views.Grid.GridView()
+        Me.pnlMonitoringConfig = New DevExpress.XtraEditors.PanelControl()
+        Me.btnRestoreDefaultLayout = New System.Windows.Forms.Button()
+        Me.btnSaveLayout = New System.Windows.Forms.Button()
+        Me.btnRefresh = New System.Windows.Forms.Button()
+        Me.btnMonitoringConfig = New System.Windows.Forms.Button()
+        Me.txtMonitoringConfig = New System.Windows.Forms.TextBox()
+        Me.lblMonitoringConfig = New System.Windows.Forms.Label()
        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()
@@ -440,6 +451,13 @@ Partial Class frmMain
        CType(Me.TBEMLP_CONFIGBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.CHECK_INTERVALL_MINUTESNumericUpDown, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.GroupBox1.SuspendLayout()
+        Me.tabMonitoring.SuspendLayout()
+        CType(Me.pnlMonitoringGrid, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.pnlMonitoringGrid.SuspendLayout()
+        CType(Me.gridMonitoring, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.GridViewMonitoring, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.pnlMonitoringConfig, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.pnlMonitoringConfig.SuspendLayout()
        CType(Me.TBEMLP_HISTORYBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.SuspendLayout()
        '
@@ -1004,6 +1022,7 @@ Partial Class frmMain
        Me.TabControl1.Controls.Add(Me.tabProfile)
        Me.TabControl1.Controls.Add(Me.tabEmail)
        Me.TabControl1.Controls.Add(Me.tabConfig)
+        Me.TabControl1.Controls.Add(Me.tabMonitoring)
        Me.TabControl1.Dock = System.Windows.Forms.DockStyle.Fill
        Me.TabControl1.Location = New System.Drawing.Point(0, 0)
        Me.TabControl1.Name = "TabControl1"
@@ -1679,9 +1698,9 @@ Partial Class frmMain
        'ACTIVECheckBox1
        '
        Me.ACTIVECheckBox1.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.TBEMLP_POLL_PROCESSBindingSource, "ACTIVE", True))
-        Me.ACTIVECheckBox1.Location = New System.Drawing.Point(757, 38)
+        Me.ACTIVECheckBox1.Location = New System.Drawing.Point(757, 47)
        Me.ACTIVECheckBox1.Name = "ACTIVECheckBox1"
-        Me.ACTIVECheckBox1.Size = New System.Drawing.Size(94, 38)
+        Me.ACTIVECheckBox1.Size = New System.Drawing.Size(61, 22)
        Me.ACTIVECheckBox1.TabIndex = 3
        Me.ACTIVECheckBox1.Text = "Active"
        Me.ACTIVECheckBox1.UseVisualStyleBackColor = True
@@ -1693,7 +1712,6 @@ Partial Class frmMain
        Me.BindingNavigator2.CountItem = Me.ToolStripLabel1
        Me.BindingNavigator2.CountItemFormat = "von {0} Prozessen"
        Me.BindingNavigator2.DeleteItem = Me.ToolStripButton3
-        Me.BindingNavigator2.ImageScalingSize = New System.Drawing.Size(24, 24)
        Me.BindingNavigator2.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripButton4, Me.ToolStripButton5, Me.ToolStripSeparator1, Me.ToolStripTextBox1, Me.ToolStripLabel1, Me.ToolStripSeparator2, Me.ToolStripButton6, Me.ToolStripButton7, Me.ToolStripSeparator3, Me.ToolStripButton2, Me.ToolStripButton3, Me.ToolStripButton8, Me.ToolStripButton10})
        Me.BindingNavigator2.Location = New System.Drawing.Point(245, 0)
        Me.BindingNavigator2.MoveFirstItem = Me.ToolStripButton4
@@ -1702,7 +1720,7 @@ Partial Class frmMain
        Me.BindingNavigator2.MovePreviousItem = Me.ToolStripButton5
        Me.BindingNavigator2.Name = "BindingNavigator2"
        Me.BindingNavigator2.PositionItem = Me.ToolStripTextBox1
-        Me.BindingNavigator2.Size = New System.Drawing.Size(974, 31)
+        Me.BindingNavigator2.Size = New System.Drawing.Size(974, 25)
        Me.BindingNavigator2.TabIndex = 32
        Me.BindingNavigator2.Text = "BindingNavigator2"
        '
@@ -1712,13 +1730,13 @@ Partial Class frmMain
        Me.ToolStripButton2.Image = CType(resources.GetObject("ToolStripButton2.Image"), System.Drawing.Image)
        Me.ToolStripButton2.Name = "ToolStripButton2"
        Me.ToolStripButton2.RightToLeftAutoMirrorImage = True
-        Me.ToolStripButton2.Size = New System.Drawing.Size(28, 28)
+        Me.ToolStripButton2.Size = New System.Drawing.Size(23, 22)
        Me.ToolStripButton2.Text = "Neu hinzufügen"
        '
        'ToolStripLabel1
        '
        Me.ToolStripLabel1.Name = "ToolStripLabel1"
-        Me.ToolStripLabel1.Size = New System.Drawing.Size(99, 28)
+        Me.ToolStripLabel1.Size = New System.Drawing.Size(99, 22)
        Me.ToolStripLabel1.Text = "von {0} Prozessen"
        Me.ToolStripLabel1.ToolTipText = "Die Gesamtanzahl der Elemente."
        '
@@ -1728,7 +1746,7 @@ Partial Class frmMain
        Me.ToolStripButton3.Image = CType(resources.GetObject("ToolStripButton3.Image"), System.Drawing.Image)
        Me.ToolStripButton3.Name = "ToolStripButton3"
        Me.ToolStripButton3.RightToLeftAutoMirrorImage = True
-        Me.ToolStripButton3.Size = New System.Drawing.Size(28, 28)
+        Me.ToolStripButton3.Size = New System.Drawing.Size(23, 22)
        Me.ToolStripButton3.Text = "Löschen"
        '
        'ToolStripButton4
@@ -1737,7 +1755,7 @@ Partial Class frmMain
        Me.ToolStripButton4.Image = CType(resources.GetObject("ToolStripButton4.Image"), System.Drawing.Image)
        Me.ToolStripButton4.Name = "ToolStripButton4"
        Me.ToolStripButton4.RightToLeftAutoMirrorImage = True
-        Me.ToolStripButton4.Size = New System.Drawing.Size(28, 28)
+        Me.ToolStripButton4.Size = New System.Drawing.Size(23, 22)
        Me.ToolStripButton4.Text = "Erste verschieben"
        '
        'ToolStripButton5
@@ -1746,13 +1764,13 @@ Partial Class frmMain
        Me.ToolStripButton5.Image = CType(resources.GetObject("ToolStripButton5.Image"), System.Drawing.Image)
        Me.ToolStripButton5.Name = "ToolStripButton5"
        Me.ToolStripButton5.RightToLeftAutoMirrorImage = True
-        Me.ToolStripButton5.Size = New System.Drawing.Size(28, 28)
+        Me.ToolStripButton5.Size = New System.Drawing.Size(23, 22)
        Me.ToolStripButton5.Text = "Vorherige verschieben"
        '
        'ToolStripSeparator1
        '
        Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
-        Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 31)
+        Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 25)
        '
        'ToolStripTextBox1
        '
@@ -1767,7 +1785,7 @@ Partial Class frmMain
        'ToolStripSeparator2
        '
        Me.ToolStripSeparator2.Name = "ToolStripSeparator2"
-        Me.ToolStripSeparator2.Size = New System.Drawing.Size(6, 31)
+        Me.ToolStripSeparator2.Size = New System.Drawing.Size(6, 25)
        '
        'ToolStripButton6
        '
@@ -1775,7 +1793,7 @@ Partial Class frmMain
        Me.ToolStripButton6.Image = CType(resources.GetObject("ToolStripButton6.Image"), System.Drawing.Image)
        Me.ToolStripButton6.Name = "ToolStripButton6"
        Me.ToolStripButton6.RightToLeftAutoMirrorImage = True
-        Me.ToolStripButton6.Size = New System.Drawing.Size(28, 28)
+        Me.ToolStripButton6.Size = New System.Drawing.Size(23, 22)
        Me.ToolStripButton6.Text = "Nächste verschieben"
        '
        'ToolStripButton7
@@ -1784,13 +1802,13 @@ Partial Class frmMain
        Me.ToolStripButton7.Image = CType(resources.GetObject("ToolStripButton7.Image"), System.Drawing.Image)
        Me.ToolStripButton7.Name = "ToolStripButton7"
        Me.ToolStripButton7.RightToLeftAutoMirrorImage = True
-        Me.ToolStripButton7.Size = New System.Drawing.Size(28, 28)
+        Me.ToolStripButton7.Size = New System.Drawing.Size(23, 22)
        Me.ToolStripButton7.Text = "Letzte verschieben"
        '
        'ToolStripSeparator3
        '
        Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
-        Me.ToolStripSeparator3.Size = New System.Drawing.Size(6, 31)
+        Me.ToolStripSeparator3.Size = New System.Drawing.Size(6, 25)
        '
        'ToolStripButton8
        '
@@ -1798,7 +1816,7 @@ Partial Class frmMain
        Me.ToolStripButton8.Image = Global.EmailProfiler.Form.My.Resources.Resources.save_16xMD
        Me.ToolStripButton8.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.ToolStripButton8.Name = "ToolStripButton8"
-        Me.ToolStripButton8.Size = New System.Drawing.Size(28, 28)
+        Me.ToolStripButton8.Size = New System.Drawing.Size(23, 22)
        Me.ToolStripButton8.Text = "ToolStripButton1"
        '
        'ToolStripButton10
@@ -1807,7 +1825,7 @@ Partial Class frmMain
        Me.ToolStripButton10.Image = Global.EmailProfiler.Form.My.Resources.Resources.refresh_16xLG
        Me.ToolStripButton10.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.ToolStripButton10.Name = "ToolStripButton10"
-        Me.ToolStripButton10.Size = New System.Drawing.Size(28, 28)
+        Me.ToolStripButton10.Size = New System.Drawing.Size(23, 22)
        Me.ToolStripButton10.Text = "Refresh"
        '
        'GridControl1
@@ -1951,7 +1969,6 @@ Partial Class frmMain
        Me.BindingNavigator3.CountItem = Me.ToolStripLabel2
        Me.BindingNavigator3.CountItemFormat = "von {0} möglichen Verarbeitungsschritten"
        Me.BindingNavigator3.DeleteItem = Me.ToolStripButton12
-        Me.BindingNavigator3.ImageScalingSize = New System.Drawing.Size(24, 24)
        Me.BindingNavigator3.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripButton13, Me.ToolStripButton14, Me.ToolStripSeparator4, Me.ToolStripTextBox2, Me.ToolStripLabel2, Me.ToolStripSeparator5, Me.ToolStripButton15, Me.ToolStripButton16, Me.ToolStripSeparator6, Me.ToolStripButton11, Me.ToolStripButton12, Me.ToolStripButton17, Me.ToolStripButton18})
        Me.BindingNavigator3.Location = New System.Drawing.Point(245, 0)
        Me.BindingNavigator3.MoveFirstItem = Me.ToolStripButton13
@@ -1960,7 +1977,7 @@ Partial Class frmMain
        Me.BindingNavigator3.MovePreviousItem = Me.ToolStripButton14
        Me.BindingNavigator3.Name = "BindingNavigator3"
        Me.BindingNavigator3.PositionItem = Me.ToolStripTextBox2
-        Me.BindingNavigator3.Size = New System.Drawing.Size(974, 31)
+        Me.BindingNavigator3.Size = New System.Drawing.Size(974, 25)
        Me.BindingNavigator3.TabIndex = 33
        Me.BindingNavigator3.Text = "BindingNavigator3"
        '
@@ -1970,13 +1987,13 @@ Partial Class frmMain
        Me.ToolStripButton11.Image = CType(resources.GetObject("ToolStripButton11.Image"), System.Drawing.Image)
        Me.ToolStripButton11.Name = "ToolStripButton11"
        Me.ToolStripButton11.RightToLeftAutoMirrorImage = True
-        Me.ToolStripButton11.Size = New System.Drawing.Size(28, 28)
+        Me.ToolStripButton11.Size = New System.Drawing.Size(23, 22)
        Me.ToolStripButton11.Text = "Neu hinzufügen"
        '
        'ToolStripLabel2
        '
        Me.ToolStripLabel2.Name = "ToolStripLabel2"
-        Me.ToolStripLabel2.Size = New System.Drawing.Size(225, 28)
+        Me.ToolStripLabel2.Size = New System.Drawing.Size(225, 22)
        Me.ToolStripLabel2.Text = "von {0} möglichen Verarbeitungsschritten"
        Me.ToolStripLabel2.ToolTipText = "Die Gesamtanzahl der Elemente."
        '
@@ -1986,7 +2003,7 @@ Partial Class frmMain
        Me.ToolStripButton12.Image = CType(resources.GetObject("ToolStripButton12.Image"), System.Drawing.Image)
        Me.ToolStripButton12.Name = "ToolStripButton12"
        Me.ToolStripButton12.RightToLeftAutoMirrorImage = True
-        Me.ToolStripButton12.Size = New System.Drawing.Size(28, 28)
+        Me.ToolStripButton12.Size = New System.Drawing.Size(23, 22)
        Me.ToolStripButton12.Text = "Löschen"
        '
        'ToolStripButton13
@@ -1995,7 +2012,7 @@ Partial Class frmMain
        Me.ToolStripButton13.Image = CType(resources.GetObject("ToolStripButton13.Image"), System.Drawing.Image)
        Me.ToolStripButton13.Name = "ToolStripButton13"
        Me.ToolStripButton13.RightToLeftAutoMirrorImage = True
-        Me.ToolStripButton13.Size = New System.Drawing.Size(28, 28)
+        Me.ToolStripButton13.Size = New System.Drawing.Size(23, 22)
        Me.ToolStripButton13.Text = "Erste verschieben"
        '
        'ToolStripButton14
@@ -2004,13 +2021,13 @@ Partial Class frmMain
        Me.ToolStripButton14.Image = CType(resources.GetObject("ToolStripButton14.Image"), System.Drawing.Image)
        Me.ToolStripButton14.Name = "ToolStripButton14"
        Me.ToolStripButton14.RightToLeftAutoMirrorImage = True
-        Me.ToolStripButton14.Size = New System.Drawing.Size(28, 28)
+        Me.ToolStripButton14.Size = New System.Drawing.Size(23, 22)
        Me.ToolStripButton14.Text = "Vorherige verschieben"
        '
        'ToolStripSeparator4
        '
        Me.ToolStripSeparator4.Name = "ToolStripSeparator4"
-        Me.ToolStripSeparator4.Size = New System.Drawing.Size(6, 31)
+        Me.ToolStripSeparator4.Size = New System.Drawing.Size(6, 25)
        '
        'ToolStripTextBox2
        '
@@ -2025,7 +2042,7 @@ Partial Class frmMain
        'ToolStripSeparator5
        '
        Me.ToolStripSeparator5.Name = "ToolStripSeparator5"
-        Me.ToolStripSeparator5.Size = New System.Drawing.Size(6, 31)
+        Me.ToolStripSeparator5.Size = New System.Drawing.Size(6, 25)
        '
        'ToolStripButton15
        '
@@ -2033,7 +2050,7 @@ Partial Class frmMain
        Me.ToolStripButton15.Image = CType(resources.GetObject("ToolStripButton15.Image"), System.Drawing.Image)
        Me.ToolStripButton15.Name = "ToolStripButton15"
        Me.ToolStripButton15.RightToLeftAutoMirrorImage = True
-        Me.ToolStripButton15.Size = New System.Drawing.Size(28, 28)
+        Me.ToolStripButton15.Size = New System.Drawing.Size(23, 22)
        Me.ToolStripButton15.Text = "Nächste verschieben"
        '
        'ToolStripButton16
@@ -2042,13 +2059,13 @@ Partial Class frmMain
        Me.ToolStripButton16.Image = CType(resources.GetObject("ToolStripButton16.Image"), System.Drawing.Image)
        Me.ToolStripButton16.Name = "ToolStripButton16"
        Me.ToolStripButton16.RightToLeftAutoMirrorImage = True
-        Me.ToolStripButton16.Size = New System.Drawing.Size(28, 28)
+        Me.ToolStripButton16.Size = New System.Drawing.Size(23, 22)
        Me.ToolStripButton16.Text = "Letzte verschieben"
        '
        'ToolStripSeparator6
        '
        Me.ToolStripSeparator6.Name = "ToolStripSeparator6"
-        Me.ToolStripSeparator6.Size = New System.Drawing.Size(6, 31)
+        Me.ToolStripSeparator6.Size = New System.Drawing.Size(6, 25)
        '
        'ToolStripButton17
        '
@@ -2056,7 +2073,7 @@ Partial Class frmMain
        Me.ToolStripButton17.Image = Global.EmailProfiler.Form.My.Resources.Resources.save_16xMD
        Me.ToolStripButton17.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.ToolStripButton17.Name = "ToolStripButton17"
-        Me.ToolStripButton17.Size = New System.Drawing.Size(28, 28)
+        Me.ToolStripButton17.Size = New System.Drawing.Size(23, 22)
        Me.ToolStripButton17.Text = "ToolStripButton1"
        '
        'ToolStripButton18
@@ -2065,7 +2082,7 @@ Partial Class frmMain
        Me.ToolStripButton18.Image = Global.EmailProfiler.Form.My.Resources.Resources.refresh_16xLG
        Me.ToolStripButton18.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.ToolStripButton18.Name = "ToolStripButton18"
-        Me.ToolStripButton18.Size = New System.Drawing.Size(28, 28)
+        Me.ToolStripButton18.Size = New System.Drawing.Size(23, 22)
        Me.ToolStripButton18.Text = "Refresh"
        '
        'GUIDPollStepsTextBox
@@ -2291,7 +2308,6 @@ Partial Class frmMain
        Me.BindingNavigator4.CountItem = Me.ToolStripLabel3
        Me.BindingNavigator4.CountItemFormat = "von {0} Indexierungsschritten"
        Me.BindingNavigator4.DeleteItem = Me.ToolStripButton20
-        Me.BindingNavigator4.ImageScalingSize = New System.Drawing.Size(24, 24)
        Me.BindingNavigator4.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripButton21, Me.ToolStripButton22, Me.ToolStripSeparator7, Me.ToolStripTextBox3, Me.ToolStripLabel3, Me.ToolStripSeparator8, Me.ToolStripButton23, Me.ToolStripButton24, Me.ToolStripSeparator9, Me.ToolStripButton19, Me.ToolStripButton20, Me.ToolStripButton25, Me.ToolStripButton26})
        Me.BindingNavigator4.Location = New System.Drawing.Point(245, 0)
        Me.BindingNavigator4.MoveFirstItem = Me.ToolStripButton21
@@ -2300,7 +2316,7 @@ Partial Class frmMain
        Me.BindingNavigator4.MovePreviousItem = Me.ToolStripButton22
        Me.BindingNavigator4.Name = "BindingNavigator4"
        Me.BindingNavigator4.PositionItem = Me.ToolStripTextBox3
-        Me.BindingNavigator4.Size = New System.Drawing.Size(974, 31)
+        Me.BindingNavigator4.Size = New System.Drawing.Size(974, 25)
        Me.BindingNavigator4.TabIndex = 35
        Me.BindingNavigator4.Text = "BindingNavigator4"
        '
@@ -2310,13 +2326,13 @@ Partial Class frmMain
        Me.ToolStripButton19.Image = CType(resources.GetObject("ToolStripButton19.Image"), System.Drawing.Image)
        Me.ToolStripButton19.Name = "ToolStripButton19"
        Me.ToolStripButton19.RightToLeftAutoMirrorImage = True
-        Me.ToolStripButton19.Size = New System.Drawing.Size(28, 28)
+        Me.ToolStripButton19.Size = New System.Drawing.Size(23, 22)
        Me.ToolStripButton19.Text = "Neu hinzufügen"
        '
        'ToolStripLabel3
        '
        Me.ToolStripLabel3.Name = "ToolStripLabel3"
-        Me.ToolStripLabel3.Size = New System.Drawing.Size(160, 28)
+        Me.ToolStripLabel3.Size = New System.Drawing.Size(160, 22)
        Me.ToolStripLabel3.Text = "von {0} Indexierungsschritten"
        Me.ToolStripLabel3.ToolTipText = "Die Gesamtanzahl der Elemente."
        '
@@ -2326,7 +2342,7 @@ Partial Class frmMain
        Me.ToolStripButton20.Image = CType(resources.GetObject("ToolStripButton20.Image"), System.Drawing.Image)
        Me.ToolStripButton20.Name = "ToolStripButton20"
        Me.ToolStripButton20.RightToLeftAutoMirrorImage = True
-        Me.ToolStripButton20.Size = New System.Drawing.Size(28, 28)
+        Me.ToolStripButton20.Size = New System.Drawing.Size(23, 22)
        Me.ToolStripButton20.Text = "Löschen"
        '
        'ToolStripButton21
@@ -2335,7 +2351,7 @@ Partial Class frmMain
        Me.ToolStripButton21.Image = CType(resources.GetObject("ToolStripButton21.Image"), System.Drawing.Image)
        Me.ToolStripButton21.Name = "ToolStripButton21"
        Me.ToolStripButton21.RightToLeftAutoMirrorImage = True
-        Me.ToolStripButton21.Size = New System.Drawing.Size(28, 28)
+        Me.ToolStripButton21.Size = New System.Drawing.Size(23, 22)
        Me.ToolStripButton21.Text = "Erste verschieben"
        '
        'ToolStripButton22
@@ -2344,13 +2360,13 @@ Partial Class frmMain
        Me.ToolStripButton22.Image = CType(resources.GetObject("ToolStripButton22.Image"), System.Drawing.Image)
        Me.ToolStripButton22.Name = "ToolStripButton22"
        Me.ToolStripButton22.RightToLeftAutoMirrorImage = True
-        Me.ToolStripButton22.Size = New System.Drawing.Size(28, 28)
+        Me.ToolStripButton22.Size = New System.Drawing.Size(23, 22)
        Me.ToolStripButton22.Text = "Vorherige verschieben"
        '
        'ToolStripSeparator7
        '
        Me.ToolStripSeparator7.Name = "ToolStripSeparator7"
-        Me.ToolStripSeparator7.Size = New System.Drawing.Size(6, 31)
+        Me.ToolStripSeparator7.Size = New System.Drawing.Size(6, 25)
        '
        'ToolStripTextBox3
        '
@@ -2365,7 +2381,7 @@ Partial Class frmMain
        'ToolStripSeparator8
        '
        Me.ToolStripSeparator8.Name = "ToolStripSeparator8"
-        Me.ToolStripSeparator8.Size = New System.Drawing.Size(6, 31)
+        Me.ToolStripSeparator8.Size = New System.Drawing.Size(6, 25)
        '
        'ToolStripButton23
        '
@@ -2373,7 +2389,7 @@ Partial Class frmMain
        Me.ToolStripButton23.Image = CType(resources.GetObject("ToolStripButton23.Image"), System.Drawing.Image)
        Me.ToolStripButton23.Name = "ToolStripButton23"
        Me.ToolStripButton23.RightToLeftAutoMirrorImage = True
-        Me.ToolStripButton23.Size = New System.Drawing.Size(28, 28)
+        Me.ToolStripButton23.Size = New System.Drawing.Size(23, 22)
        Me.ToolStripButton23.Text = "Nächste verschieben"
        '
        'ToolStripButton24
@@ -2382,13 +2398,13 @@ Partial Class frmMain
        Me.ToolStripButton24.Image = CType(resources.GetObject("ToolStripButton24.Image"), System.Drawing.Image)
        Me.ToolStripButton24.Name = "ToolStripButton24"
        Me.ToolStripButton24.RightToLeftAutoMirrorImage = True
-        Me.ToolStripButton24.Size = New System.Drawing.Size(28, 28)
+        Me.ToolStripButton24.Size = New System.Drawing.Size(23, 22)
        Me.ToolStripButton24.Text = "Letzte verschieben"
        '
        'ToolStripSeparator9
        '
        Me.ToolStripSeparator9.Name = "ToolStripSeparator9"
-        Me.ToolStripSeparator9.Size = New System.Drawing.Size(6, 31)
+        Me.ToolStripSeparator9.Size = New System.Drawing.Size(6, 25)
        '
        'ToolStripButton25
        '
@@ -2396,7 +2412,7 @@ Partial Class frmMain
        Me.ToolStripButton25.Image = Global.EmailProfiler.Form.My.Resources.Resources.save_16xMD
        Me.ToolStripButton25.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.ToolStripButton25.Name = "ToolStripButton25"
-        Me.ToolStripButton25.Size = New System.Drawing.Size(28, 28)
+        Me.ToolStripButton25.Size = New System.Drawing.Size(23, 22)
        Me.ToolStripButton25.Text = "ToolStripButton1"
        '
        'ToolStripButton26
@@ -2405,7 +2421,7 @@ Partial Class frmMain
        Me.ToolStripButton26.Image = Global.EmailProfiler.Form.My.Resources.Resources.refresh_16xLG
        Me.ToolStripButton26.ImageTransparentColor = System.Drawing.Color.Magenta
        Me.ToolStripButton26.Name = "ToolStripButton26"
-        Me.ToolStripButton26.Size = New System.Drawing.Size(28, 28)
+        Me.ToolStripButton26.Size = New System.Drawing.Size(23, 22)
        Me.ToolStripButton26.Text = "Refresh"
        '
        'GridControl3
@@ -2502,9 +2518,9 @@ Partial Class frmMain
        'ACTIVECheckBox
        '
        Me.ACTIVECheckBox.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.TBEMLP_POLL_PROFILESBindingSource, "ACTIVE", True))
-        Me.ACTIVECheckBox.Location = New System.Drawing.Point(258, 97)
+        Me.ACTIVECheckBox.Location = New System.Drawing.Point(258, 100)
        Me.ACTIVECheckBox.Name = "ACTIVECheckBox"
-        Me.ACTIVECheckBox.Size = New System.Drawing.Size(58, 24)
+        Me.ACTIVECheckBox.Size = New System.Drawing.Size(58, 21)
        Me.ACTIVECheckBox.TabIndex = 17
        Me.ACTIVECheckBox.Text = "Active"
        Me.ACTIVECheckBox.UseVisualStyleBackColor = True
@@ -2929,8 +2945,8 @@ Partial Class frmMain
        'BindingNavigatorCountItem1
        '
        Me.BindingNavigatorCountItem1.Name = "BindingNavigatorCountItem1"
-        Me.BindingNavigatorCountItem1.Size = New System.Drawing.Size(44, 22)
-        Me.BindingNavigatorCountItem1.Text = "von {0}"
+        Me.BindingNavigatorCountItem1.Size = New System.Drawing.Size(35, 22)
+        Me.BindingNavigatorCountItem1.Text = "of {0}"
        Me.BindingNavigatorCountItem1.ToolTipText = "Die Gesamtanzahl der Elemente."
        '
        'BindingNavigatorDeleteItem1
@@ -3401,6 +3417,111 @@ Partial Class frmMain
        Me.txtPasswort.TabIndex = 50
        Me.txtPasswort.UseSystemPasswordChar = True
        '
+        'tabMonitoring
+        '
+        Me.tabMonitoring.Controls.Add(Me.pnlMonitoringGrid)
+        Me.tabMonitoring.Controls.Add(Me.pnlMonitoringConfig)
+        Me.tabMonitoring.Location = New System.Drawing.Point(4, 22)
+        Me.tabMonitoring.Name = "tabMonitoring"
+        Me.tabMonitoring.Padding = New System.Windows.Forms.Padding(3)
+        Me.tabMonitoring.Size = New System.Drawing.Size(1227, 568)
+        Me.tabMonitoring.TabIndex = 4
+        Me.tabMonitoring.Text = "Monitoring"
+        Me.tabMonitoring.UseVisualStyleBackColor = True
+        '
+        'pnlMonitoringGrid
+        '
+        Me.pnlMonitoringGrid.Controls.Add(Me.gridMonitoring)
+        Me.pnlMonitoringGrid.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.pnlMonitoringGrid.Location = New System.Drawing.Point(3, 47)
+        Me.pnlMonitoringGrid.Name = "pnlMonitoringGrid"
+        Me.pnlMonitoringGrid.Size = New System.Drawing.Size(1221, 518)
+        Me.pnlMonitoringGrid.TabIndex = 1
+        '
+        'gridMonitoring
+        '
+        Me.gridMonitoring.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.gridMonitoring.Location = New System.Drawing.Point(2, 2)
+        Me.gridMonitoring.MainView = Me.GridViewMonitoring
+        Me.gridMonitoring.Name = "gridMonitoring"
+        Me.gridMonitoring.Size = New System.Drawing.Size(1217, 514)
+        Me.gridMonitoring.TabIndex = 0
+        Me.gridMonitoring.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewMonitoring})
+        '
+        'GridViewMonitoring
+        '
+        Me.GridViewMonitoring.GridControl = Me.gridMonitoring
+        Me.GridViewMonitoring.Name = "GridViewMonitoring"
+        '
+        'pnlMonitoringConfig
+        '
+        Me.pnlMonitoringConfig.Controls.Add(Me.btnRestoreDefaultLayout)
+        Me.pnlMonitoringConfig.Controls.Add(Me.btnSaveLayout)
+        Me.pnlMonitoringConfig.Controls.Add(Me.btnRefresh)
+        Me.pnlMonitoringConfig.Controls.Add(Me.btnMonitoringConfig)
+        Me.pnlMonitoringConfig.Controls.Add(Me.txtMonitoringConfig)
+        Me.pnlMonitoringConfig.Controls.Add(Me.lblMonitoringConfig)
+        Me.pnlMonitoringConfig.Dock = System.Windows.Forms.DockStyle.Top
+        Me.pnlMonitoringConfig.Location = New System.Drawing.Point(3, 3)
+        Me.pnlMonitoringConfig.Name = "pnlMonitoringConfig"
+        Me.pnlMonitoringConfig.Size = New System.Drawing.Size(1221, 44)
+        Me.pnlMonitoringConfig.TabIndex = 0
+        '
+        'btnRestoreDefaultLayout
+        '
+        Me.btnRestoreDefaultLayout.Location = New System.Drawing.Point(1026, 10)
+        Me.btnRestoreDefaultLayout.Name = "btnRestoreDefaultLayout"
+        Me.btnRestoreDefaultLayout.Size = New System.Drawing.Size(183, 23)
+        Me.btnRestoreDefaultLayout.TabIndex = 5
+        Me.btnRestoreDefaultLayout.Text = "Standard-Layout wiederherstellen"
+        Me.btnRestoreDefaultLayout.UseVisualStyleBackColor = True
+        '
+        'btnSaveLayout
+        '
+        Me.btnSaveLayout.Location = New System.Drawing.Point(910, 10)
+        Me.btnSaveLayout.Name = "btnSaveLayout"
+        Me.btnSaveLayout.Size = New System.Drawing.Size(106, 23)
+        Me.btnSaveLayout.TabIndex = 4
+        Me.btnSaveLayout.Text = "Layout speichern"
+        Me.btnSaveLayout.UseVisualStyleBackColor = True
+        '
+        'btnRefresh
+        '
+        Me.btnRefresh.Image = Global.EmailProfiler.Form.My.Resources.Resources.refresh_16xLG
+        Me.btnRefresh.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnRefresh.Location = New System.Drawing.Point(311, 10)
+        Me.btnRefresh.Name = "btnRefresh"
+        Me.btnRefresh.Size = New System.Drawing.Size(92, 23)
+        Me.btnRefresh.TabIndex = 3
+        Me.btnRefresh.Text = "Aktualisieren"
+        Me.btnRefresh.TextAlign = System.Drawing.ContentAlignment.MiddleRight
+        Me.btnRefresh.UseVisualStyleBackColor = True
+        '
+        'btnMonitoringConfig
+        '
+        Me.btnMonitoringConfig.Location = New System.Drawing.Point(220, 10)
+        Me.btnMonitoringConfig.Name = "btnMonitoringConfig"
+        Me.btnMonitoringConfig.Size = New System.Drawing.Size(80, 23)
+        Me.btnMonitoringConfig.TabIndex = 2
+        Me.btnMonitoringConfig.Text = "Übernehmen"
+        Me.btnMonitoringConfig.UseVisualStyleBackColor = True
+        '
+        'txtMonitoringConfig
+        '
+        Me.txtMonitoringConfig.Location = New System.Drawing.Point(147, 11)
+        Me.txtMonitoringConfig.Name = "txtMonitoringConfig"
+        Me.txtMonitoringConfig.Size = New System.Drawing.Size(61, 21)
+        Me.txtMonitoringConfig.TabIndex = 1
+        '
+        'lblMonitoringConfig
+        '
+        Me.lblMonitoringConfig.AutoSize = True
+        Me.lblMonitoringConfig.Location = New System.Drawing.Point(23, 15)
+        Me.lblMonitoringConfig.Name = "lblMonitoringConfig"
+        Me.lblMonitoringConfig.Size = New System.Drawing.Size(117, 13)
+        Me.lblMonitoringConfig.TabIndex = 0
+        Me.lblMonitoringConfig.Text = "Abrufmenge an Emails:"
+        '
        'TBEMLP_HISTORYBindingSource
        '
        Me.TBEMLP_HISTORYBindingSource.DataMember = "TBEMLP_HISTORY"
@@ -3536,6 +3657,14 @@ Partial Class frmMain
        CType(Me.CHECK_INTERVALL_MINUTESNumericUpDown, System.ComponentModel.ISupportInitialize).EndInit()
        Me.GroupBox1.ResumeLayout(False)
        Me.GroupBox1.PerformLayout()
+        Me.tabMonitoring.ResumeLayout(False)
+        CType(Me.pnlMonitoringGrid, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.pnlMonitoringGrid.ResumeLayout(False)
+        CType(Me.gridMonitoring, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.GridViewMonitoring, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.pnlMonitoringConfig, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.pnlMonitoringConfig.ResumeLayout(False)
+        Me.pnlMonitoringConfig.PerformLayout()
        CType(Me.TBEMLP_HISTORYBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
        Me.ResumeLayout(False)
        Me.PerformLayout()
@@ -3799,4 +3928,15 @@ Partial Class frmMain
    Friend WithEvents CheckBoxEnableTls1_2 As CheckBox
    Friend WithEvents CheckBoxEnableTls1_1 As CheckBox
    Friend WithEvents Label15 As Label
+    Friend WithEvents tabMonitoring As TabPage
+    Friend WithEvents pnlMonitoringGrid As DevExpress.XtraEditors.PanelControl
+    Friend WithEvents pnlMonitoringConfig As DevExpress.XtraEditors.PanelControl
+    Friend WithEvents lblMonitoringConfig As Label
+    Friend WithEvents btnMonitoringConfig As Button
+    Friend WithEvents txtMonitoringConfig As TextBox
+    Friend WithEvents gridMonitoring As DevExpress.XtraGrid.GridControl
+    Friend WithEvents GridViewMonitoring As DevExpress.XtraGrid.Views.Grid.GridView
+    Friend WithEvents btnRefresh As Button
+    Friend WithEvents btnRestoreDefaultLayout As Button
+    Friend WithEvents btnSaveLayout As Button
 End Class
--- a/App/EmailProfiler.Form/frmMain.vb
+++ b/App/EmailProfiler.Form/frmMain.vb
@@ -93,6 +93,11 @@ Public Class frmMain


        _Encryption = New clsEncryption("!35452didalog=", LogConfig)
+
+        If String.IsNullOrWhiteSpace(txtMonitoringConfig.Text) OrElse Not IsNumeric(txtMonitoringConfig.Text) OrElse CInt(txtMonitoringConfig.Text) <= 0 Then
+            txtMonitoringConfig.Text = "500"
+        End If
+        LoadMonitoringIntoGrid()
    End Sub

    Private Sub frmMain_Shown(sender As Object, e As EventArgs) Handles Me.Shown
@@ -1044,4 +1049,70 @@ Public Class frmMain
    Private Sub COMMENT_PROFILESTextBox_TextChanged(sender As Object, e As EventArgs) Handles COMMENT_PROFILESTextBox.TextChanged

    End Sub
+
+    Private Sub LoadMonitoringIntoGrid()
+        Try
+
+            Dim emailAmount As Integer
+            If txtMonitoringConfig.Text = Nothing OrElse Not IsNumeric(txtMonitoringConfig.Text) Then
+                emailAmount = 500
+            Else
+                emailAmount = Convert.ToInt32(txtMonitoringConfig.Text)
+            End If
+
+            Dim oSQL = $"SELECT TOP ({emailAmount}) GUID, PROFILE_ID, EMAIL_MSGID, EMAIL_FROM, EMAIL_SUBJECT, EMAIL_DATE, ADDED_WHEN, STATUS FROM [dbo].[TBEMLP_HISTORY] (nolock) order by GUID DESC"
+            Dim oDT As DataTable = _database.GetDatatable(oSQL)
+
+            Me.gridMonitoring.DataSource = oDT
+
+            Dim gridView = TryCast(Me.GridViewMonitoring, DevExpress.XtraGrid.Views.Grid.GridView)
+            If gridView IsNot Nothing Then
+
+                gridView.OptionsView.ColumnAutoWidth = True
+                gridView.BestFitColumns()
+                gridView.OptionsBehavior.Editable = False
+
+                LoadLayoutMonitoring()
+            End If
+
+        Catch ex As Exception
+            If Logger IsNot Nothing Then Logger.Error(ex) Else Debug.WriteLine(ex.ToString())
+        End Try
+    End Sub
+
+    Private Sub txtMonitoringConfig_LostFocus(sender As Object, e As EventArgs) Handles txtMonitoringConfig.LostFocus
+        If Not IsNumeric(txtMonitoringConfig.Text) OrElse CInt(txtMonitoringConfig.Text) <= 0 Then
+            txtMonitoringConfig.Text = "500"
+        End If
+        LoadMonitoringIntoGrid()
+    End Sub
+
+    Private Sub btnRefresh_Click(sender As Object, e As EventArgs) Handles btnRefresh.Click
+        LoadMonitoringIntoGrid()
+    End Sub
+
+    Private Sub btnSaveLayout_Click(sender As Object, e As EventArgs) Handles btnSaveLayout.Click
+        Dim layoutPath As String = System.IO.Path.Combine(Application.UserAppDataPath, "gridMonitoringLayout.xml")
+        GridViewMonitoring.SaveLayoutToXml(layoutPath)
+        MessageBox.Show("Layout gespeichert!")
+    End Sub
+
+    Private Sub btnRestoreDefaultLayout_Click(sender As Object, e As EventArgs) Handles btnRestoreDefaultLayout.Click
+        Dim layoutPath As String = System.IO.Path.Combine(Application.UserAppDataPath, "gridMonitoringLayout.xml")
+        If System.IO.File.Exists(layoutPath) Then
+            System.IO.File.Delete(layoutPath)
+        End If
+        GridViewMonitoring.Columns.Clear()
+        gridMonitoring.DataSource = Nothing
+        LoadMonitoringIntoGrid()
+        MessageBox.Show("Standardlayout wurde wiederhergestellt!")
+    End Sub
+
+    Private Sub LoadLayoutMonitoring()
+        Dim layoutPath As String = System.IO.Path.Combine(Application.UserAppDataPath, "gridMonitoringLayout.xml")
+        If System.IO.File.Exists(layoutPath) Then
+            GridViewMonitoring.RestoreLayoutFromXml(layoutPath)
+        End If
+    End Sub
+
 End Class
--- a/App/EmailProfiler.Form/packages.config
+++ b/App/EmailProfiler.Form/packages.config
@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="utf-8"?>
 <packages>
  <package id="Microsoft.Identity.Client" version="4.55.0" targetFramework="net462" />
-  <package id="Microsoft.IdentityModel.Abstractions" version="6.22.0" targetFramework="net462" />
+  <package id="Microsoft.IdentityModel.Abstractions" version="6.22.0" targetFramework="net462" requireReinstallation="true" />
  <package id="NLog" version="5.0.5" targetFramework="net461" />
  <package id="S22.Imap" version="3.6.0.0" targetFramework="net462" />
 </packages>
Author	SHA1	Message	Date
OlgunR	9b321269ce	Refactor monitoring grid to use GridViewMonitoring Replaces all references to GridView5 with GridViewMonitoring for clarity and maintainability. Updates layout save/restore logic to use the new view, adds a helper for loading layouts, and improves default layout restoration. Cleans up designer and resource files, removing obsolete entries and ensuring correct initialization.	2026-01-28 11:28:19 +01:00
OlgunR	5d4cdb2814	Add save/restore layout buttons to Monitoring grid Added "Save Layout" and "Restore Default Layout" buttons to the Monitoring tab, allowing users to save and restore the grid layout for GridView5. The layout is persisted as an XML file in the user's app data directory. On form load, the layout is restored if the file exists. Button event handlers provide user feedback, and control positions were adjusted to fit the new buttons.	2026-01-27 13:31:15 +01:00
OlgunR	c2e7d06c4c	Update main form and add splash/HDR settings in app config Switched main form from Form1 to frmMain. Removed the ApplicationType element. Added MinimumSplashScreenDisplayTime and HighDpiMode settings to support splash screen timing and high DPI configuration. Reordered XML namespaces for consistency.	2026-01-27 13:04:52 +01:00
OlgunR	b4ea5d9a00	Update version to 3.2.0 in AssemblyInfo.vb Updated AssemblyTrademark to "3.2.0" and AssemblyVersion to "3.2.0.0" to reflect the new release version. No other changes were made.	2026-01-27 12:50:04 +01:00
OlgunR	da9b468b01	Revert "Update main form, config, and bump version to 3.2.0" This reverts commit `180d5d7d3a`.	2026-01-27 12:48:12 +01:00
OlgunR	180d5d7d3a	Update main form, config, and bump version to 3.2.0 Changed startup form to frmMain and updated XML config with new elements. Increased trademark and assembly versions to 3.2.0.	2026-01-27 12:46:38 +01:00
OlgunR	234510e5db	Make GridView non-editable in frmMain Set gridView.OptionsBehavior.Editable to False after best-fitting columns, ensuring users cannot edit cell values directly in the UI.	2026-01-27 12:08:47 +01:00
OlgunR	7ce7a11a30	Auto-fit grid columns using BestFitColumns() Replaced manual column width settings for "GUID", "PROFILE_ID", and "EMAIL_SUBJECT" with gridView.BestFitColumns() to automatically adjust all column widths based on their content. This improves maintainability and ensures optimal display of data.	2026-01-27 10:56:29 +01:00
OlgunR	80b33eb3b2	Add Refresh button to Monitoring tab in frmMain Added a "Refresh" button with icon to the Monitoring tab's config panel. The button reloads the monitoring grid via a new event handler. Refactored designer code for better organization and updated .resx tray locations. No functional resource changes.	2026-01-27 10:36:57 +01:00
OlgunR	4a62d456d0	Set explicit grid column widths and enable auto width Replaced best-fit columns with fixed widths for GUID, PROFILE_ID, and EMAIL_SUBJECT. Enabled ColumnAutoWidth for improved layout control.	2026-01-27 10:31:59 +01:00
OlgunR	2c1c63563c	Add Monitoring tab with configurable email history grid Introduced a new "Monitoring" tab to the main form, featuring a configuration panel for specifying the number of emails to display and a DevExpress grid to show recent email history from TBEMLP_HISTORY. Added logic to validate the configuration input and dynamically reload the grid. Updated designer and code-behind to support new controls and event handlers. Made minor layout adjustments to accommodate the new UI elements.	2026-01-27 10:13:02 +01:00
OlgunR	6272a11eb1	Add empty "Monitoring" tab to frmMain interface Added a new tab page named "Monitoring" to the frmMain form and included it in the main TabControl. Updated the designer and resource files to declare the new tab and re-add related image and metadata entries. No functional logic has been implemented for the new tab yet.	2026-01-27 09:54:56 +01:00
OlgunR	8a7a9ebb67	Adjust UI layout and localization in frmMain form - Updated location and size of ACTIVECheckBox controls for better alignment - Reduced BindingNavigator4 width and increased GridControl3 height - Changed BindingNavigatorCountItem1 text from German to English - Added/updated TrayLocation metadata and restored SVG tab icons in frmMain.resx - No changes to core logic; cosmetic and localization improvements only	2026-01-27 09:06:10 +01:00
OlgunR	6d12be2033	Update to .NET 4.8, English comments, and config tweaks Upgraded project to target .NET Framework 4.8 and updated App.config accordingly. Replaced German with English comments in auto-generated designer files for better accessibility. Made minor XML formatting improvements in App.config. Added OnInitialize override to set MinimumSplashScreenDisplayTime to 0. Set requireReinstallation="true" for Microsoft.IdentityModel.Abstractions in packages.config.	2026-01-26 13:44:56 +01:00
Developer01	c7ef7fe478	ImageScaling	2026-01-23 14:02:23 +01:00
Developer01	48bc6dcc26	Push release	2026-01-23 13:57:44 +01:00