TestGUI: update test gui

2022-05-04 16:50:04 +02:00
parent cf7a618917
commit 6a2bd3eabe
19 changed files with 421 additions and 382 deletions
--- a/Controls.SQLEditor/frmSQLEditor.Designer.vb
+++ b/Controls.SQLEditor/frmSQLEditor.Designer.vb
@@ -26,9 +26,9 @@ Partial Class frmSQLEditor
        Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
        Me.RibbonGalleryBarItem1 = New DevExpress.XtraBars.RibbonGalleryBarItem()
        Me.SvgImageCollection1 = New DevExpress.Utils.SvgImageCollection(Me.components)
-        Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
-        Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
-        Me.BarButtonItem3 = New DevExpress.XtraBars.BarButtonItem()
+        Me.btnEditConnections = New DevExpress.XtraBars.BarButtonItem()
+        Me.btnSave = New DevExpress.XtraBars.BarButtonItem()
+        Me.btnExecuteSQL = New DevExpress.XtraBars.BarButtonItem()
        Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
        Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
        Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
@@ -39,6 +39,8 @@ Partial Class frmSQLEditor
        Me.SplitContainerControl1 = New DevExpress.XtraEditors.SplitContainerControl()
        Me.GridControl1 = New DevExpress.XtraGrid.GridControl()
        Me.GridView1 = New DevExpress.XtraGrid.Views.Grid.GridView()
+        Me.colPattern = New DevExpress.XtraGrid.Columns.GridColumn()
+        Me.colValue = New DevExpress.XtraGrid.Columns.GridColumn()
        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.SvgImageCollection1, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.SplitContainerControl1, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -54,7 +56,7 @@ Partial Class frmSQLEditor
        'RibbonControl1
        '
        Me.RibbonControl1.ExpandCollapseItem.Id = 0
-        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.RibbonGalleryBarItem1, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3})
+        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.RibbonGalleryBarItem1, Me.btnEditConnections, Me.btnSave, Me.btnExecuteSQL})
        Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
        Me.RibbonControl1.MaxItemId = 5
        Me.RibbonControl1.Name = "RibbonControl1"
@@ -79,26 +81,26 @@ Partial Class frmSQLEditor
        '
        Me.SvgImageCollection1.Add("bo_list", "image://svgimages/business objects/bo_list.svg")
        '
-        'BarButtonItem1
+        'btnEditConnections
        '
-        Me.BarButtonItem1.Caption = "Verbindungen"
-        Me.BarButtonItem1.Id = 2
-        Me.BarButtonItem1.ImageOptions.SvgImage = Global.DigitalData.Controls.SQLEditor.My.Resources.Resources.editdatasource1
-        Me.BarButtonItem1.Name = "BarButtonItem1"
+        Me.btnEditConnections.Caption = "Verbindungen"
+        Me.btnEditConnections.Id = 2
+        Me.btnEditConnections.ImageOptions.SvgImage = Global.DigitalData.Controls.SQLEditor.My.Resources.Resources.editdatasource1
+        Me.btnEditConnections.Name = "btnEditConnections"
        '
-        'BarButtonItem2
+        'btnSave
        '
-        Me.BarButtonItem2.Caption = "Speichern"
-        Me.BarButtonItem2.Id = 3
-        Me.BarButtonItem2.ImageOptions.SvgImage = Global.DigitalData.Controls.SQLEditor.My.Resources.Resources.check
-        Me.BarButtonItem2.Name = "BarButtonItem2"
+        Me.btnSave.Caption = "Speichern"
+        Me.btnSave.Id = 3
+        Me.btnSave.ImageOptions.SvgImage = Global.DigitalData.Controls.SQLEditor.My.Resources.Resources.check
+        Me.btnSave.Name = "btnSave"
        '
-        'BarButtonItem3
+        'btnExecuteSQL
        '
-        Me.BarButtonItem3.Caption = "SQL Ausführen"
-        Me.BarButtonItem3.Id = 4
-        Me.BarButtonItem3.ImageOptions.SvgImage = Global.DigitalData.Controls.SQLEditor.My.Resources.Resources.updatedataextract3
-        Me.BarButtonItem3.Name = "BarButtonItem3"
+        Me.btnExecuteSQL.Caption = "SQL Ausführen"
+        Me.btnExecuteSQL.Id = 4
+        Me.btnExecuteSQL.ImageOptions.SvgImage = Global.DigitalData.Controls.SQLEditor.My.Resources.Resources.updatedataextract3
+        Me.btnExecuteSQL.Name = "btnExecuteSQL"
        '
        'RibbonPage1
        '
@@ -116,14 +118,14 @@ Partial Class frmSQLEditor
        'RibbonPageGroup2
        '
        Me.RibbonPageGroup2.Alignment = DevExpress.XtraBars.Ribbon.RibbonPageGroupAlignment.Far
-        Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem1)
+        Me.RibbonPageGroup2.ItemLinks.Add(Me.btnEditConnections)
        Me.RibbonPageGroup2.Name = "RibbonPageGroup2"
        Me.RibbonPageGroup2.Text = "Datenbank"
        '
        'RibbonPageGroup3
        '
-        Me.RibbonPageGroup3.ItemLinks.Add(Me.BarButtonItem2)
-        Me.RibbonPageGroup3.ItemLinks.Add(Me.BarButtonItem3)
+        Me.RibbonPageGroup3.ItemLinks.Add(Me.btnSave)
+        Me.RibbonPageGroup3.ItemLinks.Add(Me.btnExecuteSQL)
        Me.RibbonPageGroup3.Name = "RibbonPageGroup3"
        Me.RibbonPageGroup3.Text = "Start"
        '
@@ -180,10 +182,29 @@ Partial Class frmSQLEditor
        '
        'GridView1
        '
+        Me.GridView1.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colPattern, Me.colValue})
        Me.GridView1.GridControl = Me.GridControl1
        Me.GridView1.Name = "GridView1"
        '
-        'Form1
+        'colPattern
+        '
+        Me.colPattern.Caption = "Platzhalter"
+        Me.colPattern.FieldName = "Pattern"
+        Me.colPattern.Name = "colPattern"
+        Me.colPattern.OptionsColumn.AllowEdit = False
+        Me.colPattern.OptionsColumn.ReadOnly = True
+        Me.colPattern.Visible = True
+        Me.colPattern.VisibleIndex = 0
+        '
+        'colValue
+        '
+        Me.colValue.Caption = "Wert"
+        Me.colValue.FieldName = "Value"
+        Me.colValue.Name = "colValue"
+        Me.colValue.Visible = True
+        Me.colValue.VisibleIndex = 1
+        '
+        'frmSQLEditor
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
@@ -191,7 +212,7 @@ Partial Class frmSQLEditor
        Me.Controls.Add(Me.SplitContainerControl1)
        Me.Controls.Add(Me.RibbonStatusBar1)
        Me.Controls.Add(Me.RibbonControl1)
-        Me.Name = "Form1"
+        Me.Name = "frmSQLEditor"
        Me.Ribbon = Me.RibbonControl1
        Me.StatusBar = Me.RibbonStatusBar1
        Me.Text = "SQL Connector"
@@ -221,9 +242,11 @@ Partial Class frmSQLEditor
    Friend WithEvents SplitContainerControl1 As DevExpress.XtraEditors.SplitContainerControl
    Friend WithEvents GridControl1 As DevExpress.XtraGrid.GridControl
    Friend WithEvents GridView1 As DevExpress.XtraGrid.Views.Grid.GridView
-    Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents btnEditConnections As DevExpress.XtraBars.BarButtonItem
    Friend WithEvents RibbonPageGroup2 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
-    Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem
-    Friend WithEvents BarButtonItem3 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents btnSave As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents btnExecuteSQL As DevExpress.XtraBars.BarButtonItem
    Friend WithEvents RibbonPageGroup3 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents colPattern As DevExpress.XtraGrid.Columns.GridColumn
+    Friend WithEvents colValue As DevExpress.XtraGrid.Columns.GridColumn
 End Class