add log grid to config

This commit is contained in:
Jonathan Jenne
2019-07-03 14:28:00 +02:00
parent 9e2a63c612
commit f05145aead
3 changed files with 763 additions and 139 deletions

View File

@@ -1,9 +1,9 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
Partial Class frmKonfig
Inherits System.Windows.Forms.Form
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
<System.Diagnostics.DebuggerNonUserCode()> _
<System.Diagnostics.DebuggerNonUserCode()>
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
@@ -20,7 +20,7 @@ Partial Class frmKonfig
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
<System.Diagnostics.DebuggerStepThrough()> _
<System.Diagnostics.DebuggerStepThrough()>
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmKonfig))
@@ -60,6 +60,7 @@ Partial Class frmKonfig
Me.txtActualConnection = New System.Windows.Forms.TextBox()
Me.txtServer = New System.Windows.Forms.TextBox()
Me.TabPage3 = New System.Windows.Forms.TabPage()
Me.Button4 = New System.Windows.Forms.Button()
Me.Label7 = New System.Windows.Forms.Label()
Me.txtIntervall = New System.Windows.Forms.TextBox()
Me.Label6 = New System.Windows.Forms.Label()
@@ -70,16 +71,26 @@ Partial Class frmKonfig
Me.Button2 = New System.Windows.Forms.Button()
Me.Button1 = New System.Windows.Forms.Button()
Me.btnLogMail = New System.Windows.Forms.Button()
Me.TabPage4 = New System.Windows.Forms.TabPage()
Me.GridControlLogs = New DevExpress.XtraGrid.GridControl()
Me.ContextMenuInternalLog = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.LogNachrichtenLeerenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.SpeichereLogAlsToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.gvLogs = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.DD_DMSLiteDataSet = New DD_PM_WINDREAM.DD_DMSLiteDataSet()
Me.TBPM_KONFIGURATIONBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TBPM_KONFIGURATIONTableAdapter = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter()
Me.TableAdapterManager = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
Me.Button4 = New System.Windows.Forms.Button()
Me.SaveFileDialog1 = New System.Windows.Forms.SaveFileDialog()
Me.TabControl1.SuspendLayout()
Me.TabPage1.SuspendLayout()
Me.GroupBox1.SuspendLayout()
Me.TabPage2.SuspendLayout()
Me.TabPage3.SuspendLayout()
Me.TabPage4.SuspendLayout()
CType(Me.GridControlLogs, System.ComponentModel.ISupportInitialize).BeginInit()
Me.ContextMenuInternalLog.SuspendLayout()
CType(Me.gvLogs, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBPM_KONFIGURATIONBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
@@ -129,6 +140,7 @@ Partial Class frmKonfig
Me.TabControl1.Controls.Add(Me.TabPage1)
Me.TabControl1.Controls.Add(Me.TabPage2)
Me.TabControl1.Controls.Add(Me.TabPage3)
Me.TabControl1.Controls.Add(Me.TabPage4)
resources.ApplyResources(Me.TabControl1, "TabControl1")
Me.TabControl1.Name = "TabControl1"
Me.TabControl1.SelectedIndex = 0
@@ -343,6 +355,12 @@ Partial Class frmKonfig
Me.TabPage3.Name = "TabPage3"
Me.TabPage3.UseVisualStyleBackColor = True
'
'Button4
'
resources.ApplyResources(Me.Button4, "Button4")
Me.Button4.Name = "Button4"
Me.Button4.UseVisualStyleBackColor = True
'
'Label7
'
resources.ApplyResources(Me.Label7, "Label7")
@@ -403,6 +421,47 @@ Partial Class frmKonfig
Me.btnLogMail.Name = "btnLogMail"
Me.btnLogMail.UseVisualStyleBackColor = True
'
'TabPage4
'
Me.TabPage4.Controls.Add(Me.GridControlLogs)
resources.ApplyResources(Me.TabPage4, "TabPage4")
Me.TabPage4.Name = "TabPage4"
Me.TabPage4.UseVisualStyleBackColor = True
'
'GridControlLogs
'
Me.GridControlLogs.ContextMenuStrip = Me.ContextMenuInternalLog
resources.ApplyResources(Me.GridControlLogs, "GridControlLogs")
Me.GridControlLogs.MainView = Me.gvLogs
Me.GridControlLogs.Name = "GridControlLogs"
Me.GridControlLogs.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.gvLogs})
'
'ContextMenuInternalLog
'
Me.ContextMenuInternalLog.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.LogNachrichtenLeerenToolStripMenuItem, Me.SpeichereLogAlsToolStripMenuItem})
Me.ContextMenuInternalLog.Name = "ContextMenuInternalLog"
resources.ApplyResources(Me.ContextMenuInternalLog, "ContextMenuInternalLog")
'
'LogNachrichtenLeerenToolStripMenuItem
'
Me.LogNachrichtenLeerenToolStripMenuItem.Name = "LogNachrichtenLeerenToolStripMenuItem"
resources.ApplyResources(Me.LogNachrichtenLeerenToolStripMenuItem, "LogNachrichtenLeerenToolStripMenuItem")
'
'SpeichereLogAlsToolStripMenuItem
'
Me.SpeichereLogAlsToolStripMenuItem.Name = "SpeichereLogAlsToolStripMenuItem"
resources.ApplyResources(Me.SpeichereLogAlsToolStripMenuItem, "SpeichereLogAlsToolStripMenuItem")
'
'gvLogs
'
Me.gvLogs.Appearance.OddRow.BackColor = CType(resources.GetObject("GridView1.Appearance.OddRow.BackColor"), System.Drawing.Color)
Me.gvLogs.Appearance.OddRow.Options.UseBackColor = True
Me.gvLogs.GridControl = Me.GridControlLogs
Me.gvLogs.Name = "gvLogs"
Me.gvLogs.OptionsView.EnableAppearanceOddRow = True
Me.gvLogs.OptionsView.ShowAutoFilterRow = True
Me.gvLogs.OptionsView.ShowGroupPanel = False
'
'DD_DMSLiteDataSet
'
Me.DD_DMSLiteDataSet.DataSetName = "DD_DMSLiteDataSet"
@@ -433,12 +492,6 @@ Partial Class frmKonfig
Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing
Me.TableAdapterManager.UpdateOrder = DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
'
'Button4
'
resources.ApplyResources(Me.Button4, "Button4")
Me.Button4.Name = "Button4"
Me.Button4.UseVisualStyleBackColor = True
'
'frmKonfig
'
resources.ApplyResources(Me, "$this")
@@ -455,6 +508,10 @@ Partial Class frmKonfig
Me.TabPage2.PerformLayout()
Me.TabPage3.ResumeLayout(False)
Me.TabPage3.PerformLayout()
Me.TabPage4.ResumeLayout(False)
CType(Me.GridControlLogs, System.ComponentModel.ISupportInitialize).EndInit()
Me.ContextMenuInternalLog.ResumeLayout(False)
CType(Me.gvLogs, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TBPM_KONFIGURATIONBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
@@ -511,4 +568,11 @@ Partial Class frmKonfig
Friend WithEvents RadioAlternativeConnection As RadioButton
Friend WithEvents RadioDefaultConnection As RadioButton
Friend WithEvents Button4 As Button
Friend WithEvents TabPage4 As TabPage
Friend WithEvents GridControlLogs As DevExpress.XtraGrid.GridControl
Friend WithEvents gvLogs As DevExpress.XtraGrid.Views.Grid.GridView
Friend WithEvents ContextMenuInternalLog As ContextMenuStrip
Friend WithEvents LogNachrichtenLeerenToolStripMenuItem As ToolStripMenuItem
Friend WithEvents SpeichereLogAlsToolStripMenuItem As ToolStripMenuItem
Friend WithEvents SaveFileDialog1 As SaveFileDialog
End Class