_ Partial Class frmViewsUser Inherits System.Windows.Forms.Form 'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen. _ 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. _ Private Sub InitializeComponent() Me.components = New System.ComponentModel.Container() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmViewsUser)) Me.GridControl1 = New DevExpress.XtraGrid.GridControl() Me.TBWH_Users1BindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.DD_ECMAdmin = New DD_Record_Organizer.DD_ECMAdmin() Me.GridView1 = New DevExpress.XtraGrid.Views.Grid.GridView() Me.GridColumn3 = New DevExpress.XtraGrid.Columns.GridColumn() Me.colSurname1 = New DevExpress.XtraGrid.Columns.GridColumn() Me.GridColumn7 = New DevExpress.XtraGrid.Columns.GridColumn() Me.GridColumn8 = New DevExpress.XtraGrid.Columns.GridColumn() Me.GridColumn9 = New DevExpress.XtraGrid.Columns.GridColumn() Me.GridControlUsers2Menue = New DevExpress.XtraGrid.GridControl() Me.TBAD_UsersBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.GridViewlUsers2Menue = New DevExpress.XtraGrid.Views.Grid.GridView() Me.colSelect = New DevExpress.XtraGrid.Columns.GridColumn() Me.colSurname = New DevExpress.XtraGrid.Columns.GridColumn() Me.GridColumn1 = New DevExpress.XtraGrid.Columns.GridColumn() Me.GridColumn2 = New DevExpress.XtraGrid.Columns.GridColumn() Me.colID = New DevExpress.XtraGrid.Columns.GridColumn() Me.XtraTabControl1 = New DevExpress.XtraTab.XtraTabControl() Me.XtraTabPage1 = New DevExpress.XtraTab.XtraTabPage() Me.btndeleteUserConstructorRel = New System.Windows.Forms.Button() Me.btnAddUser2ConstructorREL = New System.Windows.Forms.Button() Me.Label2 = New System.Windows.Forms.Label() Me.Label1 = New System.Windows.Forms.Label() CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBWH_Users1BindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.DD_ECMAdmin, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.GridView1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.GridControlUsers2Menue, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBAD_UsersBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.GridViewlUsers2Menue, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).BeginInit() Me.XtraTabControl1.SuspendLayout() Me.XtraTabPage1.SuspendLayout() Me.SuspendLayout() ' '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.DataSource = Me.TBWH_Users1BindingSource Me.GridControl1.Location = New System.Drawing.Point(501, 63) Me.GridControl1.MainView = Me.GridView1 Me.GridControl1.Name = "GridControl1" Me.GridControl1.ShowOnlyPredefinedDetails = True Me.GridControl1.Size = New System.Drawing.Size(364, 305) Me.GridControl1.TabIndex = 91 Me.GridControl1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView1}) ' 'TBWH_Users1BindingSource ' Me.TBWH_Users1BindingSource.DataMember = "TBWH_Users1" Me.TBWH_Users1BindingSource.DataSource = Me.DD_ECMAdmin ' 'DD_ECMAdmin ' Me.DD_ECMAdmin.DataSetName = "DD_ECMAdmin" Me.DD_ECMAdmin.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema ' 'GridView1 ' Me.GridView1.Appearance.EvenRow.BackColor = System.Drawing.Color.LightBlue Me.GridView1.Appearance.EvenRow.Options.UseBackColor = True Me.GridView1.Appearance.FocusedRow.BackColor = System.Drawing.Color.Fuchsia Me.GridView1.Appearance.FocusedRow.Options.UseBackColor = True Me.GridView1.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.GridColumn3, Me.colSurname1, Me.GridColumn7, Me.GridColumn8, Me.GridColumn9}) Me.GridView1.GridControl = Me.GridControl1 Me.GridView1.Name = "GridView1" Me.GridView1.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.[False] Me.GridView1.OptionsBehavior.AllowDeleteRows = DevExpress.Utils.DefaultBoolean.[False] Me.GridView1.OptionsClipboard.CopyColumnHeaders = DevExpress.Utils.DefaultBoolean.[False] Me.GridView1.OptionsSelection.EnableAppearanceFocusedCell = False Me.GridView1.OptionsView.ColumnAutoWidth = False Me.GridView1.OptionsView.EnableAppearanceEvenRow = True Me.GridView1.OptionsView.ShowAutoFilterRow = True Me.GridView1.OptionsView.ShowGroupPanel = False ' 'GridColumn3 ' Me.GridColumn3.Caption = "Selection" Me.GridColumn3.FieldName = "Select" Me.GridColumn3.Name = "GridColumn3" Me.GridColumn3.Visible = True Me.GridColumn3.VisibleIndex = 0 Me.GridColumn3.Width = 54 ' 'colSurname1 ' Me.colSurname1.Caption = "Name" Me.colSurname1.FieldName = "Surname" Me.colSurname1.Name = "colSurname1" Me.colSurname1.Visible = True Me.colSurname1.VisibleIndex = 1 ' 'GridColumn7 ' Me.GridColumn7.FieldName = "Username" Me.GridColumn7.Name = "GridColumn7" Me.GridColumn7.OptionsColumn.AllowEdit = False Me.GridColumn7.Visible = True Me.GridColumn7.VisibleIndex = 2 Me.GridColumn7.Width = 107 ' 'GridColumn8 ' Me.GridColumn8.FieldName = "Email" Me.GridColumn8.Name = "GridColumn8" Me.GridColumn8.OptionsColumn.AllowEdit = False Me.GridColumn8.Visible = True Me.GridColumn8.VisibleIndex = 3 Me.GridColumn8.Width = 102 ' 'GridColumn9 ' Me.GridColumn9.FieldName = "ID" Me.GridColumn9.Name = "GridColumn9" ' 'GridControlUsers2Menue ' Me.GridControlUsers2Menue.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) Me.GridControlUsers2Menue.DataSource = Me.TBAD_UsersBindingSource Me.GridControlUsers2Menue.Location = New System.Drawing.Point(14, 63) Me.GridControlUsers2Menue.MainView = Me.GridViewlUsers2Menue Me.GridControlUsers2Menue.Name = "GridControlUsers2Menue" Me.GridControlUsers2Menue.ShowOnlyPredefinedDetails = True Me.GridControlUsers2Menue.Size = New System.Drawing.Size(378, 305) Me.GridControlUsers2Menue.TabIndex = 90 Me.GridControlUsers2Menue.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewlUsers2Menue}) ' 'TBAD_UsersBindingSource ' Me.TBAD_UsersBindingSource.DataMember = "TBAD_Users" Me.TBAD_UsersBindingSource.DataSource = Me.DD_ECMAdmin ' 'GridViewlUsers2Menue ' Me.GridViewlUsers2Menue.Appearance.EvenRow.BackColor = System.Drawing.Color.LightBlue Me.GridViewlUsers2Menue.Appearance.EvenRow.Options.UseBackColor = True Me.GridViewlUsers2Menue.Appearance.FocusedRow.BackColor = System.Drawing.Color.Fuchsia Me.GridViewlUsers2Menue.Appearance.FocusedRow.Options.UseBackColor = True Me.GridViewlUsers2Menue.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colSelect, Me.colSurname, Me.GridColumn1, Me.GridColumn2, Me.colID}) Me.GridViewlUsers2Menue.GridControl = Me.GridControlUsers2Menue Me.GridViewlUsers2Menue.Name = "GridViewlUsers2Menue" Me.GridViewlUsers2Menue.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.[False] Me.GridViewlUsers2Menue.OptionsBehavior.AllowDeleteRows = DevExpress.Utils.DefaultBoolean.[False] Me.GridViewlUsers2Menue.OptionsClipboard.CopyColumnHeaders = DevExpress.Utils.DefaultBoolean.[False] Me.GridViewlUsers2Menue.OptionsSelection.EnableAppearanceFocusedCell = False Me.GridViewlUsers2Menue.OptionsView.ColumnAutoWidth = False Me.GridViewlUsers2Menue.OptionsView.EnableAppearanceEvenRow = True Me.GridViewlUsers2Menue.OptionsView.ShowAutoFilterRow = True Me.GridViewlUsers2Menue.OptionsView.ShowGroupPanel = False ' 'colSelect ' Me.colSelect.Caption = "Selection" Me.colSelect.FieldName = "Select" Me.colSelect.Name = "colSelect" Me.colSelect.Visible = True Me.colSelect.VisibleIndex = 0 Me.colSelect.Width = 54 ' 'colSurname ' Me.colSurname.Caption = "Name" Me.colSurname.FieldName = "Surname" Me.colSurname.Name = "colSurname" Me.colSurname.Visible = True Me.colSurname.VisibleIndex = 1 Me.colSurname.Width = 89 ' 'GridColumn1 ' Me.GridColumn1.FieldName = "Username" Me.GridColumn1.Name = "GridColumn1" Me.GridColumn1.OptionsColumn.AllowEdit = False Me.GridColumn1.Visible = True Me.GridColumn1.VisibleIndex = 2 Me.GridColumn1.Width = 98 ' 'GridColumn2 ' Me.GridColumn2.FieldName = "Email" Me.GridColumn2.Name = "GridColumn2" Me.GridColumn2.OptionsColumn.AllowEdit = False Me.GridColumn2.Visible = True Me.GridColumn2.VisibleIndex = 3 Me.GridColumn2.Width = 102 ' 'colID ' Me.colID.FieldName = "ID" Me.colID.Name = "colID" ' 'XtraTabControl1 ' Me.XtraTabControl1.Dock = System.Windows.Forms.DockStyle.Fill Me.XtraTabControl1.Location = New System.Drawing.Point(0, 0) Me.XtraTabControl1.Name = "XtraTabControl1" Me.XtraTabControl1.SelectedTabPage = Me.XtraTabPage1 Me.XtraTabControl1.Size = New System.Drawing.Size(878, 404) Me.XtraTabControl1.TabIndex = 92 Me.XtraTabControl1.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPage1}) ' 'XtraTabPage1 ' Me.XtraTabPage1.Controls.Add(Me.btndeleteUserConstructorRel) Me.XtraTabPage1.Controls.Add(Me.btnAddUser2ConstructorREL) Me.XtraTabPage1.Controls.Add(Me.Label2) Me.XtraTabPage1.Controls.Add(Me.GridControl1) Me.XtraTabPage1.Controls.Add(Me.Label1) Me.XtraTabPage1.Controls.Add(Me.GridControlUsers2Menue) Me.XtraTabPage1.Name = "XtraTabPage1" Me.XtraTabPage1.Size = New System.Drawing.Size(876, 379) Me.XtraTabPage1.Text = "Globale Suche" ' 'btndeleteUserConstructorRel ' Me.btndeleteUserConstructorRel.Image = CType(resources.GetObject("btndeleteUserConstructorRel.Image"), System.Drawing.Image) Me.btndeleteUserConstructorRel.ImageAlign = System.Drawing.ContentAlignment.MiddleRight Me.btndeleteUserConstructorRel.ImeMode = System.Windows.Forms.ImeMode.NoControl Me.btndeleteUserConstructorRel.Location = New System.Drawing.Point(397, 92) Me.btndeleteUserConstructorRel.Name = "btndeleteUserConstructorRel" Me.btndeleteUserConstructorRel.Size = New System.Drawing.Size(97, 23) Me.btndeleteUserConstructorRel.TabIndex = 94 Me.btndeleteUserConstructorRel.Text = "Delete user" Me.btndeleteUserConstructorRel.TextAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btndeleteUserConstructorRel.UseVisualStyleBackColor = True ' 'btnAddUser2ConstructorREL ' Me.btnAddUser2ConstructorREL.Image = CType(resources.GetObject("btnAddUser2ConstructorREL.Image"), System.Drawing.Image) Me.btnAddUser2ConstructorREL.ImageAlign = System.Drawing.ContentAlignment.MiddleRight Me.btnAddUser2ConstructorREL.ImeMode = System.Windows.Forms.ImeMode.NoControl Me.btnAddUser2ConstructorREL.Location = New System.Drawing.Point(398, 63) Me.btnAddUser2ConstructorREL.Name = "btnAddUser2ConstructorREL" Me.btnAddUser2ConstructorREL.Size = New System.Drawing.Size(97, 23) Me.btnAddUser2ConstructorREL.TabIndex = 93 Me.btnAddUser2ConstructorREL.Text = "Add user" Me.btnAddUser2ConstructorREL.TextAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btnAddUser2ConstructorREL.UseVisualStyleBackColor = True ' 'Label2 ' Me.Label2.AutoSize = True Me.Label2.Location = New System.Drawing.Point(11, 47) Me.Label2.Name = "Label2" Me.Label2.Size = New System.Drawing.Size(196, 13) Me.Label2.TabIndex = 92 Me.Label2.Text = "Auswahl noch nicht zugeordneter User:" ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.Location = New System.Drawing.Point(11, 8) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(347, 26) Me.Label1.TabIndex = 91 Me.Label1.Text = "Konfigurieren Sie hier welche User Zugriff auf die globale Suche haben!" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Achtung:" & " in dieser Suche werden alle Datensätze angezeigt!!" ' 'frmViewsUser ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(878, 404) Me.Controls.Add(Me.XtraTabControl1) Me.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) Me.Name = "frmViewsUser" Me.Text = "Views for User" CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TBWH_Users1BindingSource, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.DD_ECMAdmin, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.GridView1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.GridControlUsers2Menue, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TBAD_UsersBindingSource, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.GridViewlUsers2Menue, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).EndInit() Me.XtraTabControl1.ResumeLayout(False) Me.XtraTabPage1.ResumeLayout(False) Me.XtraTabPage1.PerformLayout() Me.ResumeLayout(False) End Sub Friend WithEvents GridControl1 As DevExpress.XtraGrid.GridControl Friend WithEvents GridView1 As DevExpress.XtraGrid.Views.Grid.GridView Friend WithEvents GridColumn3 As DevExpress.XtraGrid.Columns.GridColumn Friend WithEvents colSurname1 As DevExpress.XtraGrid.Columns.GridColumn Friend WithEvents GridColumn7 As DevExpress.XtraGrid.Columns.GridColumn Friend WithEvents GridColumn8 As DevExpress.XtraGrid.Columns.GridColumn Friend WithEvents GridColumn9 As DevExpress.XtraGrid.Columns.GridColumn Friend WithEvents GridControlUsers2Menue As DevExpress.XtraGrid.GridControl Friend WithEvents GridViewlUsers2Menue As DevExpress.XtraGrid.Views.Grid.GridView Friend WithEvents colSelect As DevExpress.XtraGrid.Columns.GridColumn Friend WithEvents colSurname As DevExpress.XtraGrid.Columns.GridColumn Friend WithEvents GridColumn1 As DevExpress.XtraGrid.Columns.GridColumn Friend WithEvents GridColumn2 As DevExpress.XtraGrid.Columns.GridColumn Friend WithEvents colID As DevExpress.XtraGrid.Columns.GridColumn Friend WithEvents TBAD_UsersBindingSource As System.Windows.Forms.BindingSource Friend WithEvents DD_ECMAdmin As DD_Record_Organizer.DD_ECMAdmin Friend WithEvents TBWH_Users1BindingSource As System.Windows.Forms.BindingSource Friend WithEvents XtraTabControl1 As DevExpress.XtraTab.XtraTabControl Friend WithEvents XtraTabPage1 As DevExpress.XtraTab.XtraTabPage Friend WithEvents Label2 As System.Windows.Forms.Label Friend WithEvents Label1 As System.Windows.Forms.Label Friend WithEvents btndeleteUserConstructorRel As System.Windows.Forms.Button Friend WithEvents btnAddUser2ConstructorREL As System.Windows.Forms.Button End Class