_ Partial Class FrmData 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(FrmData)) Me.MenuStrip1 = New System.Windows.Forms.MenuStrip() Me.SchliessenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.SpeichernToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.C1Daten = New C1.Win.C1TrueDBGrid.C1TrueDBGrid() Me.MenuStrip1.SuspendLayout() CType(Me.C1Daten, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'MenuStrip1 ' Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.SchliessenToolStripMenuItem, Me.SpeichernToolStripMenuItem}) Me.MenuStrip1.Location = New System.Drawing.Point(0, 0) Me.MenuStrip1.Name = "MenuStrip1" Me.MenuStrip1.Size = New System.Drawing.Size(600, 24) Me.MenuStrip1.TabIndex = 2 Me.MenuStrip1.Text = "MenuStrip1" ' 'SchliessenToolStripMenuItem ' Me.SchliessenToolStripMenuItem.Name = "SchliessenToolStripMenuItem" Me.SchliessenToolStripMenuItem.Size = New System.Drawing.Size(73, 20) Me.SchliessenToolStripMenuItem.Text = "Schliessen" ' 'SpeichernToolStripMenuItem ' Me.SpeichernToolStripMenuItem.Name = "SpeichernToolStripMenuItem" Me.SpeichernToolStripMenuItem.Size = New System.Drawing.Size(71, 20) Me.SpeichernToolStripMenuItem.Text = "Speichern" ' 'C1Daten ' Me.C1Daten.AllowAddNew = True Me.C1Daten.AlternatingRows = True Me.C1Daten.Dock = System.Windows.Forms.DockStyle.Fill Me.C1Daten.FetchRowStyles = True 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, 24) 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.RecordSelectorWidth = 16 Me.C1Daten.Size = New System.Drawing.Size(600, 237) Me.C1Daten.TabAction = C1.Win.C1TrueDBGrid.TabActionEnum.ColumnNavigation Me.C1Daten.TabIndex = 15 Me.C1Daten.Text = "C1TrueDBGrid2" Me.C1Daten.PropBag = resources.GetString("C1Daten.PropBag") ' 'FrmData ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(600, 261) Me.Controls.Add(Me.C1Daten) Me.Controls.Add(Me.MenuStrip1) Me.Name = "FrmData" Me.Text = "FrmData" Me.MenuStrip1.ResumeLayout(False) Me.MenuStrip1.PerformLayout() CType(Me.C1Daten, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents MenuStrip1 As Windows.Forms.MenuStrip Friend WithEvents SchliessenToolStripMenuItem As Windows.Forms.ToolStripMenuItem Friend WithEvents SpeichernToolStripMenuItem As Windows.Forms.ToolStripMenuItem Friend WithEvents C1Daten As C1.Win.C1TrueDBGrid.C1TrueDBGrid End Class