diff --git a/GUIs.ZooFlow/Administration/frmSQLDesigner.Designer.vb b/GUIs.ZooFlow/Administration/frmSQLDesigner.Designer.vb index f0ae8239..69c00d9d 100644 --- a/GUIs.ZooFlow/Administration/frmSQLDesigner.Designer.vb +++ b/GUIs.ZooFlow/Administration/frmSQLDesigner.Designer.vb @@ -1,6 +1,6 @@  _ Partial Class frmSQLDesigner - Inherits System.Windows.Forms.Form + Inherits DevExpress.XtraBars.Ribbon.RibbonForm 'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen. _ @@ -23,8 +23,7 @@ Partial Class frmSQLDesigner _ Private Sub InitializeComponent() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmSQLDesigner)) - 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 DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Me.Label14 = New System.Windows.Forms.Label() Me.cmbConnection = New System.Windows.Forms.ComboBox() Me.Label2 = New System.Windows.Forms.Label() @@ -38,27 +37,45 @@ Partial Class frmSQLDesigner Me.cmbAttributeMan = New System.Windows.Forms.ComboBox() Me.SQL_COMMANDTextBox = New System.Windows.Forms.TextBox() Me.Label4 = New System.Windows.Forms.Label() - Me.btnTestSQL = New System.Windows.Forms.Button() Me.Label1 = New System.Windows.Forms.Label() Me.dgvPlaceholders = New System.Windows.Forms.DataGridView() Me.colPlaceholder = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.colReplace = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.Label5 = New System.Windows.Forms.Label() - Me.dgvResult = New System.Windows.Forms.DataGridView() - Me.lblSaveFinalIndex = New System.Windows.Forms.Label() - Me.SimpleButton1 = New DevExpress.XtraEditors.SimpleButton() Me.btnAddAttributeAuto = New System.Windows.Forms.Button() Me.cmbAttributeAuto = New System.Windows.Forms.ComboBox() Me.lblAttributeAuto = New System.Windows.Forms.Label() + Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl() + Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem() + Me.BarEditItem1 = New DevExpress.XtraBars.BarEditItem() + Me.RepositoryItemLookUpEdit3 = New DevExpress.XtraEditors.Repository.RepositoryItemLookUpEdit() + Me.bsiInfo = New DevExpress.XtraBars.BarStaticItem() + Me.BarButtonItem2 = 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() + Me.RepositoryItemComboBox1 = New DevExpress.XtraEditors.Repository.RepositoryItemComboBox() + Me.RepositoryItemLookUpEdit1 = New DevExpress.XtraEditors.Repository.RepositoryItemLookUpEdit() + Me.RepositoryItemLookUpEdit2 = New DevExpress.XtraEditors.Repository.RepositoryItemLookUpEdit() + Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar() + Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage() + Me.GridControl1 = New DevExpress.XtraGrid.GridControl() + Me.GridView1 = New DevExpress.XtraGrid.Views.Grid.GridView() CType(Me.dgvPlaceholders, System.ComponentModel.ISupportInitialize).BeginInit() - CType(Me.dgvResult, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.RepositoryItemLookUpEdit3, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.RepositoryItemComboBox1, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.RepositoryItemLookUpEdit1, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.RepositoryItemLookUpEdit2, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.GridView1, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'Label14 ' Me.Label14.AutoSize = True Me.Label14.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label14.Location = New System.Drawing.Point(12, 7) + Me.Label14.Location = New System.Drawing.Point(746, 161) Me.Label14.Name = "Label14" Me.Label14.Size = New System.Drawing.Size(76, 16) Me.Label14.TabIndex = 83 @@ -69,9 +86,9 @@ Partial Class frmSQLDesigner Me.cmbConnection.DisplayMember = "BEZEICHNUNG" Me.cmbConnection.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.cmbConnection.FormattingEnabled = True - Me.cmbConnection.Location = New System.Drawing.Point(15, 29) + Me.cmbConnection.Location = New System.Drawing.Point(749, 183) Me.cmbConnection.Name = "cmbConnection" - Me.cmbConnection.Size = New System.Drawing.Size(171, 24) + Me.cmbConnection.Size = New System.Drawing.Size(194, 24) Me.cmbConnection.TabIndex = 82 Me.cmbConnection.ValueMember = "GUID" ' @@ -79,7 +96,7 @@ Partial Class frmSQLDesigner ' Me.Label2.AutoSize = True Me.Label2.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label2.Location = New System.Drawing.Point(500, 9) + Me.Label2.Location = New System.Drawing.Point(746, 352) Me.Label2.Name = "Label2" Me.Label2.Size = New System.Drawing.Size(112, 16) Me.Label2.TabIndex = 101 @@ -89,7 +106,7 @@ Partial Class frmSQLDesigner ' Me.cmbStatic.FormattingEnabled = True Me.cmbStatic.Items.AddRange(New Object() {"MACHINE", "DOMAIN"}) - Me.cmbStatic.Location = New System.Drawing.Point(503, 28) + Me.cmbStatic.Location = New System.Drawing.Point(749, 373) Me.cmbStatic.Name = "cmbStatic" Me.cmbStatic.Size = New System.Drawing.Size(194, 25) Me.cmbStatic.TabIndex = 100 @@ -97,7 +114,7 @@ Partial Class frmSQLDesigner 'btnAddStatic ' Me.btnAddStatic.Image = CType(resources.GetObject("btnAddStatic.Image"), System.Drawing.Image) - Me.btnAddStatic.Location = New System.Drawing.Point(703, 28) + Me.btnAddStatic.Location = New System.Drawing.Point(946, 373) Me.btnAddStatic.Name = "btnAddStatic" Me.btnAddStatic.Size = New System.Drawing.Size(32, 23) Me.btnAddStatic.TabIndex = 102 @@ -106,7 +123,7 @@ Partial Class frmSQLDesigner 'btnAddUser ' Me.btnAddUser.Image = CType(resources.GetObject("btnAddUser.Image"), System.Drawing.Image) - Me.btnAddUser.Location = New System.Drawing.Point(942, 29) + Me.btnAddUser.Location = New System.Drawing.Point(946, 324) Me.btnAddUser.Name = "btnAddUser" Me.btnAddUser.Size = New System.Drawing.Size(32, 23) Me.btnAddUser.TabIndex = 105 @@ -116,7 +133,7 @@ Partial Class frmSQLDesigner ' Me.Label3.AutoSize = True Me.Label3.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label3.Location = New System.Drawing.Point(739, 10) + Me.Label3.Location = New System.Drawing.Point(746, 305) Me.Label3.Name = "Label3" Me.Label3.Size = New System.Drawing.Size(99, 16) Me.Label3.TabIndex = 104 @@ -126,7 +143,7 @@ Partial Class frmSQLDesigner ' Me.cmbUser.FormattingEnabled = True Me.cmbUser.Items.AddRange(New Object() {"PRENAME", "SURNAME", "SHORTNAME", "LANGUAGE", "EMAIL", "USER_ID"}) - Me.cmbUser.Location = New System.Drawing.Point(742, 29) + Me.cmbUser.Location = New System.Drawing.Point(749, 324) Me.cmbUser.Name = "cmbUser" Me.cmbUser.Size = New System.Drawing.Size(194, 25) Me.cmbUser.TabIndex = 103 @@ -134,7 +151,7 @@ Partial Class frmSQLDesigner 'btnAddAttributeMan ' Me.btnAddAttributeMan.Image = CType(resources.GetObject("btnAddAttributeMan.Image"), System.Drawing.Image) - Me.btnAddAttributeMan.Location = New System.Drawing.Point(448, 29) + Me.btnAddAttributeMan.Location = New System.Drawing.Point(946, 229) Me.btnAddAttributeMan.Name = "btnAddAttributeMan" Me.btnAddAttributeMan.Size = New System.Drawing.Size(32, 23) Me.btnAddAttributeMan.TabIndex = 108 @@ -144,7 +161,7 @@ Partial Class frmSQLDesigner ' Me.lblAttributeMan.AutoSize = True Me.lblAttributeMan.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.lblAttributeMan.Location = New System.Drawing.Point(247, 10) + Me.lblAttributeMan.Location = New System.Drawing.Point(746, 210) Me.lblAttributeMan.Name = "lblAttributeMan" Me.lblAttributeMan.Size = New System.Drawing.Size(105, 16) Me.lblAttributeMan.TabIndex = 107 @@ -153,7 +170,7 @@ Partial Class frmSQLDesigner 'cmbAttributeMan ' Me.cmbAttributeMan.FormattingEnabled = True - Me.cmbAttributeMan.Location = New System.Drawing.Point(250, 28) + Me.cmbAttributeMan.Location = New System.Drawing.Point(749, 229) Me.cmbAttributeMan.Name = "cmbAttributeMan" Me.cmbAttributeMan.Size = New System.Drawing.Size(194, 25) Me.cmbAttributeMan.TabIndex = 106 @@ -162,48 +179,29 @@ Partial Class frmSQLDesigner ' Me.SQL_COMMANDTextBox.AcceptsReturn = True Me.SQL_COMMANDTextBox.AcceptsTab = True - Me.SQL_COMMANDTextBox.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.SQL_COMMANDTextBox.Font = New System.Drawing.Font("Courier New", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.SQL_COMMANDTextBox.Location = New System.Drawing.Point(15, 109) + Me.SQL_COMMANDTextBox.Location = New System.Drawing.Point(12, 184) Me.SQL_COMMANDTextBox.Multiline = True Me.SQL_COMMANDTextBox.Name = "SQL_COMMANDTextBox" Me.SQL_COMMANDTextBox.ScrollBars = System.Windows.Forms.ScrollBars.Vertical - Me.SQL_COMMANDTextBox.Size = New System.Drawing.Size(959, 254) + Me.SQL_COMMANDTextBox.Size = New System.Drawing.Size(728, 212) Me.SQL_COMMANDTextBox.TabIndex = 110 ' 'Label4 ' Me.Label4.AutoSize = True - Me.Label4.Location = New System.Drawing.Point(12, 86) + Me.Label4.Location = New System.Drawing.Point(12, 164) Me.Label4.Name = "Label4" Me.Label4.Size = New System.Drawing.Size(99, 17) Me.Label4.TabIndex = 109 Me.Label4.Text = "SQL-Command:" ' - 'btnTestSQL - ' - Me.btnTestSQL.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), 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)) - Me.btnTestSQL.Image = CType(resources.GetObject("btnTestSQL.Image"), System.Drawing.Image) - Me.btnTestSQL.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.btnTestSQL.ImeMode = System.Windows.Forms.ImeMode.NoControl - Me.btnTestSQL.Location = New System.Drawing.Point(806, 369) - Me.btnTestSQL.Name = "btnTestSQL" - Me.btnTestSQL.Size = New System.Drawing.Size(168, 29) - Me.btnTestSQL.TabIndex = 111 - Me.btnTestSQL.Text = "Teste SQL-Command" - Me.btnTestSQL.TextAlign = System.Drawing.ContentAlignment.MiddleRight - Me.btnTestSQL.UseVisualStyleBackColor = True - ' '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.ImeMode = System.Windows.Forms.ImeMode.NoControl - Me.Label1.Location = New System.Drawing.Point(12, 386) + Me.Label1.Location = New System.Drawing.Point(9, 401) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(65, 15) Me.Label1.TabIndex = 113 @@ -213,15 +211,14 @@ Partial Class frmSQLDesigner ' Me.dgvPlaceholders.AllowUserToAddRows = False 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) + DataGridViewCellStyle4.BackColor = System.Drawing.Color.Cyan + Me.dgvPlaceholders.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle4 Me.dgvPlaceholders.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.dgvPlaceholders.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.colPlaceholder, Me.colReplace}) Me.dgvPlaceholders.Enabled = False - Me.dgvPlaceholders.Location = New System.Drawing.Point(15, 404) + Me.dgvPlaceholders.Location = New System.Drawing.Point(12, 419) Me.dgvPlaceholders.Name = "dgvPlaceholders" - Me.dgvPlaceholders.Size = New System.Drawing.Size(338, 133) + Me.dgvPlaceholders.Size = New System.Drawing.Size(258, 133) Me.dgvPlaceholders.TabIndex = 112 ' 'colPlaceholder @@ -237,56 +234,19 @@ Partial Class frmSQLDesigner ' '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.ImeMode = System.Windows.Forms.ImeMode.NoControl - Me.Label5.Location = New System.Drawing.Point(419, 386) + Me.Label5.Location = New System.Drawing.Point(284, 401) Me.Label5.Name = "Label5" Me.Label5.Size = New System.Drawing.Size(55, 15) Me.Label5.TabIndex = 115 Me.Label5.Text = "Ergebnis:" ' - 'dgvResult - ' - Me.dgvResult.AllowUserToAddRows = False - Me.dgvResult.AllowUserToDeleteRows = False - DataGridViewCellStyle2.BackColor = System.Drawing.Color.Cyan - Me.dgvResult.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle2 - Me.dgvResult.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _ - Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.dgvResult.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize - Me.dgvResult.Location = New System.Drawing.Point(422, 404) - Me.dgvResult.Name = "dgvResult" - Me.dgvResult.ReadOnly = True - Me.dgvResult.Size = New System.Drawing.Size(552, 134) - Me.dgvResult.TabIndex = 114 - ' - 'lblSaveFinalIndex - ' - Me.lblSaveFinalIndex.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) - Me.lblSaveFinalIndex.AutoSize = True - Me.lblSaveFinalIndex.BackColor = System.Drawing.Color.Yellow - Me.lblSaveFinalIndex.Location = New System.Drawing.Point(419, 541) - Me.lblSaveFinalIndex.Name = "lblSaveFinalIndex" - Me.lblSaveFinalIndex.Size = New System.Drawing.Size(46, 17) - Me.lblSaveFinalIndex.TabIndex = 116 - Me.lblSaveFinalIndex.Text = "Label4" - Me.lblSaveFinalIndex.Visible = False - ' - 'SimpleButton1 - ' - Me.SimpleButton1.ImageOptions.SvgImage = CType(resources.GetObject("SimpleButton1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) - Me.SimpleButton1.Location = New System.Drawing.Point(820, 544) - Me.SimpleButton1.Name = "SimpleButton1" - Me.SimpleButton1.Size = New System.Drawing.Size(154, 35) - Me.SimpleButton1.TabIndex = 117 - Me.SimpleButton1.Text = "Übernehmen" - ' 'btnAddAttributeAuto ' Me.btnAddAttributeAuto.Image = CType(resources.GetObject("btnAddAttributeAuto.Image"), System.Drawing.Image) - Me.btnAddAttributeAuto.Location = New System.Drawing.Point(448, 79) + Me.btnAddAttributeAuto.Location = New System.Drawing.Point(946, 277) Me.btnAddAttributeAuto.Name = "btnAddAttributeAuto" Me.btnAddAttributeAuto.Size = New System.Drawing.Size(32, 23) Me.btnAddAttributeAuto.TabIndex = 120 @@ -295,7 +255,7 @@ Partial Class frmSQLDesigner 'cmbAttributeAuto ' Me.cmbAttributeAuto.FormattingEnabled = True - Me.cmbAttributeAuto.Location = New System.Drawing.Point(250, 78) + Me.cmbAttributeAuto.Location = New System.Drawing.Point(749, 277) Me.cmbAttributeAuto.Name = "cmbAttributeAuto" Me.cmbAttributeAuto.Size = New System.Drawing.Size(194, 25) Me.cmbAttributeAuto.TabIndex = 118 @@ -303,27 +263,150 @@ Partial Class frmSQLDesigner 'lblAttributeAuto ' Me.lblAttributeAuto.AutoSize = True - Me.lblAttributeAuto.Location = New System.Drawing.Point(247, 58) + Me.lblAttributeAuto.Location = New System.Drawing.Point(746, 257) Me.lblAttributeAuto.Name = "lblAttributeAuto" Me.lblAttributeAuto.Size = New System.Drawing.Size(89, 17) Me.lblAttributeAuto.TabIndex = 121 Me.lblAttributeAuto.Text = "Attribute Auto" ' + 'RibbonControl1 + ' + Me.RibbonControl1.AutoSizeItems = True + Me.RibbonControl1.ExpandCollapseItem.Id = 0 + Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItem1, Me.BarEditItem1, Me.bsiInfo, Me.BarButtonItem2}) + Me.RibbonControl1.Location = New System.Drawing.Point(0, 0) + Me.RibbonControl1.MaxItemId = 8 + Me.RibbonControl1.Name = "RibbonControl1" + Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1}) + Me.RibbonControl1.RepositoryItems.AddRange(New DevExpress.XtraEditors.Repository.RepositoryItem() {Me.RepositoryItemComboBox1, Me.RepositoryItemLookUpEdit1, Me.RepositoryItemLookUpEdit2, Me.RepositoryItemLookUpEdit3}) + Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False] + Me.RibbonControl1.Size = New System.Drawing.Size(995, 158) + Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1 + ' + 'BarButtonItem1 + ' + Me.BarButtonItem1.Caption = "Testen" + Me.BarButtonItem1.Id = 3 + Me.BarButtonItem1.ImageOptions.Image = CType(resources.GetObject("BarButtonItem1.ImageOptions.Image"), System.Drawing.Image) + Me.BarButtonItem1.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem1.ImageOptions.LargeImage"), System.Drawing.Image) + Me.BarButtonItem1.ItemInMenuAppearance.Hovered.BackColor = System.Drawing.Color.NavajoWhite + Me.BarButtonItem1.ItemInMenuAppearance.Hovered.Options.UseBackColor = True + Me.BarButtonItem1.Name = "BarButtonItem1" + Me.BarButtonItem1.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.Large + ' + 'BarEditItem1 + ' + Me.BarEditItem1.Caption = "Verbindung" + Me.BarEditItem1.Edit = Me.RepositoryItemLookUpEdit3 + Me.BarEditItem1.EditWidth = 100 + Me.BarEditItem1.Id = 4 + Me.BarEditItem1.Name = "BarEditItem1" + Me.BarEditItem1.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.Large + ' + 'RepositoryItemLookUpEdit3 + ' + Me.RepositoryItemLookUpEdit3.AutoHeight = False + Me.RepositoryItemLookUpEdit3.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)}) + Me.RepositoryItemLookUpEdit3.Name = "RepositoryItemLookUpEdit3" + ' + 'bsiInfo + ' + Me.bsiInfo.Id = 6 + Me.bsiInfo.ItemAppearance.Normal.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.bsiInfo.ItemAppearance.Normal.Options.UseFont = True + Me.bsiInfo.Name = "bsiInfo" + ' + 'BarButtonItem2 + ' + Me.BarButtonItem2.Caption = "Speichern" + Me.BarButtonItem2.Id = 7 + Me.BarButtonItem2.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) + Me.BarButtonItem2.ItemAppearance.Hovered.BackColor = System.Drawing.Color.PaleGoldenrod + Me.BarButtonItem2.ItemAppearance.Hovered.Options.UseBackColor = True + Me.BarButtonItem2.Name = "BarButtonItem2" + ' + 'RibbonPage1 + ' + Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup2}) + Me.RibbonPage1.Name = "RibbonPage1" + Me.RibbonPage1.Text = "RibbonPage1" + ' + 'RibbonPageGroup1 + ' + Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem1) + Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem2) + Me.RibbonPageGroup1.Name = "RibbonPageGroup1" + Me.RibbonPageGroup1.Text = "Aktionen" + ' + 'RibbonPageGroup2 + ' + Me.RibbonPageGroup2.ItemLinks.Add(Me.BarEditItem1) + Me.RibbonPageGroup2.Name = "RibbonPageGroup2" + Me.RibbonPageGroup2.Text = "RibbonPageGroup2" + ' + 'RepositoryItemComboBox1 + ' + Me.RepositoryItemComboBox1.AutoHeight = False + Me.RepositoryItemComboBox1.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)}) + Me.RepositoryItemComboBox1.Name = "RepositoryItemComboBox1" + ' + 'RepositoryItemLookUpEdit1 + ' + Me.RepositoryItemLookUpEdit1.AutoHeight = False + Me.RepositoryItemLookUpEdit1.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)}) + Me.RepositoryItemLookUpEdit1.Name = "RepositoryItemLookUpEdit1" + ' + 'RepositoryItemLookUpEdit2 + ' + Me.RepositoryItemLookUpEdit2.AutoHeight = False + Me.RepositoryItemLookUpEdit2.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)}) + Me.RepositoryItemLookUpEdit2.Name = "RepositoryItemLookUpEdit2" + ' + 'RibbonStatusBar1 + ' + Me.RibbonStatusBar1.ItemLinks.Add(Me.bsiInfo) + Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 564) + Me.RibbonStatusBar1.Name = "RibbonStatusBar1" + Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1 + Me.RibbonStatusBar1.Size = New System.Drawing.Size(995, 24) + ' + 'RibbonPage2 + ' + Me.RibbonPage2.Name = "RibbonPage2" + Me.RibbonPage2.Text = "RibbonPage2" + ' + 'GridControl1 + ' + Me.GridControl1.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.GridControl1.EmbeddedNavigator.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) + Me.GridControl1.Location = New System.Drawing.Point(287, 419) + Me.GridControl1.MainView = Me.GridView1 + Me.GridControl1.MenuManager = Me.RibbonControl1 + Me.GridControl1.Name = "GridControl1" + Me.GridControl1.Size = New System.Drawing.Size(691, 133) + Me.GridControl1.TabIndex = 124 + Me.GridControl1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView1}) + ' + 'GridView1 + ' + Me.GridView1.GridControl = Me.GridControl1 + Me.GridView1.Name = "GridView1" + ' 'frmSQLDesigner ' + Me.Appearance.Options.UseFont = True Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 17.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(995, 588) + Me.Controls.Add(Me.GridControl1) Me.Controls.Add(Me.lblAttributeAuto) Me.Controls.Add(Me.btnAddAttributeAuto) Me.Controls.Add(Me.cmbAttributeAuto) - Me.Controls.Add(Me.SimpleButton1) - Me.Controls.Add(Me.lblSaveFinalIndex) Me.Controls.Add(Me.Label5) - Me.Controls.Add(Me.dgvResult) Me.Controls.Add(Me.Label1) Me.Controls.Add(Me.dgvPlaceholders) - Me.Controls.Add(Me.btnTestSQL) Me.Controls.Add(Me.SQL_COMMANDTextBox) Me.Controls.Add(Me.Label4) Me.Controls.Add(Me.btnAddAttributeMan) @@ -337,14 +420,24 @@ Partial Class frmSQLDesigner Me.Controls.Add(Me.cmbStatic) Me.Controls.Add(Me.Label14) Me.Controls.Add(Me.cmbConnection) + Me.Controls.Add(Me.RibbonStatusBar1) + Me.Controls.Add(Me.RibbonControl1) 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.IconOptions.Icon = CType(resources.GetObject("frmSQLDesigner.IconOptions.Icon"), System.Drawing.Icon) Me.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.MinimizeBox = False Me.Name = "frmSQLDesigner" + Me.Ribbon = Me.RibbonControl1 + Me.StatusBar = Me.RibbonStatusBar1 Me.Text = "SQL Designer" CType(Me.dgvPlaceholders, System.ComponentModel.ISupportInitialize).EndInit() - CType(Me.dgvResult, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.RepositoryItemLookUpEdit3, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.RepositoryItemComboBox1, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.RepositoryItemLookUpEdit1, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.RepositoryItemLookUpEdit2, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.GridView1, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() @@ -363,16 +456,28 @@ Partial Class frmSQLDesigner Friend WithEvents cmbAttributeMan As ComboBox Friend WithEvents SQL_COMMANDTextBox As TextBox Friend WithEvents Label4 As Label - Friend WithEvents btnTestSQL As Button Friend WithEvents Label1 As Label Friend WithEvents dgvPlaceholders As DataGridView Friend WithEvents colPlaceholder As DataGridViewTextBoxColumn Friend WithEvents colReplace As DataGridViewTextBoxColumn Friend WithEvents Label5 As Label - Friend WithEvents dgvResult As DataGridView - Friend WithEvents lblSaveFinalIndex As Label - Friend WithEvents SimpleButton1 As DevExpress.XtraEditors.SimpleButton Friend WithEvents btnAddAttributeAuto As Button Friend WithEvents cmbAttributeAuto As ComboBox Friend WithEvents lblAttributeAuto As Label + 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 RibbonPageGroup2 As DevExpress.XtraBars.Ribbon.RibbonPageGroup + Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar + Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage + Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem + Friend WithEvents BarEditItem1 As DevExpress.XtraBars.BarEditItem + Friend WithEvents RepositoryItemLookUpEdit2 As DevExpress.XtraEditors.Repository.RepositoryItemLookUpEdit + Friend WithEvents RepositoryItemComboBox1 As DevExpress.XtraEditors.Repository.RepositoryItemComboBox + Friend WithEvents RepositoryItemLookUpEdit1 As DevExpress.XtraEditors.Repository.RepositoryItemLookUpEdit + Friend WithEvents RepositoryItemLookUpEdit3 As DevExpress.XtraEditors.Repository.RepositoryItemLookUpEdit + Friend WithEvents GridControl1 As DevExpress.XtraGrid.GridControl + Friend WithEvents GridView1 As DevExpress.XtraGrid.Views.Grid.GridView + Friend WithEvents bsiInfo As DevExpress.XtraBars.BarStaticItem + Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem End Class diff --git a/GUIs.ZooFlow/Administration/frmSQLDesigner.resx b/GUIs.ZooFlow/Administration/frmSQLDesigner.resx index cf52f84f..a84dcf64 100644 --- a/GUIs.ZooFlow/Administration/frmSQLDesigner.resx +++ b/GUIs.ZooFlow/Administration/frmSQLDesigner.resx @@ -140,15 +140,6 @@ xAAADsQBlSsOGwAAAFxJREFUOE/NjFEKgDAMQ3e23v88/Y1YOslqhE1hGHgfS5fXAHxCliuMD4q7o5Kn yJTAzC72CM5PTBUwfXMT8OiJnwuYOmL6ZhBwlCBPkT2CSp4iUvAGWa4gy3nQDiNEflNl/3oXAAAAAElF TkSuQmCC - - - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - wwAADsMBx2+oZAAAAKhJREFUOE+dkb0RAiEQhSnFIgyMyckNLMI6zB0zS0FruBKugdMACFdWecoBw49v - 5ku43W8eh7DWkmcxxhzFP2HB4bqnaZ7IS27OuU341BcW7E7bN5f7ebxNLGCG26QCENo0qQq01qSUIill - kaIAV+Dz0lJMJkhr89BjeRZZCeIfh8UamcDzfbphQRoIMITKYFhQoykogUUQ1n7pFYTxPBDUaAp6+EwL - 8QKzYQ6as7QBdAAAAABJRU5ErkJggg== @@ -157,27 +148,6 @@ True - - - - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 - LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl - dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAOsCAAAC77u/ - PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi - IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv - MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh - Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg - MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9Cgku - WWVsbG93e2ZpbGw6I0ZGQjExNTt9CgkuQmx1ZXtmaWxsOiMxMTc3RDc7fQoJLkdyZWVue2ZpbGw6IzAz - OUMyMzt9CgkuUmVke2ZpbGw6I0QxMUMxQzt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh - Y2l0eTowLjc1O30KCS5zdDF7b3BhY2l0eTowLjU7fQoJLnN0MntvcGFjaXR5OjAuMjU7fQo8L3N0eWxl - Pg0KICA8ZyBpZD0iRXhwb3J0Ij4NCiAgICA8cGF0aCBkPSJNMTAsMTJINlY2aDRWMTJ6IE0yMiwxMnY2 - djljMCwwLjYtMC40LDEtMSwxSDFjLTAuNiwwLTEtMC40LTEtMVY3YzAtMC42LDAuNC0xLDEtMWgzdjho - MTR2LTJIMjJ6IE0xOCwxOEg0ICAgdjZoMTRWMTh6IiBjbGFzcz0iQmxhY2siIC8+DQogICAgPHBvbHln - b24gcG9pbnRzPSIxNiwxMCAyNCwxMCAyNCwxNCAzMiw4IDI0LDIgMjQsNiAxNiw2ICAiIGNsYXNzPSJH - cmVlbiIgLz4NCiAgPC9nPg0KPC9zdmc+Cw== - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO @@ -186,7 +156,71 @@ TkSuQmCC - + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAARdEVYdFRpdGxlAFBsYXk7U3RhcnQ7XWFAegAAAfdJ + REFUOE9joBqYsdOPfepWHyMol3TQvNBZcOo2n39Ttnovn7DBSx4qTDzIbTUXmbTZ9//2C13/J27y+j5h + o2dvxwo3Qag0YZBQZiDWs87j/6P3B/5ffLbo/9qTNf971ri/7V7lVlo51ZYdqgw3iC3WE2tf6fr/yvNl + /08+7P9/+tHE/0fuTPm/9FDJ//blLnfbljlHuYQoMUGVY4LIfB2x5iVO/089nPJ/y5W0/0futf8/8aAP + jLdfavs/a0fa/6aFjica5zs4QrWggrAsbbG6eQ7/j9zt/L/6fMT/Necj/2+7mvf/4J1WoFgXGK88XvV/ + wtro/9Uz7KKh2hAgKF1TrGKm7f89N2r+Lz8TjILXnI/5P/dAyv+2FUH/SydbHUlvMtEGamGE6IQCv2R1 + seLJVkDnF/xfdNIPjqfvD/3ftNz3f36P+Z2IfJ14oFIBIGYFYlQDvONVxfL7LP6vOZf8f94xz/+zDwX+ + b1jm/T+n0/RVdIluuZAYpyRQGTcQY2oGAY9oZbGsTtP/i06E/a9d6vY/o9X4a0ypbr+qvpASUJoHiEEa + cceCa4SiWFqL0f/UBoM/MaU6y0ydJQ2AwnxAzAbEII2YtiID10hF0dgKnZ32gXKgaOIHYlDiYQZi/BqR + AAsQcwExJ5RNtEYYAGkg7FQUwMAAAKo13SoioekfAAAAAElFTkSuQmCC + + + + + iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAARdEVYdFRpdGxlAFBsYXk7U3RhcnQ7XWFAegAAA/pJ + REFUWEfFln1QVFUchjXjmkw26R+W6X81fcwYojaxaoEps/KxJo3rR9mYaBI4mlqOTSjJsLK4JAiIuK4f + 6+KCkQKrQhgzrZmCsHy51oiRIK5m6DhZNs40zdjb755uTOecS4Mwa8/MO8N97jnnvfdcdu8OAfC/Rl8G + EalLFEwGEalLFEwGEalLFEwGEalLFEzyDLV/+XrFjuPxY7XjQSF1iYJJnmH2E3NA+XlnVfy7prefe0jz + A0LqEgWTPCE7vzChvssNx9crUFht8uYfjXtaO3ffSF2iYJJH2XE8Djd/8+PK7SYc9m0CHd/N98Suf98a + 8bA2pt9IXaJgkkfJ88Si504L/Nf3ofNWNZqulMPhTcb2ytjm7M+M4dq4fiF1iYJJHiWnfDau/9qI5kAB + y4WeUgRun4Wn2QI698e2I8YtG3dFPqKN/0+kLlEwyaNkf27E1V/OwBfI59J+4wj8P1Zh91crYSszXrSW + REdqc/pE6hIFkzxKVmk0um7VorF7u5TWqw5cvFGBYy020Lh7me5ZRWmOqMe0uRJSlyiY5FG2HJyJc9dc + qOuyof5yjm7U8xd6arDfuxqW4pmBDNdr8dp8DqlLFEzyKOnOGfB1F+Lo+WU43ZmFus5s3Zy9nAv/tWJU + t+Xg04qF2Lw/qjTV/uoYbR2G1CUKJnmUtD2RVLANZS0LUN62BN7vN+P0JVufaewuQvtPlSiqWQaae5PW + 6P3ykrpEwSSP8rH9FZzssKC0eZ4WMzzn34O3IwOnfsjqzTeXttJHdDc9Djdcp9aC5t1bXzDNSWsM+3up + AV7AhsJpqG1PhduXwKXE9wYOty5B1bdr6AK2oiXgRLXfStu/COtyDd+ZU14w0fxHKYO7gA/yDFSyDq6G + OVJKfGZ6LMvhOZeC9DIjFUfcSdwY/knoyBD12Y+gqN+WQ9WFVKQuUTDJo6zJeRmVbclw1sdxOdT0Jipa + k2A7ZgKN+TMpY3Ll1JjxL9Ic9a5DKNKLS+oSBZM8yirbS/QPuBR762JYXA0J7Nh+ch42HIhCSubkjoQV + z5pp7OOU4RR1y3vv+t9IXaJgkkdJsU6Bu3Eh9pyZjQP1c1HcYEbqwRlIzpxy960PJ1hHPzHiSRoXSuG2 + Ww+pSxRM8ihJlklw1iVQ5sJSPgurCgx4JzWsxhAzbhKdH0nR3W49pC5RMMmjLE8PR15tNNY6pmPppond + 8YnPLCY/iqK+gPrcbj2kLlEwyaMkpoVRcdjv81c/nztmfOg4cv3abj2kLlEwyROy+KMJJyJinjLQ3+pL + RqEM+GeZ1CUKJnnULVY/z/e93XpIXaJgkkctVO94UMX/IHWJgskgInWJgskgInWJ4kFHVz64YMhfkU05 + On2zdlYAAAAASUVORK5CYII= + + + + + + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 + LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl + dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAANwDAAAC77u/ + PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi + IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv + MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh + Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg + MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLlllbGxvd3tmaWxsOiNGRkIxMTU7fQoJ + LlJlZHtmaWxsOiNEMTFDMUM7fQoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5HcmVlbntmaWxsOiMwMzlD + MjM7fQoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh + Y2l0eTowLjU7fQoJLnN0MXtkaXNwbGF5Om5vbmU7fQoJLnN0MntkaXNwbGF5OmlubGluZTtmaWxsOiMw + MzlDMjM7fQoJLnN0M3tkaXNwbGF5OmlubGluZTtmaWxsOiNEMTFDMUM7fQoJLnN0NHtkaXNwbGF5Omlu + bGluZTtmaWxsOiM3MjcyNzI7fQo8L3N0eWxlPg0KICA8ZyBpZD0iU2F2ZUFzIj4NCiAgICA8cGF0aCBk + PSJNMTYsOWMwLTEuMSwwLjItMi4xLDAuNS0zSDh2OGg5LjVDMTYuNiwxMi42LDE2LDEwLjksMTYsOXog + TTEyLDEyaC0yVjhoMlYxMnogTTI2LDE4djExYzAsMC42LTAuNCwxLTEsMUgzICAgYy0wLjYsMC0xLTAu + NC0xLTFWN2MwLTAuNiwwLjQtMSwxLTFoM3YxMGgxMy4zYzAuMiwwLjIsMC40LDAuMywwLjcsMC41VjIw + SDZ2NmgxNnYtOEgyNnoiIGNsYXNzPSJCbGFjayIgLz4NCiAgICA8cGF0aCBkPSJNMjUsMmMtMy45LDAt + NywzLjEtNyw3YzAsMy45LDMuMSw3LDcsN3M3LTMuMSw3LTdDMzIsNS4xLDI4LjksMiwyNSwyeiBNMjIs + MTBoLTJWOGgyVjEweiBNMjYsMTBoLTJWOGgyVjEweiAgICBNMjgsMTBWOGgydjJIMjh6IiBjbGFzcz0i + R3JlZW4iIC8+DQogIDwvZz4NCjwvc3ZnPgs= + + + AAABAAMAICAQAAEABADoAgAANgAAACAgAAABAAgAqAgAAB4DAAAgIAAAAQAgAKgQAADGCwAAKAAAACAA AABAAAAAAQAEAAAAAAAAAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAAAIAAAACAgACAAAAAgACAAICA diff --git a/GUIs.ZooFlow/Administration/frmSQLDesigner.vb b/GUIs.ZooFlow/Administration/frmSQLDesigner.vb index e24d4dbd..9d91e330 100644 --- a/GUIs.ZooFlow/Administration/frmSQLDesigner.vb +++ b/GUIs.ZooFlow/Administration/frmSQLDesigner.vb @@ -1,4 +1,6 @@ -Imports DigitalData.Modules.Database +Imports DevExpress.XtraEditors +Imports DevExpress.XtraEditors.Repository +Imports DigitalData.Modules.Database Public Class frmSQLDesigner Dim CurrentPosition As Integer = 0 @@ -23,10 +25,16 @@ Public Class frmSQLDesigner Public Property ConnectionID Public AutoAttributID Public Property DesignType As String + Private IndicesMan As New List(Of Indice_Man)() + Public Class Indice_Man + Public Property ID() As Integer + Public Property Indice_name() As String + + End Class Private Sub frmSQLDesigner_Load(sender As Object, e As EventArgs) Handles Me.Load Dim oSQL - lblSaveFinalIndex.Visible = False + bsiInfo.Visibility = DevExpress.XtraBars.BarItemVisibility.Never If DesignType = "GI_ATTRIBUTE_MAN" Then EnDisable_Man_Attribute(False) @@ -49,11 +57,31 @@ Public Class frmSQLDesigner 'btnShowConnections.Enabled = False Else cmbConnection.Enabled = True - oSQL = "SELECT * FROM TBDD_CONNECTION WHERE AKTIV = 1" + oSQL = "SELECT GUID, Bezeichnung FROM TBDD_CONNECTION WHERE AKTIV = 1" Dim oDT As DataTable = My.DatabaseECM.GetDatatable(oSQL) cmbConnection.DataSource = oDT cmbConnection.DisplayMember = oDT.Columns("Bezeichnung").ColumnName cmbConnection.ValueMember = oDT.Columns("GUID").ColumnName + + + IndicesMan.Add(New Indice_Man() With {.ID = 1, .Indice_name = "Manually"}) + + 'bind the lookup editor to the list + Dim oLU As RepositoryItemLookUpEdit = RepositoryItemLookUpEdit3 + oLU.DataSource = oDT + + oLU.DisplayMember = oDT.Columns("Bezeichnung").ColumnName + oLU.ValueMember = oDT.Columns("GUID").ColumnName + ' Enable the "best-fit" functionality mode in which columns have proportional widths and the popup window is resized to fit all the columns. + oLU.BestFitMode = DevExpress.XtraEditors.Controls.BestFitMode.BestFitResizePopup + ' Specify the dropdown height. + oLU.DropDownRows = oDT.Rows.Count + + ' Enable the automatic completion feature. In this mode, when the dropdown is closed, + ' the text in the edit box is automatically completed if it matches a DisplayMember field value of one of dropdown rows. + oLU.SearchMode = DevExpress.XtraEditors.Controls.SearchMode.AutoComplete + ' Specify the column against which an incremental search is performed in SearchMode.AutoComplete and SearchMode.OnlyInPopup modes + oLU.AutoSearchColumnIndex = 1 If Not IsNothing(ConnectionID) Then If IsNumeric(ConnectionID) Then cmbConnection.SelectedValue = ConnectionID @@ -111,46 +139,6 @@ Public Class frmSQLDesigner SQL_COMMANDTextBox.SelectionStart = altePosition + str.Length End Sub - Private Sub btnTestSQL_Click(sender As Object, e As EventArgs) Handles btnTestSQL.Click - Try - Dim query As String = SQL_COMMANDTextBox.Text - - For Each row As DataGridViewRow In dgvPlaceholders.Rows - Dim placeholder As String = row.Cells(0).Value - Dim replacement As String = row.Cells(1).Value - - ' Wenn Ersetzung ausgefüllt wurde, Platzhalter damit ersetzen - If Not String.IsNullOrEmpty(replacement) Then - Dim pattern As New clsPatterns.Pattern(placeholder) - - query = clsPatterns.ReplacePattern(query, pattern.Type, replacement) - Else - MsgBox("Bitte geben Sie für den Platzhalter " & placeholder & " einen Wert an!", MsgBoxStyle.Exclamation, "Fehlende Platzhalter Ersetzung") - Exit Sub - End If - Next - MsgBox(cmbConnection.SelectedValue) - Dim oconString = My.DatabaseECM.Get_ConnectionStringforID(cmbConnection.SelectedValue) - MsgBox(oconString) - Dim decryptedConString = MSSQLServer.DecryptConnectionString(oconString) - MsgBox(decryptedConString) - Dim oDT = My.DatabaseECM.GetDatatableWithConnection(query, decryptedConString) - - - If oDT IsNot Nothing Then - dgvResult.DataSource = oDT - End If - Catch ex As Exception - MsgBox(ex.Message, MsgBoxStyle.Critical) - End Try - - End Sub - - Private Sub SimpleButton1_Click(sender As Object, e As EventArgs) Handles SimpleButton1.Click - SQLCommand = SQL_COMMANDTextBox.Text - ConnectionID = cmbConnection.SelectedValue - Me.Close() - End Sub Private Sub btnAddAttributeMan_Click(sender As Object, e As EventArgs) Handles btnAddAttributeMan.Click If cmbAttributeMan.SelectedIndex <> -1 Then @@ -172,4 +160,49 @@ Public Class frmSQLDesigner InsertAtSelection(value) End If End Sub + + Private Sub BarButtonItem1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem1.ItemClick + Try + Dim query As String = SQL_COMMANDTextBox.Text + + For Each row As DataGridViewRow In dgvPlaceholders.Rows + Dim placeholder As String = row.Cells(0).Value + Dim replacement As String = row.Cells(1).Value + + ' Wenn Ersetzung ausgefüllt wurde, Platzhalter damit ersetzen + If Not String.IsNullOrEmpty(replacement) Then + Dim pattern As New clsPatterns.Pattern(placeholder) + + query = clsPatterns.ReplacePattern(query, pattern.Type, replacement) + Else + MsgBox("Bitte geben Sie für den Platzhalter " & placeholder & " einen Wert an!", MsgBoxStyle.Exclamation, "Fehlende Platzhalter Ersetzung") + Exit Sub + End If + Next + 'MsgBox(cmbConnection.SelectedValue) + Dim oconString = My.DatabaseECM.Get_ConnectionStringforID(cmbConnection.SelectedValue) + 'MsgBox(oconString) + Dim decryptedConString = MSSQLServer.DecryptConnectionString(oconString) + 'MsgBox(decryptedConString) + Dim oDT = My.DatabaseECM.GetDatatableWithConnection(query, decryptedConString) + + + If oDT IsNot Nothing Then + GridControl1.DataSource = Nothing + GridControl1.DataSource = oDT + End If + Catch ex As Exception + MsgBox(ex.Message, MsgBoxStyle.Critical) + End Try + End Sub + + Private Sub BarButtonItem2_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem2.ItemClick + SQLCommand = SQL_COMMANDTextBox.Text + ConnectionID = cmbConnection.SelectedValue + Me.Close() + End Sub + + Private Sub Label2_Click(sender As Object, e As EventArgs) Handles Label2.Click + + End Sub End Class \ No newline at end of file diff --git a/GUIs.ZooFlow/My Project/licenses.licx b/GUIs.ZooFlow/My Project/licenses.licx index be09c0c2..aff6ebd7 100644 --- a/GUIs.ZooFlow/My Project/licenses.licx +++ b/GUIs.ZooFlow/My Project/licenses.licx @@ -1,21 +1,22 @@ -DevExpress.XtraEditors.Repository.RepositoryItemComboBox, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a -DevExpress.XtraEditors.DateEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a -DevExpress.XtraEditors.TileControl, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a -DevExpress.XtraLayout.LayoutControl, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a -DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a -DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a -DevExpress.XtraEditors.Repository.RepositoryItemDateEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a -DevExpress.XtraBars.BarManager, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a -DevExpress.XtraEditors.ButtonEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a -DevExpress.XtraEditors.LookUpEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a -DevExpress.XtraEditors.GridLookUpEdit, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a -DevExpress.XtraNavBar.NavBarControl, DevExpress.XtraNavBar.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a -DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a DevExpress.XtraEditors.CheckEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a -DevExpress.XtraBars.Docking.DockManager, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a -DevExpress.XtraEditors.PictureEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a -DevExpress.XtraEditors.ProgressBarControl, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a -DevExpress.XtraEditors.ComboBoxEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a -DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraEditors.Repository.RepositoryItemDateEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraEditors.DateEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a DevExpress.XtraTreeList.TreeList, DevExpress.XtraTreeList.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraEditors.ComboBoxEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraEditors.LookUpEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraNavBar.NavBarControl, DevExpress.XtraNavBar.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraEditors.ProgressBarControl, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraEditors.Repository.RepositoryItemComboBox, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraEditors.Repository.RepositoryItemLookUpEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraEditors.PictureEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraBars.Docking.DockManager, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraLayout.LayoutControl, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraEditors.ButtonEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraEditors.GridLookUpEdit, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraEditors.TileControl, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a DevExpress.XtraEditors.Repository.RepositoryItemTextEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraBars.BarManager, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a diff --git a/GUIs.ZooFlow/Search/frmFlowSearch1.Designer.vb b/GUIs.ZooFlow/Search/frmFlowSearch1.Designer.vb index 94ffb1d9..b772c87f 100644 --- a/GUIs.ZooFlow/Search/frmFlowSearch1.Designer.vb +++ b/GUIs.ZooFlow/Search/frmFlowSearch1.Designer.vb @@ -93,7 +93,7 @@ Partial Class frmFlowSearch1 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(936, 158) + Me.RibbonControl1.Size = New System.Drawing.Size(938, 158) Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1 ' 'BarButtonItem1 @@ -168,10 +168,10 @@ Partial Class frmFlowSearch1 'RibbonStatusBar1 ' Me.RibbonStatusBar1.ItemLinks.Add(Me.bsiStatus) - Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 745) + Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 580) Me.RibbonStatusBar1.Name = "RibbonStatusBar1" Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1 - Me.RibbonStatusBar1.Size = New System.Drawing.Size(936, 24) + Me.RibbonStatusBar1.Size = New System.Drawing.Size(938, 24) ' 'RibbonPage2 ' @@ -195,7 +195,7 @@ Partial Class frmFlowSearch1 Me.DockPanel1.Location = New System.Drawing.Point(0, 158) Me.DockPanel1.Name = "DockPanel1" Me.DockPanel1.OriginalSize = New System.Drawing.Size(225, 200) - Me.DockPanel1.Size = New System.Drawing.Size(225, 587) + Me.DockPanel1.Size = New System.Drawing.Size(225, 422) Me.DockPanel1.Text = "Datum" ' 'DockPanel1_Container @@ -205,7 +205,7 @@ Partial Class frmFlowSearch1 Me.DockPanel1_Container.Controls.Add(Me.cmbLimitationDateAttr) Me.DockPanel1_Container.Location = New System.Drawing.Point(3, 40) Me.DockPanel1_Container.Name = "DockPanel1_Container" - Me.DockPanel1_Container.Size = New System.Drawing.Size(218, 544) + Me.DockPanel1_Container.Size = New System.Drawing.Size(218, 379) Me.DockPanel1_Container.TabIndex = 0 ' 'XtraTabControl1 @@ -218,7 +218,7 @@ Partial Class frmFlowSearch1 Me.XtraTabControl1.Name = "XtraTabControl1" Me.XtraTabControl1.SelectedTabPage = Me.XtraTabPage1 Me.XtraTabControl1.ShowTabHeader = DevExpress.Utils.DefaultBoolean.[True] - Me.XtraTabControl1.Size = New System.Drawing.Size(203, 483) + Me.XtraTabControl1.Size = New System.Drawing.Size(203, 318) Me.XtraTabControl1.TabIndex = 10 Me.XtraTabControl1.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPage1, Me.XtraTabPage2}) ' @@ -239,7 +239,7 @@ Partial Class frmFlowSearch1 Me.XtraTabPage1.Controls.Add(Me.ToggleSwitchYear_Last) Me.XtraTabPage1.Controls.Add(Me.ToggleSwitchYear) Me.XtraTabPage1.Name = "XtraTabPage1" - Me.XtraTabPage1.Size = New System.Drawing.Size(201, 458) + Me.XtraTabPage1.Size = New System.Drawing.Size(201, 293) Me.XtraTabPage1.Text = "Standard" ' 'DateEditTill @@ -260,7 +260,7 @@ Partial Class frmFlowSearch1 Me.ToggleSwitchMonth_Last.Name = "ToggleSwitchMonth_Last" Me.ToggleSwitchMonth_Last.Properties.OffText = "Letzter Monat" Me.ToggleSwitchMonth_Last.Properties.OnText = "Letzter Monat" - Me.ToggleSwitchMonth_Last.Size = New System.Drawing.Size(195, 18) + Me.ToggleSwitchMonth_Last.Size = New System.Drawing.Size(195, 19) Me.ToggleSwitchMonth_Last.TabIndex = 9 ' 'ToggleSwitchDateto @@ -270,14 +270,14 @@ Partial Class frmFlowSearch1 Me.ToggleSwitchDateto.Name = "ToggleSwitchDateto" Me.ToggleSwitchDateto.Properties.OffText = "Datum bis" Me.ToggleSwitchDateto.Properties.OnText = "Datum bis" - Me.ToggleSwitchDateto.Size = New System.Drawing.Size(122, 18) + Me.ToggleSwitchDateto.Size = New System.Drawing.Size(122, 19) Me.ToggleSwitchDateto.TabIndex = 0 ' 'lblDatefrom ' Me.lblDatefrom.Location = New System.Drawing.Point(3, 211) Me.lblDatefrom.Name = "lblDatefrom" - Me.lblDatefrom.Size = New System.Drawing.Size(31, 13) + Me.lblDatefrom.Size = New System.Drawing.Size(34, 13) Me.lblDatefrom.TabIndex = 3 Me.lblDatefrom.Text = "Datum" ' @@ -301,7 +301,7 @@ Partial Class frmFlowSearch1 Me.ToggleSwitchMonth.Name = "ToggleSwitchMonth" Me.ToggleSwitchMonth.Properties.OffText = "Dieser Monat" Me.ToggleSwitchMonth.Properties.OnText = "Dieser Monat" - Me.ToggleSwitchMonth.Size = New System.Drawing.Size(195, 18) + Me.ToggleSwitchMonth.Size = New System.Drawing.Size(195, 19) Me.ToggleSwitchMonth.TabIndex = 8 ' 'ToggleSwitchTomorrow @@ -311,7 +311,7 @@ Partial Class frmFlowSearch1 Me.ToggleSwitchTomorrow.Name = "ToggleSwitchTomorrow" Me.ToggleSwitchTomorrow.Properties.OffText = "Morgen" Me.ToggleSwitchTomorrow.Properties.OnText = "Morgen" - Me.ToggleSwitchTomorrow.Size = New System.Drawing.Size(95, 18) + Me.ToggleSwitchTomorrow.Size = New System.Drawing.Size(95, 19) Me.ToggleSwitchTomorrow.TabIndex = 7 Me.ToggleSwitchTomorrow.Visible = False ' @@ -322,7 +322,7 @@ Partial Class frmFlowSearch1 Me.ToggleSwitchToday.Name = "ToggleSwitchToday" Me.ToggleSwitchToday.Properties.OffText = "Heute" Me.ToggleSwitchToday.Properties.OnText = "Heute" - Me.ToggleSwitchToday.Size = New System.Drawing.Size(95, 18) + Me.ToggleSwitchToday.Size = New System.Drawing.Size(95, 19) Me.ToggleSwitchToday.TabIndex = 2 ' 'ToggleSwitchLastWeek @@ -332,7 +332,7 @@ Partial Class frmFlowSearch1 Me.ToggleSwitchLastWeek.Name = "ToggleSwitchLastWeek" Me.ToggleSwitchLastWeek.Properties.OffText = "Letzten 7 Tage" Me.ToggleSwitchLastWeek.Properties.OnText = "Letzten 7 Tage" - Me.ToggleSwitchLastWeek.Size = New System.Drawing.Size(195, 18) + Me.ToggleSwitchLastWeek.Size = New System.Drawing.Size(195, 19) Me.ToggleSwitchLastWeek.TabIndex = 6 ' 'ToggleSwitchYesterday @@ -342,7 +342,7 @@ Partial Class frmFlowSearch1 Me.ToggleSwitchYesterday.Name = "ToggleSwitchYesterday" Me.ToggleSwitchYesterday.Properties.OffText = "Gestern" Me.ToggleSwitchYesterday.Properties.OnText = "Gestern" - Me.ToggleSwitchYesterday.Size = New System.Drawing.Size(95, 18) + Me.ToggleSwitchYesterday.Size = New System.Drawing.Size(95, 19) Me.ToggleSwitchYesterday.TabIndex = 3 ' 'ToggleSwitchYear_Last @@ -352,7 +352,7 @@ Partial Class frmFlowSearch1 Me.ToggleSwitchYear_Last.Name = "ToggleSwitchYear_Last" Me.ToggleSwitchYear_Last.Properties.OffText = "Letztes Jahr" Me.ToggleSwitchYear_Last.Properties.OnText = "Letztes Jahr" - Me.ToggleSwitchYear_Last.Size = New System.Drawing.Size(195, 18) + Me.ToggleSwitchYear_Last.Size = New System.Drawing.Size(195, 19) Me.ToggleSwitchYear_Last.TabIndex = 5 ' 'ToggleSwitchYear @@ -362,7 +362,7 @@ Partial Class frmFlowSearch1 Me.ToggleSwitchYear.Name = "ToggleSwitchYear" Me.ToggleSwitchYear.Properties.OffText = "Dieses Jahr" Me.ToggleSwitchYear.Properties.OnText = "Dieses Jahr" - Me.ToggleSwitchYear.Size = New System.Drawing.Size(195, 18) + Me.ToggleSwitchYear.Size = New System.Drawing.Size(195, 19) Me.ToggleSwitchYear.TabIndex = 4 ' 'XtraTabPage2 @@ -376,7 +376,7 @@ Partial Class frmFlowSearch1 Me.Label1.AutoSize = True Me.Label1.Location = New System.Drawing.Point(4, 8) Me.Label1.Name = "Label1" - Me.Label1.Size = New System.Drawing.Size(44, 13) + Me.Label1.Size = New System.Drawing.Size(47, 13) Me.Label1.TabIndex = 0 Me.Label1.Text = "Attribut" ' @@ -404,7 +404,7 @@ Partial Class frmFlowSearch1 Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.PictureEdit1.EditValue = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.ZooFlow_CW_DevExpress - Me.PictureEdit1.Location = New System.Drawing.Point(666, 516) + Me.PictureEdit1.Location = New System.Drawing.Point(666, 365) Me.PictureEdit1.MenuManager = Me.RibbonControl1 Me.PictureEdit1.Name = "PictureEdit1" Me.PictureEdit1.Properties.Appearance.BackColor = System.Drawing.SystemColors.Control @@ -413,12 +413,12 @@ Partial Class frmFlowSearch1 Me.PictureEdit1.Properties.PictureAlignment = System.Drawing.ContentAlignment.BottomRight Me.PictureEdit1.Properties.ShowCameraMenuItem = DevExpress.XtraEditors.Controls.CameraMenuItemVisibility.[Auto] Me.PictureEdit1.Properties.ZoomPercent = 300.0R - Me.PictureEdit1.Size = New System.Drawing.Size(258, 223) + Me.PictureEdit1.Size = New System.Drawing.Size(260, 209) Me.PictureEdit1.TabIndex = 8 ' 'txtSearchInput ' - Me.txtSearchInput.Location = New System.Drawing.Point(227, 189) + Me.txtSearchInput.Location = New System.Drawing.Point(229, 193) Me.txtSearchInput.MenuManager = Me.RibbonControl1 Me.txtSearchInput.Name = "txtSearchInput" Me.txtSearchInput.Properties.Appearance.Font = New System.Drawing.Font("Segoe UI", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) @@ -435,7 +435,7 @@ Partial Class frmFlowSearch1 Me.Appearance.Options.UseBackColor = True Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font - Me.ClientSize = New System.Drawing.Size(936, 769) + Me.ClientSize = New System.Drawing.Size(938, 604) Me.Controls.Add(Me.txtSearchInput) Me.Controls.Add(Me.PictureEdit1) Me.Controls.Add(Me.LabelControl1)