_ Partial Class frmLookupGrid Inherits DevExpress.XtraEditors.XtraForm '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(frmLookupGrid)) Me.gridLookup = New DevExpress.XtraGrid.GridControl() Me.viewLookup = New DevExpress.XtraGrid.Views.Grid.GridView() Me.Panel1 = New System.Windows.Forms.Panel() Me.btnOK = New System.Windows.Forms.Button() Me.btnClear = New System.Windows.Forms.Button() CType(Me.gridLookup, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.viewLookup, System.ComponentModel.ISupportInitialize).BeginInit() Me.Panel1.SuspendLayout() Me.SuspendLayout() ' 'gridLookup ' resources.ApplyResources(Me.gridLookup, "gridLookup") Me.gridLookup.MainView = Me.viewLookup Me.gridLookup.Name = "gridLookup" Me.gridLookup.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.viewLookup}) ' 'viewLookup ' Me.viewLookup.GridControl = Me.gridLookup Me.viewLookup.Name = "viewLookup" Me.viewLookup.OptionsView.ShowGroupPanel = False ' 'Panel1 ' Me.Panel1.Controls.Add(Me.btnOK) Me.Panel1.Controls.Add(Me.btnClear) resources.ApplyResources(Me.Panel1, "Panel1") Me.Panel1.Name = "Panel1" ' 'btnOK ' resources.ApplyResources(Me.btnOK, "btnOK") Me.btnOK.Name = "btnOK" Me.btnOK.UseVisualStyleBackColor = True ' 'btnClear ' resources.ApplyResources(Me.btnClear, "btnClear") Me.btnClear.DialogResult = System.Windows.Forms.DialogResult.OK Me.btnClear.Name = "btnClear" Me.btnClear.UseVisualStyleBackColor = True ' 'frmLookupGrid ' resources.ApplyResources(Me, "$this") Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.Controls.Add(Me.gridLookup) Me.Controls.Add(Me.Panel1) Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.SizableToolWindow Me.Name = "frmLookupGrid" Me.TopMost = True CType(Me.gridLookup, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.viewLookup, System.ComponentModel.ISupportInitialize).EndInit() Me.Panel1.ResumeLayout(False) Me.ResumeLayout(False) End Sub Friend WithEvents gridLookup As DevExpress.XtraGrid.GridControl Friend WithEvents viewLookup As DevExpress.XtraGrid.Views.Grid.GridView Friend WithEvents Panel1 As Windows.Forms.Panel Friend WithEvents btnOK As Windows.Forms.Button Friend WithEvents btnClear As Windows.Forms.Button End Class