_ Partial Class frmCheckRightsRecords 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() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmCheckRightsRecords)) Me.Label1 = New System.Windows.Forms.Label() Me.cmbentity = New System.Windows.Forms.ComboBox() Me.btnCheckRights = New System.Windows.Forms.Button() Me.BW_RightsEntity = New System.ComponentModel.BackgroundWorker() Me.ProgressBar1 = New System.Windows.Forms.ProgressBar() Me.btncancel = New System.Windows.Forms.Button() Me.chklogging = New System.Windows.Forms.CheckBox() Me.lblstate = New System.Windows.Forms.Label() Me.GridControlMain = New DevExpress.XtraGrid.GridControl() Me.GridViewMain = New DevExpress.XtraGrid.Views.Grid.GridView() Me.Label2 = New System.Windows.Forms.Label() Me.btnSelectVisiblRows = New System.Windows.Forms.Button() Me.btnUnselect = New System.Windows.Forms.Button() CType(Me.GridControlMain, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.GridViewMain, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.Location = New System.Drawing.Point(5, 9) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(147, 16) Me.Label1.TabIndex = 0 Me.Label1.Text = "Please choose an entity:" ' 'cmbentity ' Me.cmbentity.FormattingEnabled = True Me.cmbentity.Location = New System.Drawing.Point(8, 29) Me.cmbentity.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.cmbentity.Name = "cmbentity" Me.cmbentity.Size = New System.Drawing.Size(335, 24) Me.cmbentity.TabIndex = 1 ' 'btnCheckRights ' Me.btnCheckRights.Location = New System.Drawing.Point(520, 59) Me.btnCheckRights.Name = "btnCheckRights" Me.btnCheckRights.Size = New System.Drawing.Size(335, 39) Me.btnCheckRights.TabIndex = 2 Me.btnCheckRights.Text = "Renew rights for all selected records" Me.btnCheckRights.UseVisualStyleBackColor = True ' 'BW_RightsEntity ' ' 'ProgressBar1 ' Me.ProgressBar1.Location = New System.Drawing.Point(520, 31) Me.ProgressBar1.Name = "ProgressBar1" Me.ProgressBar1.Size = New System.Drawing.Size(335, 22) Me.ProgressBar1.TabIndex = 3 Me.ProgressBar1.Visible = False ' 'btncancel ' Me.btncancel.Image = Global.RecordOrganizer_RightManager.My.Resources.Resources.cancel1 Me.btncancel.ImageAlign = System.Drawing.ContentAlignment.MiddleRight Me.btncancel.Location = New System.Drawing.Point(876, 25) Me.btncancel.Name = "btncancel" Me.btncancel.Size = New System.Drawing.Size(75, 31) Me.btncancel.TabIndex = 4 Me.btncancel.Text = "Cancel" Me.btncancel.TextAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btncancel.UseVisualStyleBackColor = True Me.btncancel.Visible = False ' 'chklogging ' Me.chklogging.AutoSize = True Me.chklogging.Checked = True Me.chklogging.CheckState = System.Windows.Forms.CheckState.Checked Me.chklogging.Location = New System.Drawing.Point(359, 31) Me.chklogging.Name = "chklogging" Me.chklogging.Size = New System.Drawing.Size(113, 20) Me.chklogging.TabIndex = 5 Me.chklogging.Text = "Log errors only" Me.chklogging.UseVisualStyleBackColor = True ' 'lblstate ' Me.lblstate.AutoSize = True Me.lblstate.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.lblstate.Location = New System.Drawing.Point(517, 12) Me.lblstate.Name = "lblstate" Me.lblstate.Size = New System.Drawing.Size(38, 13) Me.lblstate.TabIndex = 6 Me.lblstate.Text = "Label2" ' 'GridControlMain ' Me.GridControlMain.AllowDrop = True Me.GridControlMain.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.GridControlMain.Location = New System.Drawing.Point(8, 105) Me.GridControlMain.MainView = Me.GridViewMain Me.GridControlMain.Name = "GridControlMain" Me.GridControlMain.Size = New System.Drawing.Size(1291, 488) Me.GridControlMain.TabIndex = 9 Me.GridControlMain.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewMain}) ' 'GridViewMain ' Me.GridViewMain.FocusRectStyle = DevExpress.XtraGrid.Views.Grid.DrawFocusRectStyle.RowFullFocus Me.GridViewMain.GridControl = Me.GridControlMain Me.GridViewMain.Name = "GridViewMain" Me.GridViewMain.OptionsClipboard.CopyColumnHeaders = DevExpress.Utils.DefaultBoolean.[False] Me.GridViewMain.OptionsSelection.EnableAppearanceFocusedCell = False Me.GridViewMain.OptionsSelection.EnableAppearanceFocusedRow = False Me.GridViewMain.OptionsSelection.EnableAppearanceHideSelection = False Me.GridViewMain.OptionsSelection.MultiSelect = True Me.GridViewMain.OptionsSelection.MultiSelectMode = DevExpress.XtraGrid.Views.Grid.GridMultiSelectMode.CellSelect Me.GridViewMain.OptionsView.ColumnAutoWidth = False Me.GridViewMain.OptionsView.EnableAppearanceEvenRow = True Me.GridViewMain.OptionsView.ShowAutoFilterRow = True Me.GridViewMain.OptionsView.ShowHorizontalLines = DevExpress.Utils.DefaultBoolean.[True] ' 'Label2 ' Me.Label2.AutoSize = True Me.Label2.Location = New System.Drawing.Point(5, 86) Me.Label2.Name = "Label2" Me.Label2.Size = New System.Drawing.Size(318, 16) Me.Label2.TabIndex = 10 Me.Label2.Text = "Please select the records which files shall be checked:" ' 'btnSelectVisiblRows ' Me.btnSelectVisiblRows.Image = CType(resources.GetObject("btnSelectVisiblRows.Image"), System.Drawing.Image) Me.btnSelectVisiblRows.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btnSelectVisiblRows.Location = New System.Drawing.Point(876, 59) Me.btnSelectVisiblRows.Name = "btnSelectVisiblRows" Me.btnSelectVisiblRows.Size = New System.Drawing.Size(178, 39) Me.btnSelectVisiblRows.TabIndex = 11 Me.btnSelectVisiblRows.Text = "Select all visible Rows" Me.btnSelectVisiblRows.TextAlign = System.Drawing.ContentAlignment.MiddleRight Me.btnSelectVisiblRows.UseVisualStyleBackColor = True ' 'btnUnselect ' Me.btnUnselect.Image = CType(resources.GetObject("btnUnselect.Image"), System.Drawing.Image) Me.btnUnselect.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btnUnselect.Location = New System.Drawing.Point(1060, 59) Me.btnUnselect.Name = "btnUnselect" Me.btnUnselect.Size = New System.Drawing.Size(178, 39) Me.btnUnselect.TabIndex = 12 Me.btnUnselect.Text = "Unselect all visible Rows" Me.btnUnselect.TextAlign = System.Drawing.ContentAlignment.MiddleRight Me.btnUnselect.UseVisualStyleBackColor = True ' 'frmCheckRightsRecords ' Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(1304, 596) Me.Controls.Add(Me.btnUnselect) Me.Controls.Add(Me.btnSelectVisiblRows) Me.Controls.Add(Me.Label2) Me.Controls.Add(Me.GridControlMain) Me.Controls.Add(Me.lblstate) Me.Controls.Add(Me.chklogging) Me.Controls.Add(Me.btncancel) Me.Controls.Add(Me.ProgressBar1) Me.Controls.Add(Me.btnCheckRights) Me.Controls.Add(Me.cmbentity) Me.Controls.Add(Me.Label1) Me.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.MaximizeBox = False Me.MinimizeBox = False Me.Name = "frmCheckRightsRecords" Me.ShowInTaskbar = False Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Me.Text = "Check Rights for Records" CType(Me.GridControlMain, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.GridViewMain, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents Label1 As System.Windows.Forms.Label Friend WithEvents cmbentity As System.Windows.Forms.ComboBox Friend WithEvents btnCheckRights As System.Windows.Forms.Button Friend WithEvents BW_RightsEntity As System.ComponentModel.BackgroundWorker Friend WithEvents ProgressBar1 As System.Windows.Forms.ProgressBar Friend WithEvents btncancel As System.Windows.Forms.Button Friend WithEvents chklogging As System.Windows.Forms.CheckBox Friend WithEvents lblstate As System.Windows.Forms.Label Friend WithEvents GridControlMain As DevExpress.XtraGrid.GridControl Friend WithEvents GridViewMain As DevExpress.XtraGrid.Views.Grid.GridView Friend WithEvents Label2 As System.Windows.Forms.Label Friend WithEvents btnSelectVisiblRows As System.Windows.Forms.Button Friend WithEvents btnUnselect As System.Windows.Forms.Button End Class