_ Partial Class frmDataSelect 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(frmDataSelect)) Me.ToolStrip1 = New System.Windows.Forms.ToolStrip() Me.TSBtnQuit = New System.Windows.Forms.ToolStripButton() Me.C1Daten = New C1.Win.C1TrueDBGrid.C1TrueDBGrid() Me.ToolStrip1.SuspendLayout() CType(Me.C1Daten, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'ToolStrip1 ' Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.TSBtnQuit}) Me.ToolStrip1.Location = New System.Drawing.Point(0, 0) Me.ToolStrip1.Name = "ToolStrip1" Me.ToolStrip1.Size = New System.Drawing.Size(451, 25) Me.ToolStrip1.TabIndex = 4 Me.ToolStrip1.Text = "ToolStrip1" ' 'TSBtnQuit ' Me.TSBtnQuit.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image Me.TSBtnQuit.Image = CType(resources.GetObject("TSBtnQuit.Image"), System.Drawing.Image) Me.TSBtnQuit.ImageTransparentColor = System.Drawing.Color.Magenta Me.TSBtnQuit.Name = "TSBtnQuit" Me.TSBtnQuit.Size = New System.Drawing.Size(23, 22) Me.TSBtnQuit.Text = "Fenster schliessen" Me.TSBtnQuit.ToolTipText = "Fenster schliessen" ' 'C1Daten ' Me.C1Daten.AllowUpdate = False Me.C1Daten.AlternatingRows = True Me.C1Daten.Dock = System.Windows.Forms.DockStyle.Fill Me.C1Daten.FilterBar = True Me.C1Daten.GroupByCaption = "Drag a column header here to group by that column" Me.C1Daten.Images.Add(CType(resources.GetObject("C1Daten.Images"), System.Drawing.Image)) Me.C1Daten.Location = New System.Drawing.Point(0, 25) Me.C1Daten.Name = "C1Daten" Me.C1Daten.PreviewInfo.Location = New System.Drawing.Point(0, 0) Me.C1Daten.PreviewInfo.Size = New System.Drawing.Size(0, 0) Me.C1Daten.PreviewInfo.ZoomFactor = 75.0R Me.C1Daten.PrintInfo.PageSettings = CType(resources.GetObject("C1Daten.PrintInfo.PageSettings"), System.Drawing.Printing.PageSettings) Me.C1Daten.ScrollTips = True Me.C1Daten.Size = New System.Drawing.Size(451, 284) Me.C1Daten.TabAction = C1.Win.C1TrueDBGrid.TabActionEnum.ColumnNavigation Me.C1Daten.TabIndex = 7 Me.C1Daten.Text = "C1TrueDBGrid1" Me.C1Daten.PropBag = resources.GetString("C1Daten.PropBag") ' 'frmDataSelect ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(451, 309) Me.Controls.Add(Me.C1Daten) Me.Controls.Add(Me.ToolStrip1) Me.Name = "frmDataSelect" Me.Text = "Datenauswahl" Me.ToolStrip1.ResumeLayout(False) Me.ToolStrip1.PerformLayout() CType(Me.C1Daten, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip Friend WithEvents TSBtnQuit As System.Windows.Forms.ToolStripButton Friend WithEvents C1Daten As C1.Win.C1TrueDBGrid.C1TrueDBGrid End Class