321 lines
16 KiB
VB.net
321 lines
16 KiB
VB.net
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
|
Partial Class frmSQLEditor
|
|
Inherits DevExpress.XtraBars.Ribbon.RibbonForm
|
|
|
|
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
|
<System.Diagnostics.DebuggerNonUserCode()>
|
|
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
|
Try
|
|
If disposing AndAlso components IsNot Nothing Then
|
|
components.Dispose()
|
|
End If
|
|
Finally
|
|
MyBase.Dispose(disposing)
|
|
End Try
|
|
End Sub
|
|
|
|
'Wird vom Windows Form-Designer benötigt.
|
|
Private components As System.ComponentModel.IContainer
|
|
|
|
'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()>
|
|
Private Sub InitializeComponent()
|
|
Me.components = New System.ComponentModel.Container()
|
|
Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
|
|
Me.GalleryPlaceholders = New DevExpress.XtraBars.RibbonGalleryBarItem()
|
|
Me.SvgImageCollection1 = New DevExpress.Utils.SvgImageCollection(Me.components)
|
|
Me.btnEditConnections = New DevExpress.XtraBars.BarButtonItem()
|
|
Me.btnSave = New DevExpress.XtraBars.BarButtonItem()
|
|
Me.btnExecuteSQL = New DevExpress.XtraBars.BarButtonItem()
|
|
Me.GalleryConnection = New DevExpress.XtraBars.RibbonGalleryBarItem()
|
|
Me.chkClearPlaceholders = New DevExpress.XtraBars.BarCheckItem()
|
|
Me.btnClearPlaceholders = New DevExpress.XtraBars.BarButtonItem()
|
|
Me.chkShowPlaceholders = New DevExpress.XtraBars.BarCheckItem()
|
|
Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
|
|
Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
|
|
Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
|
|
Me.RibbonPageGroup3 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
|
|
Me.RibbonPageGroup4 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
|
|
Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
|
|
Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
|
|
Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
|
|
Me.txtSQLCommand = New DevExpress.XtraRichEdit.RichEditControl()
|
|
Me.SplitContainerControl1 = New DevExpress.XtraEditors.SplitContainerControl()
|
|
Me.GridPlaceholders = New DevExpress.XtraGrid.GridControl()
|
|
Me.ViewPlaceholders = 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()
|
|
CType(Me.SplitContainerControl1.Panel1, System.ComponentModel.ISupportInitialize).BeginInit()
|
|
Me.SplitContainerControl1.Panel1.SuspendLayout()
|
|
CType(Me.SplitContainerControl1.Panel2, System.ComponentModel.ISupportInitialize).BeginInit()
|
|
Me.SplitContainerControl1.Panel2.SuspendLayout()
|
|
Me.SplitContainerControl1.SuspendLayout()
|
|
CType(Me.GridPlaceholders, System.ComponentModel.ISupportInitialize).BeginInit()
|
|
CType(Me.ViewPlaceholders, System.ComponentModel.ISupportInitialize).BeginInit()
|
|
Me.SuspendLayout()
|
|
'
|
|
'RibbonControl1
|
|
'
|
|
Me.RibbonControl1.ExpandCollapseItem.Id = 0
|
|
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.GalleryPlaceholders, Me.btnEditConnections, Me.btnSave, Me.btnExecuteSQL, Me.GalleryConnection, Me.chkClearPlaceholders, Me.btnClearPlaceholders, Me.chkShowPlaceholders, Me.BarButtonItem1, Me.BarButtonItem2})
|
|
Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
|
|
Me.RibbonControl1.MaxItemId = 15
|
|
Me.RibbonControl1.Name = "RibbonControl1"
|
|
Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
|
|
Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
|
|
Me.RibbonControl1.Size = New System.Drawing.Size(1056, 158)
|
|
Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
|
|
'
|
|
'GalleryPlaceholders
|
|
'
|
|
Me.GalleryPlaceholders.Caption = "RibbonGalleryBarItem1"
|
|
'
|
|
'
|
|
'
|
|
Me.GalleryPlaceholders.Gallery.Images = Me.SvgImageCollection1
|
|
Me.GalleryPlaceholders.Gallery.ShowGroupCaption = True
|
|
Me.GalleryPlaceholders.Gallery.ShowItemText = True
|
|
Me.GalleryPlaceholders.Id = 1
|
|
Me.GalleryPlaceholders.Name = "GalleryPlaceholders"
|
|
'
|
|
'SvgImageCollection1
|
|
'
|
|
Me.SvgImageCollection1.Add("bo_list", "image://svgimages/business objects/bo_list.svg")
|
|
'
|
|
'btnEditConnections
|
|
'
|
|
Me.btnEditConnections.Caption = "Verbindungen"
|
|
Me.btnEditConnections.Id = 2
|
|
Me.btnEditConnections.ImageOptions.SvgImage = Global.DigitalData.Controls.SQLEditor.My.Resources.Resources.editdatasource1
|
|
Me.btnEditConnections.Name = "btnEditConnections"
|
|
'
|
|
'btnSave
|
|
'
|
|
Me.btnSave.Caption = "Speichern und Schließen"
|
|
Me.btnSave.Id = 3
|
|
Me.btnSave.ImageOptions.SvgImage = Global.DigitalData.Controls.SQLEditor.My.Resources.Resources.check
|
|
Me.btnSave.Name = "btnSave"
|
|
'
|
|
'btnExecuteSQL
|
|
'
|
|
Me.btnExecuteSQL.Caption = "SQL Ausführen (F5)"
|
|
Me.btnExecuteSQL.Id = 4
|
|
Me.btnExecuteSQL.ImageOptions.SvgImage = Global.DigitalData.Controls.SQLEditor.My.Resources.Resources.updatedataextract3
|
|
Me.btnExecuteSQL.Name = "btnExecuteSQL"
|
|
'
|
|
'GalleryConnection
|
|
'
|
|
Me.GalleryConnection.Caption = "RibbonGalleryBarItem2"
|
|
'
|
|
'
|
|
'
|
|
Me.GalleryConnection.Gallery.CheckDrawMode = DevExpress.XtraBars.Ribbon.Gallery.CheckDrawMode.ImageAndText
|
|
Me.GalleryConnection.Gallery.ItemCheckMode = DevExpress.XtraBars.Ribbon.Gallery.ItemCheckMode.SingleRadio
|
|
Me.GalleryConnection.Gallery.RowCount = 1
|
|
Me.GalleryConnection.Gallery.ShowItemText = True
|
|
Me.GalleryConnection.Id = 5
|
|
Me.GalleryConnection.Name = "GalleryConnection"
|
|
'
|
|
'chkClearPlaceholders
|
|
'
|
|
Me.chkClearPlaceholders.Caption = "Platzhalter nach Ausführung leeren"
|
|
Me.chkClearPlaceholders.Id = 9
|
|
Me.chkClearPlaceholders.ImageOptions.SvgImage = Global.DigitalData.Controls.SQLEditor.My.Resources.Resources.cleartablestyle
|
|
Me.chkClearPlaceholders.Name = "chkClearPlaceholders"
|
|
'
|
|
'btnClearPlaceholders
|
|
'
|
|
Me.btnClearPlaceholders.Caption = "Platzhalter jetzt leeren"
|
|
Me.btnClearPlaceholders.Id = 10
|
|
Me.btnClearPlaceholders.ImageOptions.SvgImage = Global.DigitalData.Controls.SQLEditor.My.Resources.Resources.clearall
|
|
Me.btnClearPlaceholders.Name = "btnClearPlaceholders"
|
|
'
|
|
'chkShowPlaceholders
|
|
'
|
|
Me.chkShowPlaceholders.BindableChecked = True
|
|
Me.chkShowPlaceholders.Caption = "Platzhalter anzeigen"
|
|
Me.chkShowPlaceholders.Checked = True
|
|
Me.chkShowPlaceholders.Id = 12
|
|
Me.chkShowPlaceholders.ImageOptions.SvgImage = Global.DigitalData.Controls.SQLEditor.My.Resources.Resources.togglefieldcodes
|
|
Me.chkShowPlaceholders.Name = "chkShowPlaceholders"
|
|
'
|
|
'BarButtonItem1
|
|
'
|
|
Me.BarButtonItem1.Caption = "BarButtonItem1"
|
|
Me.BarButtonItem1.Id = 13
|
|
Me.BarButtonItem1.ImageOptions.SvgImage = Global.DigitalData.Controls.SQLEditor.My.Resources.Resources.handtool
|
|
Me.BarButtonItem1.Name = "BarButtonItem1"
|
|
'
|
|
'BarButtonItem2
|
|
'
|
|
Me.BarButtonItem2.Caption = "BarButtonItem2"
|
|
Me.BarButtonItem2.Id = 14
|
|
Me.BarButtonItem2.ImageOptions.SvgImage = Global.DigitalData.Controls.SQLEditor.My.Resources.Resources.autoarrange
|
|
Me.BarButtonItem2.Name = "BarButtonItem2"
|
|
'
|
|
'RibbonPage1
|
|
'
|
|
Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup3, Me.RibbonPageGroup4, Me.RibbonPageGroup1})
|
|
Me.RibbonPage1.Name = "RibbonPage1"
|
|
Me.RibbonPage1.Text = "RibbonPage1"
|
|
'
|
|
'RibbonPageGroup3
|
|
'
|
|
Me.RibbonPageGroup3.ItemLinks.Add(Me.btnSave)
|
|
Me.RibbonPageGroup3.ItemLinks.Add(Me.btnExecuteSQL)
|
|
Me.RibbonPageGroup3.Name = "RibbonPageGroup3"
|
|
Me.RibbonPageGroup3.Text = "Start"
|
|
'
|
|
'RibbonPageGroup4
|
|
'
|
|
Me.RibbonPageGroup4.Alignment = DevExpress.XtraBars.Ribbon.RibbonPageGroupAlignment.Far
|
|
Me.RibbonPageGroup4.ImageOptions.SvgImage = Global.DigitalData.Controls.SQLEditor.My.Resources.Resources.actions_database2
|
|
Me.RibbonPageGroup4.ItemLinks.Add(Me.GalleryConnection)
|
|
Me.RibbonPageGroup4.Name = "RibbonPageGroup4"
|
|
Me.RibbonPageGroup4.Text = "Verbindungen"
|
|
'
|
|
'RibbonPageGroup1
|
|
'
|
|
Me.RibbonPageGroup1.ItemLinks.Add(Me.GalleryPlaceholders)
|
|
Me.RibbonPageGroup1.ItemLinks.Add(Me.chkShowPlaceholders)
|
|
Me.RibbonPageGroup1.ItemLinks.Add(Me.chkClearPlaceholders)
|
|
Me.RibbonPageGroup1.ItemLinks.Add(Me.btnClearPlaceholders)
|
|
Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
|
|
Me.RibbonPageGroup1.Text = "Platzhalter"
|
|
'
|
|
'RibbonStatusBar1
|
|
'
|
|
Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 666)
|
|
Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
|
|
Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
|
|
Me.RibbonStatusBar1.Size = New System.Drawing.Size(1056, 24)
|
|
'
|
|
'RibbonPage2
|
|
'
|
|
Me.RibbonPage2.Name = "RibbonPage2"
|
|
Me.RibbonPage2.Text = "RibbonPage2"
|
|
'
|
|
'txtSQLCommand
|
|
'
|
|
Me.txtSQLCommand.Dock = System.Windows.Forms.DockStyle.Fill
|
|
Me.txtSQLCommand.Location = New System.Drawing.Point(0, 0)
|
|
Me.txtSQLCommand.MenuManager = Me.RibbonControl1
|
|
Me.txtSQLCommand.Name = "txtSQLCommand"
|
|
Me.txtSQLCommand.Size = New System.Drawing.Size(802, 508)
|
|
Me.txtSQLCommand.TabIndex = 2
|
|
'
|
|
'SplitContainerControl1
|
|
'
|
|
Me.SplitContainerControl1.CollapsePanel = DevExpress.XtraEditors.SplitCollapsePanel.Panel2
|
|
Me.SplitContainerControl1.Dock = System.Windows.Forms.DockStyle.Fill
|
|
Me.SplitContainerControl1.Location = New System.Drawing.Point(0, 158)
|
|
Me.SplitContainerControl1.Name = "SplitContainerControl1"
|
|
'
|
|
'SplitContainerControl1.Panel1
|
|
'
|
|
Me.SplitContainerControl1.Panel1.Controls.Add(Me.txtSQLCommand)
|
|
Me.SplitContainerControl1.Panel1.Text = "Panel1"
|
|
'
|
|
'SplitContainerControl1.Panel2
|
|
'
|
|
Me.SplitContainerControl1.Panel2.Controls.Add(Me.GridPlaceholders)
|
|
Me.SplitContainerControl1.Panel2.Text = "Panel2"
|
|
Me.SplitContainerControl1.Size = New System.Drawing.Size(1056, 508)
|
|
Me.SplitContainerControl1.SplitterPosition = 802
|
|
Me.SplitContainerControl1.TabIndex = 4
|
|
'
|
|
'GridPlaceholders
|
|
'
|
|
Me.GridPlaceholders.Dock = System.Windows.Forms.DockStyle.Fill
|
|
Me.GridPlaceholders.Location = New System.Drawing.Point(0, 0)
|
|
Me.GridPlaceholders.MainView = Me.ViewPlaceholders
|
|
Me.GridPlaceholders.MenuManager = Me.RibbonControl1
|
|
Me.GridPlaceholders.Name = "GridPlaceholders"
|
|
Me.GridPlaceholders.Size = New System.Drawing.Size(244, 508)
|
|
Me.GridPlaceholders.TabIndex = 0
|
|
Me.GridPlaceholders.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.ViewPlaceholders})
|
|
'
|
|
'ViewPlaceholders
|
|
'
|
|
Me.ViewPlaceholders.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colPattern, Me.colValue})
|
|
Me.ViewPlaceholders.GridControl = Me.GridPlaceholders
|
|
Me.ViewPlaceholders.Name = "ViewPlaceholders"
|
|
'
|
|
'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
|
|
Me.ClientSize = New System.Drawing.Size(1056, 690)
|
|
Me.Controls.Add(Me.SplitContainerControl1)
|
|
Me.Controls.Add(Me.RibbonStatusBar1)
|
|
Me.Controls.Add(Me.RibbonControl1)
|
|
Me.IconOptions.SvgImage = Global.DigitalData.Controls.SQLEditor.My.Resources.Resources.editdatasource2
|
|
Me.KeyPreview = True
|
|
Me.Name = "frmSQLEditor"
|
|
Me.Ribbon = Me.RibbonControl1
|
|
Me.StatusBar = Me.RibbonStatusBar1
|
|
Me.Text = "SQL Designer"
|
|
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
|
|
CType(Me.SvgImageCollection1, System.ComponentModel.ISupportInitialize).EndInit()
|
|
CType(Me.SplitContainerControl1.Panel1, System.ComponentModel.ISupportInitialize).EndInit()
|
|
Me.SplitContainerControl1.Panel1.ResumeLayout(False)
|
|
CType(Me.SplitContainerControl1.Panel2, System.ComponentModel.ISupportInitialize).EndInit()
|
|
Me.SplitContainerControl1.Panel2.ResumeLayout(False)
|
|
CType(Me.SplitContainerControl1, System.ComponentModel.ISupportInitialize).EndInit()
|
|
Me.SplitContainerControl1.ResumeLayout(False)
|
|
CType(Me.GridPlaceholders, System.ComponentModel.ISupportInitialize).EndInit()
|
|
CType(Me.ViewPlaceholders, System.ComponentModel.ISupportInitialize).EndInit()
|
|
Me.ResumeLayout(False)
|
|
Me.PerformLayout()
|
|
|
|
End Sub
|
|
|
|
Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
|
|
Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
|
|
Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
|
|
Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar
|
|
Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage
|
|
Friend WithEvents GalleryPlaceholders As DevExpress.XtraBars.RibbonGalleryBarItem
|
|
Friend WithEvents SvgImageCollection1 As DevExpress.Utils.SvgImageCollection
|
|
Friend WithEvents txtSQLCommand As DevExpress.XtraRichEdit.RichEditControl
|
|
Friend WithEvents SplitContainerControl1 As DevExpress.XtraEditors.SplitContainerControl
|
|
Friend WithEvents GridPlaceholders As DevExpress.XtraGrid.GridControl
|
|
Friend WithEvents ViewPlaceholders As DevExpress.XtraGrid.Views.Grid.GridView
|
|
Friend WithEvents btnEditConnections 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
|
|
Friend WithEvents GalleryConnection As DevExpress.XtraBars.RibbonGalleryBarItem
|
|
Friend WithEvents RibbonPageGroup4 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
|
|
Friend WithEvents chkClearPlaceholders As DevExpress.XtraBars.BarCheckItem
|
|
Friend WithEvents btnClearPlaceholders As DevExpress.XtraBars.BarButtonItem
|
|
Friend WithEvents chkShowPlaceholders As DevExpress.XtraBars.BarCheckItem
|
|
Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
|
|
Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem
|
|
End Class
|