MS12.02.2016

This commit is contained in:
SchreiberM
2016-02-12 09:45:43 +01:00
parent 2a36cc2a79
commit e1f073d69f
64 changed files with 25315 additions and 5580 deletions

View File

@@ -59,35 +59,20 @@ Partial Class frmSQL_Admin
'
'Label1
'
Me.Label1.AutoSize = True
Me.Label1.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label1.Location = New System.Drawing.Point(14, 12)
resources.ApplyResources(Me.Label1, "Label1")
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(122, 17)
Me.Label1.TabIndex = 0
Me.Label1.Text = "Aktuelle Verbindung:"
'
'TextBox1
'
Me.TextBox1.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.TextBox1.Location = New System.Drawing.Point(17, 32)
resources.ApplyResources(Me.TextBox1, "TextBox1")
Me.TextBox1.Name = "TextBox1"
Me.TextBox1.ReadOnly = True
Me.TextBox1.Size = New System.Drawing.Size(727, 25)
Me.TextBox1.TabIndex = 1
'
'btnrunSQL
'
Me.btnrunSQL.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.btnrunSQL.Font = New System.Drawing.Font("Segoe UI Semibold", 9.75!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
resources.ApplyResources(Me.btnrunSQL, "btnrunSQL")
Me.btnrunSQL.Image = Global.Global_Indexer.My.Resources.Resources.database_go
Me.btnrunSQL.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnrunSQL.Location = New System.Drawing.Point(17, 474)
Me.btnrunSQL.Name = "btnrunSQL"
Me.btnrunSQL.Size = New System.Drawing.Size(125, 33)
Me.btnrunSQL.TabIndex = 4
Me.btnrunSQL.Text = "SQL ausführen"
Me.btnrunSQL.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.btnrunSQL.UseVisualStyleBackColor = True
'
'OpenFileDialog1
@@ -97,70 +82,50 @@ Partial Class frmSQL_Admin
'Button1
'
Me.Button1.Image = Global.Global_Indexer.My.Resources.Resources.folder_Open_32xSM
Me.Button1.ImageAlign = System.Drawing.ContentAlignment.TopCenter
Me.Button1.Location = New System.Drawing.Point(750, 86)
resources.ApplyResources(Me.Button1, "Button1")
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(75, 43)
Me.Button1.TabIndex = 5
Me.Button1.Text = "Open SQL"
Me.Button1.TextAlign = System.Drawing.ContentAlignment.BottomCenter
Me.Button1.UseVisualStyleBackColor = True
'
'txtSQL
'
Me.txtSQL.AcceptsReturn = True
Me.txtSQL.AcceptsTab = True
Me.txtSQL.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.txtSQL.Font = New System.Drawing.Font("Consolas", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtSQL.Location = New System.Drawing.Point(-1, 11)
Me.txtSQL.Multiline = True
resources.ApplyResources(Me.txtSQL, "txtSQL")
Me.txtSQL.Name = "txtSQL"
Me.txtSQL.ScrollBars = System.Windows.Forms.ScrollBars.Both
Me.txtSQL.Size = New System.Drawing.Size(715, 371)
Me.txtSQL.TabIndex = 3
'
'XtraTabControl1
'
Me.XtraTabControl1.Location = New System.Drawing.Point(17, 63)
resources.ApplyResources(Me.XtraTabControl1, "XtraTabControl1")
Me.XtraTabControl1.Name = "XtraTabControl1"
Me.XtraTabControl1.SelectedTabPage = Me.XtraTabPage1
Me.XtraTabControl1.Size = New System.Drawing.Size(727, 405)
Me.XtraTabControl1.TabIndex = 6
Me.XtraTabControl1.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPage1, Me.XtraTabPage2})
'
'XtraTabPage1
'
Me.XtraTabPage1.Controls.Add(Me.txtSQL)
Me.XtraTabPage1.Name = "XtraTabPage1"
Me.XtraTabPage1.Size = New System.Drawing.Size(721, 377)
Me.XtraTabPage1.Text = "Auszuführender SQL-Befehl"
resources.ApplyResources(Me.XtraTabPage1, "XtraTabPage1")
'
'XtraTabPage2
'
Me.XtraTabPage2.Controls.Add(Me.GridControl1)
Me.XtraTabPage2.Controls.Add(Me.BindingNavigator1)
Me.XtraTabPage2.Name = "XtraTabPage2"
Me.XtraTabPage2.Size = New System.Drawing.Size(721, 377)
Me.XtraTabPage2.Text = "Ergebnis:"
resources.ApplyResources(Me.XtraTabPage2, "XtraTabPage2")
'
'GridControl1
'
Me.GridControl1.DataSource = Me.BindingSource1
Me.GridControl1.Dock = System.Windows.Forms.DockStyle.Fill
Me.GridControl1.Location = New System.Drawing.Point(0, 25)
resources.ApplyResources(Me.GridControl1, "GridControl1")
Me.GridControl1.MainView = Me.GridView1
Me.GridControl1.Name = "GridControl1"
Me.GridControl1.Size = New System.Drawing.Size(721, 352)
Me.GridControl1.TabIndex = 1
Me.GridControl1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView1})
'
'GridView1
'
Me.GridView1.Appearance.EvenRow.BackColor = System.Drawing.Color.Cyan
Me.GridView1.Appearance.EvenRow.BackColor = CType(resources.GetObject("GridView1.Appearance.EvenRow.BackColor"), System.Drawing.Color)
Me.GridView1.Appearance.EvenRow.Options.UseBackColor = True
Me.GridView1.Appearance.OddRow.BackColor = System.Drawing.Color.White
Me.GridView1.Appearance.OddRow.BackColor = CType(resources.GetObject("GridView1.Appearance.OddRow.BackColor"), System.Drawing.Color)
Me.GridView1.Appearance.OddRow.Options.UseBackColor = True
Me.GridView1.GridControl = Me.GridControl1
Me.GridView1.Name = "GridView1"
@@ -180,99 +145,73 @@ Partial Class frmSQL_Admin
Me.BindingNavigator1.CountItemFormat = "von {0} Datensätzen"
Me.BindingNavigator1.DeleteItem = Nothing
Me.BindingNavigator1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BindingNavigatorMoveFirstItem, Me.BindingNavigatorMovePreviousItem, Me.BindingNavigatorSeparator, Me.BindingNavigatorPositionItem, Me.BindingNavigatorCountItem, Me.BindingNavigatorSeparator1, Me.BindingNavigatorMoveNextItem, Me.BindingNavigatorMoveLastItem, Me.BindingNavigatorSeparator2})
Me.BindingNavigator1.Location = New System.Drawing.Point(0, 0)
resources.ApplyResources(Me.BindingNavigator1, "BindingNavigator1")
Me.BindingNavigator1.MoveFirstItem = Me.BindingNavigatorMoveFirstItem
Me.BindingNavigator1.MoveLastItem = Me.BindingNavigatorMoveLastItem
Me.BindingNavigator1.MoveNextItem = Me.BindingNavigatorMoveNextItem
Me.BindingNavigator1.MovePreviousItem = Me.BindingNavigatorMovePreviousItem
Me.BindingNavigator1.Name = "BindingNavigator1"
Me.BindingNavigator1.PositionItem = Me.BindingNavigatorPositionItem
Me.BindingNavigator1.Size = New System.Drawing.Size(721, 25)
Me.BindingNavigator1.TabIndex = 0
Me.BindingNavigator1.Text = "BindingNavigator1"
'
'BindingNavigatorCountItem
'
Me.BindingNavigatorCountItem.Name = "BindingNavigatorCountItem"
Me.BindingNavigatorCountItem.Size = New System.Drawing.Size(111, 22)
Me.BindingNavigatorCountItem.Text = "von {0} Datensätzen"
Me.BindingNavigatorCountItem.ToolTipText = "Die Gesamtanzahl der Elemente."
resources.ApplyResources(Me.BindingNavigatorCountItem, "BindingNavigatorCountItem")
'
'BindingNavigatorMoveFirstItem
'
Me.BindingNavigatorMoveFirstItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorMoveFirstItem.Image = CType(resources.GetObject("BindingNavigatorMoveFirstItem.Image"), System.Drawing.Image)
resources.ApplyResources(Me.BindingNavigatorMoveFirstItem, "BindingNavigatorMoveFirstItem")
Me.BindingNavigatorMoveFirstItem.Name = "BindingNavigatorMoveFirstItem"
Me.BindingNavigatorMoveFirstItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorMoveFirstItem.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorMoveFirstItem.Text = "Erste verschieben"
'
'BindingNavigatorMovePreviousItem
'
Me.BindingNavigatorMovePreviousItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorMovePreviousItem.Image = CType(resources.GetObject("BindingNavigatorMovePreviousItem.Image"), System.Drawing.Image)
resources.ApplyResources(Me.BindingNavigatorMovePreviousItem, "BindingNavigatorMovePreviousItem")
Me.BindingNavigatorMovePreviousItem.Name = "BindingNavigatorMovePreviousItem"
Me.BindingNavigatorMovePreviousItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorMovePreviousItem.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorMovePreviousItem.Text = "Vorherige verschieben"
'
'BindingNavigatorSeparator
'
Me.BindingNavigatorSeparator.Name = "BindingNavigatorSeparator"
Me.BindingNavigatorSeparator.Size = New System.Drawing.Size(6, 25)
resources.ApplyResources(Me.BindingNavigatorSeparator, "BindingNavigatorSeparator")
'
'BindingNavigatorPositionItem
'
Me.BindingNavigatorPositionItem.AccessibleName = "Position"
Me.BindingNavigatorPositionItem.AutoSize = False
resources.ApplyResources(Me.BindingNavigatorPositionItem, "BindingNavigatorPositionItem")
Me.BindingNavigatorPositionItem.Name = "BindingNavigatorPositionItem"
Me.BindingNavigatorPositionItem.Size = New System.Drawing.Size(50, 23)
Me.BindingNavigatorPositionItem.Text = "0"
Me.BindingNavigatorPositionItem.ToolTipText = "Aktuelle Position"
'
'BindingNavigatorSeparator1
'
Me.BindingNavigatorSeparator1.Name = "BindingNavigatorSeparator1"
Me.BindingNavigatorSeparator1.Size = New System.Drawing.Size(6, 25)
resources.ApplyResources(Me.BindingNavigatorSeparator1, "BindingNavigatorSeparator1")
'
'BindingNavigatorMoveNextItem
'
Me.BindingNavigatorMoveNextItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorMoveNextItem.Image = CType(resources.GetObject("BindingNavigatorMoveNextItem.Image"), System.Drawing.Image)
resources.ApplyResources(Me.BindingNavigatorMoveNextItem, "BindingNavigatorMoveNextItem")
Me.BindingNavigatorMoveNextItem.Name = "BindingNavigatorMoveNextItem"
Me.BindingNavigatorMoveNextItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorMoveNextItem.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorMoveNextItem.Text = "Nächste verschieben"
'
'BindingNavigatorMoveLastItem
'
Me.BindingNavigatorMoveLastItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorMoveLastItem.Image = CType(resources.GetObject("BindingNavigatorMoveLastItem.Image"), System.Drawing.Image)
resources.ApplyResources(Me.BindingNavigatorMoveLastItem, "BindingNavigatorMoveLastItem")
Me.BindingNavigatorMoveLastItem.Name = "BindingNavigatorMoveLastItem"
Me.BindingNavigatorMoveLastItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorMoveLastItem.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorMoveLastItem.Text = "Letzte verschieben"
'
'BindingNavigatorSeparator2
'
Me.BindingNavigatorSeparator2.Name = "BindingNavigatorSeparator2"
Me.BindingNavigatorSeparator2.Size = New System.Drawing.Size(6, 25)
resources.ApplyResources(Me.BindingNavigatorSeparator2, "BindingNavigatorSeparator2")
'
'frmSQL_Admin
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 17.0!)
resources.ApplyResources(Me, "$this")
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(826, 519)
Me.Controls.Add(Me.XtraTabControl1)
Me.Controls.Add(Me.Button1)
Me.Controls.Add(Me.btnrunSQL)
Me.Controls.Add(Me.TextBox1)
Me.Controls.Add(Me.Label1)
Me.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
Me.Name = "frmSQL_Admin"
Me.Text = "SQL-Admin"
CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).EndInit()
Me.XtraTabControl1.ResumeLayout(False)
Me.XtraTabPage1.ResumeLayout(False)