MS_26012015

This commit is contained in:
SchreiberM
2016-01-26 13:36:01 +01:00
parent 4410df2487
commit d9162463b4
82 changed files with 34884 additions and 6568 deletions

View File

@@ -23,13 +23,13 @@ Partial Class frmSQLEditor
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmSQLEditor))
Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle6 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmSQLEditor))
Me.Button1 = New System.Windows.Forms.Button()
Me.txtValue = New System.Windows.Forms.TextBox()
Me.DD_DMSDataSet = New DD_Record_Organiser.DD_DMSDataSet()
@@ -75,30 +75,17 @@ Partial Class frmSQLEditor
'
'Button1
'
Me.Button1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
resources.ApplyResources(Me.Button1, "Button1")
Me.Button1.DialogResult = System.Windows.Forms.DialogResult.OK
Me.Button1.Font = New System.Drawing.Font("Segoe UI Semibold", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Button1.Image = Global.DD_Record_Organiser.My.Resources.Resources.save_16xLG
Me.Button1.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.Button1.Location = New System.Drawing.Point(954, 517)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(266, 33)
Me.Button1.TabIndex = 1
Me.Button1.Text = "Speichern"
Me.Button1.UseVisualStyleBackColor = True
'
'txtValue
'
Me.txtValue.AcceptsTab = True
Me.txtValue.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.txtValue.Font = New System.Drawing.Font("Consolas", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtValue.Location = New System.Drawing.Point(12, 181)
Me.txtValue.Multiline = True
resources.ApplyResources(Me.txtValue, "txtValue")
Me.txtValue.Name = "txtValue"
Me.txtValue.ScrollBars = System.Windows.Forms.ScrollBars.Both
Me.txtValue.Size = New System.Drawing.Size(1208, 137)
Me.txtValue.TabIndex = 2
'
'DD_DMSDataSet
'
@@ -151,64 +138,43 @@ Partial Class frmSQLEditor
Me.cmbConnection.DataSource = Me.TBDD_CONNECTIONBindingSource
Me.cmbConnection.DisplayMember = "BEZEICHNUNG"
Me.cmbConnection.FormattingEnabled = True
Me.cmbConnection.Location = New System.Drawing.Point(6, 19)
resources.ApplyResources(Me.cmbConnection, "cmbConnection")
Me.cmbConnection.Name = "cmbConnection"
Me.cmbConnection.Size = New System.Drawing.Size(317, 23)
Me.cmbConnection.TabIndex = 3
Me.cmbConnection.ValueMember = "GUID"
'
'Button2
'
Me.Button2.Image = Global.DD_Record_Organiser.My.Resources.Resources.database_connect
Me.Button2.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.Button2.Location = New System.Drawing.Point(329, 19)
resources.ApplyResources(Me.Button2, "Button2")
Me.Button2.Name = "Button2"
Me.Button2.Size = New System.Drawing.Size(153, 23)
Me.Button2.TabIndex = 4
Me.Button2.Text = "SQL-Connections"
Me.Button2.UseVisualStyleBackColor = True
'
'btnTestSQL
'
Me.btnTestSQL.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.btnTestSQL.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.btnTestSQL, "btnTestSQL")
Me.btnTestSQL.Image = Global.DD_Record_Organiser.My.Resources.Resources.Go
Me.btnTestSQL.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnTestSQL.Location = New System.Drawing.Point(954, 324)
Me.btnTestSQL.Name = "btnTestSQL"
Me.btnTestSQL.Size = New System.Drawing.Size(266, 29)
Me.btnTestSQL.TabIndex = 7
Me.btnTestSQL.Text = "SQL Befehl testen"
Me.btnTestSQL.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.btnTestSQL.UseVisualStyleBackColor = True
'
'cmbPlaceholder
'
Me.cmbPlaceholder.FormattingEnabled = True
Me.cmbPlaceholder.Items.AddRange(New Object() {"@RECORD_ID", "@PARENTRECORD_ID", "@FORM_ID"})
Me.cmbPlaceholder.Location = New System.Drawing.Point(6, 19)
Me.cmbPlaceholder.Items.AddRange(New Object() {resources.GetString("cmbPlaceholder.Items"), resources.GetString("cmbPlaceholder.Items1"), resources.GetString("cmbPlaceholder.Items2")})
resources.ApplyResources(Me.cmbPlaceholder, "cmbPlaceholder")
Me.cmbPlaceholder.Name = "cmbPlaceholder"
Me.cmbPlaceholder.Size = New System.Drawing.Size(169, 23)
Me.cmbPlaceholder.TabIndex = 10
'
'btnAddPlaceholder
'
Me.btnAddPlaceholder.Image = Global.DD_Record_Organiser.My.Resources.Resources.action_add_16xLG
Me.btnAddPlaceholder.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnAddPlaceholder.Location = New System.Drawing.Point(181, 17)
resources.ApplyResources(Me.btnAddPlaceholder, "btnAddPlaceholder")
Me.btnAddPlaceholder.Name = "btnAddPlaceholder"
Me.btnAddPlaceholder.Size = New System.Drawing.Size(163, 23)
Me.btnAddPlaceholder.TabIndex = 11
Me.btnAddPlaceholder.Text = "Platzhalter hinzufügen"
Me.btnAddPlaceholder.UseVisualStyleBackColor = True
'
'btnRefreshConnections
'
Me.btnRefreshConnections.Image = Global.DD_Record_Organiser.My.Resources.Resources.refresh_16xLG
Me.btnRefreshConnections.Location = New System.Drawing.Point(488, 19)
resources.ApplyResources(Me.btnRefreshConnections, "btnRefreshConnections")
Me.btnRefreshConnections.Name = "btnRefreshConnections"
Me.btnRefreshConnections.Size = New System.Drawing.Size(35, 23)
Me.btnRefreshConnections.TabIndex = 13
Me.btnRefreshConnections.UseVisualStyleBackColor = True
'
'dgvPlaceholders
@@ -217,7 +183,7 @@ Partial Class frmSQLEditor
Me.dgvPlaceholders.AllowUserToDeleteRows = False
DataGridViewCellStyle1.BackColor = System.Drawing.Color.Cyan
Me.dgvPlaceholders.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1
Me.dgvPlaceholders.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
resources.ApplyResources(Me.dgvPlaceholders, "dgvPlaceholders")
DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle2.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle2.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
@@ -236,21 +202,17 @@ Partial Class frmSQLEditor
DataGridViewCellStyle3.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvPlaceholders.DefaultCellStyle = DataGridViewCellStyle3
Me.dgvPlaceholders.Enabled = False
Me.dgvPlaceholders.Location = New System.Drawing.Point(9, 361)
Me.dgvPlaceholders.Name = "dgvPlaceholders"
Me.dgvPlaceholders.Size = New System.Drawing.Size(349, 150)
Me.dgvPlaceholders.TabIndex = 16
'
'colPlaceholder
'
Me.colPlaceholder.HeaderText = "Platzhalter"
resources.ApplyResources(Me.colPlaceholder, "colPlaceholder")
Me.colPlaceholder.Name = "colPlaceholder"
Me.colPlaceholder.ReadOnly = True
'
'colReplace
'
Me.colReplace.HeaderText = "Ersetzung"
resources.ApplyResources(Me.colReplace, "colReplace")
Me.colReplace.Name = "colReplace"
'
'dgvResult
@@ -259,7 +221,7 @@ Partial Class frmSQLEditor
Me.dgvResult.AllowUserToDeleteRows = False
DataGridViewCellStyle4.BackColor = System.Drawing.Color.Cyan
Me.dgvResult.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle4
Me.dgvResult.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
resources.ApplyResources(Me.dgvResult, "dgvResult")
DataGridViewCellStyle5.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle5.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle5.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
@@ -277,151 +239,96 @@ Partial Class frmSQLEditor
DataGridViewCellStyle6.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvResult.DefaultCellStyle = DataGridViewCellStyle6
Me.dgvResult.Location = New System.Drawing.Point(365, 361)
Me.dgvResult.Name = "dgvResult"
Me.dgvResult.ReadOnly = True
Me.dgvResult.Size = New System.Drawing.Size(854, 150)
Me.dgvResult.TabIndex = 17
'
'Label5
'
Me.Label5.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.Label5.AutoSize = True
Me.Label5.Font = New System.Drawing.Font("Segoe UI", 9.0!)
Me.Label5.Location = New System.Drawing.Point(362, 343)
resources.ApplyResources(Me.Label5, "Label5")
Me.Label5.Name = "Label5"
Me.Label5.Size = New System.Drawing.Size(55, 15)
Me.Label5.TabIndex = 18
Me.Label5.Text = "Ergebnis:"
'
'Label6
'
Me.Label6.AutoSize = True
Me.Label6.Font = New System.Drawing.Font("Consolas", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label6.Location = New System.Drawing.Point(6, 26)
resources.ApplyResources(Me.Label6, "Label6")
Me.Label6.Name = "Label6"
Me.Label6.Size = New System.Drawing.Size(56, 18)
Me.Label6.TabIndex = 19
Me.Label6.Text = "SELECT"
'
'cmbSelectColumns
'
Me.cmbSelectColumns.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.cmbSelectColumns.Enabled = False
resources.ApplyResources(Me.cmbSelectColumns, "cmbSelectColumns")
Me.cmbSelectColumns.FormattingEnabled = True
Me.cmbSelectColumns.Location = New System.Drawing.Point(68, 25)
Me.cmbSelectColumns.Name = "cmbSelectColumns"
Me.cmbSelectColumns.Size = New System.Drawing.Size(233, 23)
Me.cmbSelectColumns.TabIndex = 20
'
'Label7
'
Me.Label7.AutoSize = True
Me.Label7.Font = New System.Drawing.Font("Consolas", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label7.Location = New System.Drawing.Point(307, 25)
resources.ApplyResources(Me.Label7, "Label7")
Me.Label7.Name = "Label7"
Me.Label7.Size = New System.Drawing.Size(40, 18)
Me.Label7.TabIndex = 21
Me.Label7.Text = "FROM"
'
'cmbFromTables
'
Me.cmbFromTables.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.cmbFromTables.Enabled = False
resources.ApplyResources(Me.cmbFromTables, "cmbFromTables")
Me.cmbFromTables.FormattingEnabled = True
Me.cmbFromTables.Location = New System.Drawing.Point(353, 25)
Me.cmbFromTables.Name = "cmbFromTables"
Me.cmbFromTables.Size = New System.Drawing.Size(234, 23)
Me.cmbFromTables.TabIndex = 22
'
'Label8
'
Me.Label8.AutoSize = True
Me.Label8.Font = New System.Drawing.Font("Consolas", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label8.Location = New System.Drawing.Point(593, 25)
resources.ApplyResources(Me.Label8, "Label8")
Me.Label8.Name = "Label8"
Me.Label8.Size = New System.Drawing.Size(48, 18)
Me.Label8.TabIndex = 23
Me.Label8.Text = "WHERE"
'
'radioTable
'
Me.radioTable.AutoSize = True
Me.radioTable.Location = New System.Drawing.Point(15, 24)
resources.ApplyResources(Me.radioTable, "radioTable")
Me.radioTable.Name = "radioTable"
Me.radioTable.Size = New System.Drawing.Size(70, 19)
Me.radioTable.TabIndex = 24
Me.radioTable.TabStop = True
Me.radioTable.Text = "Tabellen"
Me.radioTable.UseVisualStyleBackColor = True
'
'radioView
'
Me.radioView.AutoSize = True
Me.radioView.Location = New System.Drawing.Point(87, 24)
resources.ApplyResources(Me.radioView, "radioView")
Me.radioView.Name = "radioView"
Me.radioView.Size = New System.Drawing.Size(55, 19)
Me.radioView.TabIndex = 25
Me.radioView.TabStop = True
Me.radioView.Text = "Views"
Me.radioView.UseVisualStyleBackColor = True
'
'GroupBox1
'
Me.GroupBox1.Controls.Add(Me.radioTable)
Me.GroupBox1.Controls.Add(Me.radioView)
Me.GroupBox1.Font = New System.Drawing.Font("Segoe UI", 9.0!)
Me.GroupBox1.Location = New System.Drawing.Point(644, 12)
resources.ApplyResources(Me.GroupBox1, "GroupBox1")
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Size = New System.Drawing.Size(226, 69)
Me.GroupBox1.TabIndex = 26
Me.GroupBox1.TabStop = False
Me.GroupBox1.Text = "Tabellenart auswählen"
'
'cmbWhereColumns
'
Me.cmbWhereColumns.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.cmbWhereColumns.Enabled = False
resources.ApplyResources(Me.cmbWhereColumns, "cmbWhereColumns")
Me.cmbWhereColumns.FormattingEnabled = True
Me.cmbWhereColumns.Location = New System.Drawing.Point(647, 24)
Me.cmbWhereColumns.Name = "cmbWhereColumns"
Me.cmbWhereColumns.Size = New System.Drawing.Size(247, 23)
Me.cmbWhereColumns.TabIndex = 27
'
'cmbWhereOperator
'
Me.cmbWhereOperator.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.cmbWhereOperator.FormattingEnabled = True
Me.cmbWhereOperator.Items.AddRange(New Object() {"=", "<>", "<", ">"})
Me.cmbWhereOperator.Location = New System.Drawing.Point(900, 24)
Me.cmbWhereOperator.Items.AddRange(New Object() {resources.GetString("cmbWhereOperator.Items"), resources.GetString("cmbWhereOperator.Items1"), resources.GetString("cmbWhereOperator.Items2"), resources.GetString("cmbWhereOperator.Items3")})
resources.ApplyResources(Me.cmbWhereOperator, "cmbWhereOperator")
Me.cmbWhereOperator.Name = "cmbWhereOperator"
Me.cmbWhereOperator.Size = New System.Drawing.Size(47, 23)
Me.cmbWhereOperator.TabIndex = 28
'
'GroupBox2
'
Me.GroupBox2.Controls.Add(Me.cmbConnection)
Me.GroupBox2.Controls.Add(Me.Button2)
Me.GroupBox2.Controls.Add(Me.btnRefreshConnections)
Me.GroupBox2.Font = New System.Drawing.Font("Segoe UI", 9.0!)
Me.GroupBox2.Location = New System.Drawing.Point(12, 12)
resources.ApplyResources(Me.GroupBox2, "GroupBox2")
Me.GroupBox2.Name = "GroupBox2"
Me.GroupBox2.Size = New System.Drawing.Size(626, 69)
Me.GroupBox2.TabIndex = 29
Me.GroupBox2.TabStop = False
Me.GroupBox2.Text = "SQL-Connection"
'
'GroupBox3
'
Me.GroupBox3.Controls.Add(Me.cmbPlaceholder)
Me.GroupBox3.Controls.Add(Me.btnAddPlaceholder)
Me.GroupBox3.Font = New System.Drawing.Font("Segoe UI", 9.0!)
Me.GroupBox3.Location = New System.Drawing.Point(876, 12)
resources.ApplyResources(Me.GroupBox3, "GroupBox3")
Me.GroupBox3.Name = "GroupBox3"
Me.GroupBox3.Size = New System.Drawing.Size(350, 69)
Me.GroupBox3.TabIndex = 30
Me.GroupBox3.TabStop = False
Me.GroupBox3.Text = "Platzhalter"
'
'GroupBox4
'
@@ -433,47 +340,29 @@ Partial Class frmSQLEditor
Me.GroupBox4.Controls.Add(Me.cmbFromTables)
Me.GroupBox4.Controls.Add(Me.cmbWhereColumns)
Me.GroupBox4.Controls.Add(Me.Label8)
Me.GroupBox4.Font = New System.Drawing.Font("Segoe UI", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.GroupBox4.Location = New System.Drawing.Point(12, 87)
resources.ApplyResources(Me.GroupBox4, "GroupBox4")
Me.GroupBox4.Name = "GroupBox4"
Me.GroupBox4.Size = New System.Drawing.Size(1208, 66)
Me.GroupBox4.TabIndex = 31
Me.GroupBox4.TabStop = False
Me.GroupBox4.Text = "SQL-Befehl generieren"
'
'txtCondition
'
Me.txtCondition.Location = New System.Drawing.Point(953, 24)
resources.ApplyResources(Me.txtCondition, "txtCondition")
Me.txtCondition.Name = "txtCondition"
Me.txtCondition.Size = New System.Drawing.Size(218, 23)
Me.txtCondition.TabIndex = 29
'
'Label1
'
Me.Label1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.Label1.AutoSize = True
Me.Label1.Font = New System.Drawing.Font("Segoe UI", 9.0!)
Me.Label1.Location = New System.Drawing.Point(9, 343)
resources.ApplyResources(Me.Label1, "Label1")
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(132, 15)
Me.Label1.TabIndex = 32
Me.Label1.Text = "Platzhalter Ersetzungen:"
'
'Label2
'
Me.Label2.AutoSize = True
Me.Label2.Font = New System.Drawing.Font("Segoe UI", 9.0!)
Me.Label2.Location = New System.Drawing.Point(9, 163)
resources.ApplyResources(Me.Label2, "Label2")
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(69, 15)
Me.Label2.TabIndex = 33
Me.Label2.Text = "SQL-Befehl:"
'
'frmSQLEditor
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
resources.ApplyResources(Me, "$this")
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(1241, 549)
Me.Controls.Add(Me.Label2)
Me.Controls.Add(Me.Label1)
Me.Controls.Add(Me.GroupBox4)
@@ -486,9 +375,7 @@ Partial Class frmSQLEditor
Me.Controls.Add(Me.btnTestSQL)
Me.Controls.Add(Me.txtValue)
Me.Controls.Add(Me.Button1)
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "frmSQLEditor"
Me.Text = "SQL-Editor"
CType(Me.DD_DMSDataSet, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TBDD_CONNECTIONBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.dgvPlaceholders, System.ComponentModel.ISupportInitialize).EndInit()