Monitor

2021-05-21 16:31:35 +02:00
parent e53e79b05a
commit f681a6bc69
10 changed files with 230 additions and 46 deletions
--- a/GUIs.Monitor/frmMonitor.Designer.vb
+++ b/GUIs.Monitor/frmMonitor.Designer.vb
@@ -27,6 +27,8 @@ Partial Class frmMonitor
    Private Sub InitializeComponent()
        Me.components = New System.ComponentModel.Container()
        Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
+        Me.ApplicationMenu1 = New DevExpress.XtraBars.Ribbon.ApplicationMenu(Me.components)
+        Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
        Me.buttonSearch = New DevExpress.XtraBars.BarButtonItem()
        Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
        Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
@@ -73,6 +75,7 @@ Partial Class frmMonitor
        Me.XtraTabPage3 = New DevExpress.XtraTab.XtraTabPage()
        Me.XtraTabPage4 = New DevExpress.XtraTab.XtraTabPage()
        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.ApplicationMenu1, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.LayoutControl1.SuspendLayout()
        CType(Me.TextEdit1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -120,14 +123,30 @@ Partial Class frmMonitor
        '
        'RibbonControl1
        '
+        Me.RibbonControl1.ApplicationButtonDropDownControl = Me.ApplicationMenu1
        Me.RibbonControl1.ExpandCollapseItem.Id = 0
-        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.buttonSearch})
+        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.buttonSearch, Me.BarButtonItem1})
        Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
-        Me.RibbonControl1.MaxItemId = 2
+        Me.RibbonControl1.MaxItemId = 3
        Me.RibbonControl1.Name = "RibbonControl1"
        Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
-        Me.RibbonControl1.Size = New System.Drawing.Size(1379, 158)
+        Me.RibbonControl1.ShowToolbarCustomizeItem = False
+        Me.RibbonControl1.Size = New System.Drawing.Size(1379, 159)
        Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
+        Me.RibbonControl1.Toolbar.ShowCustomizeItem = False
+        '
+        'ApplicationMenu1
+        '
+        Me.ApplicationMenu1.ItemLinks.Add(Me.BarButtonItem1)
+        Me.ApplicationMenu1.Name = "ApplicationMenu1"
+        Me.ApplicationMenu1.Ribbon = Me.RibbonControl1
+        '
+        'BarButtonItem1
+        '
+        Me.BarButtonItem1.Caption = "SQL Konfiguration"
+        Me.BarButtonItem1.Id = 2
+        Me.BarButtonItem1.ImageOptions.SvgImage = Global.DigitalData.GUIs.Monitor.My.Resources.Resources.managedatasource
+        Me.BarButtonItem1.Name = "BarButtonItem1"
        '
        'buttonSearch
        '
@@ -140,7 +159,7 @@ Partial Class frmMonitor
        '
        Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1})
        Me.RibbonPage1.Name = "RibbonPage1"
-        Me.RibbonPage1.Text = "RibbonPage1"
+        Me.RibbonPage1.Text = "Start"
        '
        'RibbonPageGroup1
        '
@@ -150,10 +169,10 @@ Partial Class frmMonitor
        '
        'RibbonStatusBar1
        '
-        Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 747)
+        Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 749)
        Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
        Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
-        Me.RibbonStatusBar1.Size = New System.Drawing.Size(1379, 24)
+        Me.RibbonStatusBar1.Size = New System.Drawing.Size(1379, 22)
        '
        'RibbonPage2
        '
@@ -233,7 +252,7 @@ Partial Class frmMonitor
        Me.LayoutItemSearchValue_Text.Size = New System.Drawing.Size(215, 46)
        Me.LayoutItemSearchValue_Text.Text = "Suchwert"
        Me.LayoutItemSearchValue_Text.TextLocation = DevExpress.Utils.Locations.Top
-        Me.LayoutItemSearchValue_Text.TextSize = New System.Drawing.Size(58, 13)
+        Me.LayoutItemSearchValue_Text.TextSize = New System.Drawing.Size(63, 13)
        '
        'LayoutControlItem2
        '
@@ -244,7 +263,7 @@ Partial Class frmMonitor
        Me.LayoutControlItem2.Size = New System.Drawing.Size(215, 46)
        Me.LayoutControlItem2.Text = "Attribut"
        Me.LayoutControlItem2.TextLocation = DevExpress.Utils.Locations.Top
-        Me.LayoutControlItem2.TextSize = New System.Drawing.Size(58, 13)
+        Me.LayoutControlItem2.TextSize = New System.Drawing.Size(63, 13)
        '
        'LayoutItemSearchValue_Date
        '
@@ -255,7 +274,7 @@ Partial Class frmMonitor
        Me.LayoutItemSearchValue_Date.Size = New System.Drawing.Size(215, 46)
        Me.LayoutItemSearchValue_Date.Text = "Suchwert"
        Me.LayoutItemSearchValue_Date.TextLocation = DevExpress.Utils.Locations.Top
-        Me.LayoutItemSearchValue_Date.TextSize = New System.Drawing.Size(58, 13)
+        Me.LayoutItemSearchValue_Date.TextSize = New System.Drawing.Size(63, 13)
        Me.LayoutItemSearchValue_Date.Visibility = DevExpress.XtraLayout.Utils.LayoutVisibility.Never
        '
        'LayoutControlItem3
@@ -267,7 +286,7 @@ Partial Class frmMonitor
        Me.LayoutControlItem3.Size = New System.Drawing.Size(215, 406)
        Me.LayoutControlItem3.Text = "Auswertung"
        Me.LayoutControlItem3.TextLocation = DevExpress.Utils.Locations.Top
-        Me.LayoutControlItem3.TextSize = New System.Drawing.Size(58, 13)
+        Me.LayoutControlItem3.TextSize = New System.Drawing.Size(63, 13)
        '
        'XtraTabControl1
        '
@@ -283,7 +302,7 @@ Partial Class frmMonitor
        '
        Me.XtraTabPageFile1.Controls.Add(Me.DocumentViewer1)
        Me.XtraTabPageFile1.Name = "XtraTabPageFile1"
-        Me.XtraTabPageFile1.Size = New System.Drawing.Size(407, 539)
+        Me.XtraTabPageFile1.Size = New System.Drawing.Size(407, 541)
        Me.XtraTabPageFile1.Text = "File 1"
        '
        'DocumentViewer1
@@ -292,14 +311,14 @@ Partial Class frmMonitor
        Me.DocumentViewer1.FileLoaded = False
        Me.DocumentViewer1.Location = New System.Drawing.Point(0, 0)
        Me.DocumentViewer1.Name = "DocumentViewer1"
-        Me.DocumentViewer1.Size = New System.Drawing.Size(407, 539)
+        Me.DocumentViewer1.Size = New System.Drawing.Size(407, 541)
        Me.DocumentViewer1.TabIndex = 0
        '
        'XtraTabPageFile2
        '
        Me.XtraTabPageFile2.Controls.Add(Me.DocumentViewer2)
        Me.XtraTabPageFile2.Name = "XtraTabPageFile2"
-        Me.XtraTabPageFile2.Size = New System.Drawing.Size(407, 539)
+        Me.XtraTabPageFile2.Size = New System.Drawing.Size(407, 541)
        Me.XtraTabPageFile2.Text = "File 2"
        '
        'DocumentViewer2
@@ -308,14 +327,14 @@ Partial Class frmMonitor
        Me.DocumentViewer2.FileLoaded = False
        Me.DocumentViewer2.Location = New System.Drawing.Point(0, 0)
        Me.DocumentViewer2.Name = "DocumentViewer2"
-        Me.DocumentViewer2.Size = New System.Drawing.Size(407, 539)
+        Me.DocumentViewer2.Size = New System.Drawing.Size(407, 541)
        Me.DocumentViewer2.TabIndex = 1
        '
        'XtraTabPageHtml1
        '
        Me.XtraTabPageHtml1.Controls.Add(Me.RichEditControl1)
        Me.XtraTabPageHtml1.Name = "XtraTabPageHtml1"
-        Me.XtraTabPageHtml1.Size = New System.Drawing.Size(407, 539)
+        Me.XtraTabPageHtml1.Size = New System.Drawing.Size(407, 541)
        Me.XtraTabPageHtml1.Text = "HTML 1"
        '
        'RichEditControl1
@@ -328,7 +347,7 @@ Partial Class frmMonitor
        Me.RichEditControl1.Name = "RichEditControl1"
        Me.RichEditControl1.Options.HorizontalRuler.Visibility = DevExpress.XtraRichEdit.RichEditRulerVisibility.Hidden
        Me.RichEditControl1.Options.VerticalRuler.Visibility = DevExpress.XtraRichEdit.RichEditRulerVisibility.Hidden
-        Me.RichEditControl1.Size = New System.Drawing.Size(407, 539)
+        Me.RichEditControl1.Size = New System.Drawing.Size(407, 541)
        Me.RichEditControl1.TabIndex = 0
        Me.RichEditControl1.Text = "RichEditControl1"
        '
@@ -336,7 +355,7 @@ Partial Class frmMonitor
        '
        Me.XtraTabPageHtml2.Controls.Add(Me.RichEditControl2)
        Me.XtraTabPageHtml2.Name = "XtraTabPageHtml2"
-        Me.XtraTabPageHtml2.Size = New System.Drawing.Size(407, 539)
+        Me.XtraTabPageHtml2.Size = New System.Drawing.Size(407, 541)
        Me.XtraTabPageHtml2.Text = "HTML 2"
        '
        'RichEditControl2
@@ -345,7 +364,7 @@ Partial Class frmMonitor
        Me.RichEditControl2.Location = New System.Drawing.Point(0, 0)
        Me.RichEditControl2.MenuManager = Me.RibbonControl1
        Me.RichEditControl2.Name = "RichEditControl2"
-        Me.RichEditControl2.Size = New System.Drawing.Size(407, 539)
+        Me.RichEditControl2.Size = New System.Drawing.Size(407, 541)
        Me.RichEditControl2.TabIndex = 1
        Me.RichEditControl2.Text = "RichEditControl2"
        '
@@ -384,6 +403,7 @@ Partial Class frmMonitor
        Me.SvgImageCollection1.Add("success", "image://svgimages/icon builder/actions_checkcircled.svg")
        Me.SvgImageCollection1.Add("failure", "image://svgimages/icon builder/actions_deletecircled.svg")
        Me.SvgImageCollection1.Add("warning", "image://svgimages/business objects/bo_attention.svg")
+        Me.SvgImageCollection1.Add("waiting", "image://svgimages/business objects/bo_audit_changehistory.svg")
        '
        'SplitContainerControl1
        '
@@ -518,25 +538,29 @@ Partial Class frmMonitor
        'XtraTabControl2
        '
        Me.XtraTabControl2.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.XtraTabControl2.Location = New System.Drawing.Point(0, 158)
+        Me.XtraTabControl2.Location = New System.Drawing.Point(0, 159)
        Me.XtraTabControl2.Name = "XtraTabControl2"
        Me.XtraTabControl2.SelectedTabPage = Me.XtraTabPage3
-        Me.XtraTabControl2.Size = New System.Drawing.Size(1379, 589)
+        Me.XtraTabControl2.Size = New System.Drawing.Size(1379, 590)
        Me.XtraTabControl2.TabIndex = 11
        Me.XtraTabControl2.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPage3, Me.XtraTabPage4})
        '
        'XtraTabPage3
        '
        Me.XtraTabPage3.Controls.Add(Me.SplitContainerControl2)
+        Me.XtraTabPage3.ImageOptions.SvgImage = Global.DigitalData.GUIs.Monitor.My.Resources.Resources.enablesearch
+        Me.XtraTabPage3.ImageOptions.SvgImageSize = New System.Drawing.Size(16, 16)
        Me.XtraTabPage3.Name = "XtraTabPage3"
        Me.XtraTabPage3.Size = New System.Drawing.Size(1377, 564)
-        Me.XtraTabPage3.Text = "XtraTabPage3"
+        Me.XtraTabPage3.Text = "Attribut Suche"
        '
        'XtraTabPage4
        '
+        Me.XtraTabPage4.ImageOptions.SvgImage = Global.DigitalData.GUIs.Monitor.My.Resources.Resources.bo_dashboard
+        Me.XtraTabPage4.ImageOptions.SvgImageSize = New System.Drawing.Size(16, 16)
        Me.XtraTabPage4.Name = "XtraTabPage4"
        Me.XtraTabPage4.Size = New System.Drawing.Size(1377, 564)
-        Me.XtraTabPage4.Text = "XtraTabPage4"
+        Me.XtraTabPage4.Text = "Auswertungen"
        '
        'frmMonitor
        '
@@ -552,6 +576,7 @@ Partial Class frmMonitor
        Me.StatusBar = Me.RibbonStatusBar1
        Me.Text = "Monitor"
        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.ApplicationMenu1, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).EndInit()
        Me.LayoutControl1.ResumeLayout(False)
        CType(Me.TextEdit1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
@@ -646,4 +671,6 @@ Partial Class frmMonitor
    Friend WithEvents DateEdit1 As DevExpress.XtraEditors.DateEdit
    Friend WithEvents LayoutItemSearchValue_Date As DevExpress.XtraLayout.LayoutControlItem
    Friend WithEvents SvgImageCollection1 As DevExpress.Utils.SvgImageCollection
+    Friend WithEvents ApplicationMenu1 As DevExpress.XtraBars.Ribbon.ApplicationMenu
+    Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
 End Class