Partial Class usrCntlSND_Handling Inherits System.Windows.Forms.UserControl 'UserControl ü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 DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Me.pnlT1 = New System.Windows.Forms.Panel() Me.lkl = New System.Windows.Forms.LinkLabel() Me.Label2 = New System.Windows.Forms.Label() Me.txtATCMRNFremd = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label1 = New System.Windows.Forms.Label() Me.txtATAold = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.MyDatagridview1 = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components) Me.clmnArt = New System.Windows.Forms.DataGridViewComboBoxColumn() Me.clmnATA = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.clmnColli = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.clmnGewicht = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.pnlT1.SuspendLayout() CType(Me.MyDatagridview1, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'pnlT1 ' Me.pnlT1.Controls.Add(Me.lkl) Me.pnlT1.Controls.Add(Me.Label2) Me.pnlT1.Controls.Add(Me.txtATCMRNFremd) Me.pnlT1.Controls.Add(Me.Label1) Me.pnlT1.Controls.Add(Me.txtATAold) Me.pnlT1.Controls.Add(Me.MyDatagridview1) Me.pnlT1.Location = New System.Drawing.Point(0, 0) Me.pnlT1.Name = "pnlT1" Me.pnlT1.Size = New System.Drawing.Size(549, 92) Me.pnlT1.TabIndex = 67 ' 'lkl ' Me.lkl.AutoSize = True Me.lkl.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) Me.lkl.Location = New System.Drawing.Point(442, 74) Me.lkl.Name = "lkl" Me.lkl.Size = New System.Drawing.Size(102, 13) Me.lkl.TabIndex = 37 Me.lkl.TabStop = True Me.lkl.Text = "Summen übertragen" ' 'Label2 ' Me.Label2.AutoSize = True Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label2.Location = New System.Drawing.Point(343, 74) Me.Label2.Name = "Label2" Me.Label2.Size = New System.Drawing.Size(58, 13) Me.Label2.TabIndex = 36 Me.Label2.Text = "0 Handling" ' 'txtATCMRNFremd ' Me.txtATCMRNFremd._DateTimeOnly = False Me.txtATCMRNFremd._numbersOnly = False Me.txtATCMRNFremd._numbersOnlyKommastellen = "" Me.txtATCMRNFremd._Prozent = False Me.txtATCMRNFremd._ShortDateNew = False Me.txtATCMRNFremd._ShortDateOnly = False Me.txtATCMRNFremd._TimeOnly = False Me.txtATCMRNFremd._value = "" Me.txtATCMRNFremd._Waehrung = False Me.txtATCMRNFremd._WaehrungZeichen = True Me.txtATCMRNFremd.ForeColor = System.Drawing.Color.Black Me.txtATCMRNFremd.Location = New System.Drawing.Point(343, 16) Me.txtATCMRNFremd.MaxLength = 500 Me.txtATCMRNFremd.MaxLineLength = -1 Me.txtATCMRNFremd.MaxLines_Warning = "" Me.txtATCMRNFremd.MaxLines_Warning_Label = Nothing Me.txtATCMRNFremd.Name = "txtATCMRNFremd" Me.txtATCMRNFremd.Size = New System.Drawing.Size(203, 20) Me.txtATCMRNFremd.TabIndex = 34 ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label1.Location = New System.Drawing.Point(340, 2) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(96, 13) Me.Label1.TabIndex = 33 Me.Label1.Text = "ATC/MRN (fremd):" ' 'txtATAold ' Me.txtATAold._DateTimeOnly = False Me.txtATAold._numbersOnly = False Me.txtATAold._numbersOnlyKommastellen = "" Me.txtATAold._Prozent = False Me.txtATAold._ShortDateNew = False Me.txtATAold._ShortDateOnly = False Me.txtATAold._TimeOnly = False Me.txtATAold._value = "" Me.txtATAold._Waehrung = False Me.txtATAold._WaehrungZeichen = True Me.txtATAold.ForeColor = System.Drawing.Color.Black Me.txtATAold.Location = New System.Drawing.Point(442, 47) Me.txtATAold.MaxLength = 500 Me.txtATAold.MaxLineLength = -1 Me.txtATAold.MaxLines_Warning = "" Me.txtATAold.MaxLines_Warning_Label = Nothing Me.txtATAold.Name = "txtATAold" Me.txtATAold.Size = New System.Drawing.Size(46, 20) Me.txtATAold.TabIndex = 32 Me.txtATAold.Visible = False ' 'MyDatagridview1 ' Me.MyDatagridview1.AKTUALISIERUNGS_INTERVALL = -1 Me.MyDatagridview1.AllowUserToResizeColumns = False Me.MyDatagridview1.AllowUserToResizeRows = False Me.MyDatagridview1.BackgroundColor = System.Drawing.SystemColors.Control Me.MyDatagridview1.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.MyDatagridview1.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnArt, Me.clmnATA, Me.clmnColli, Me.clmnGewicht}) Me.MyDatagridview1.Location = New System.Drawing.Point(3, 0) Me.MyDatagridview1.Name = "MyDatagridview1" Me.MyDatagridview1.RowHeadersWidth = 25 Me.MyDatagridview1.Size = New System.Drawing.Size(334, 90) Me.MyDatagridview1.TabIndex = 35 ' 'clmnArt ' Me.clmnArt.DisplayStyle = System.Windows.Forms.DataGridViewComboBoxDisplayStyle.ComboBox Me.clmnArt.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.clmnArt.HeaderText = "Art" Me.clmnArt.Items.AddRange(New Object() {"ATA", "MRN", "CRN"}) Me.clmnArt.Name = "clmnArt" Me.clmnArt.Resizable = System.Windows.Forms.DataGridViewTriState.[True] Me.clmnArt.SortMode = System.Windows.Forms.DataGridViewColumnSortMode.Automatic Me.clmnArt.Visible = False Me.clmnArt.Width = 60 ' 'clmnATA ' Me.clmnATA.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill Me.clmnATA.HeaderText = "ATA/ATC/CRN/MRN" Me.clmnATA.Name = "clmnATA" ' 'clmnColli ' DataGridViewCellStyle1.Format = "N0" DataGridViewCellStyle1.NullValue = Nothing Me.clmnColli.DefaultCellStyle = DataGridViewCellStyle1 Me.clmnColli.HeaderText = "Colli" Me.clmnColli.Name = "clmnColli" Me.clmnColli.Width = 50 ' 'clmnGewicht ' DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.TopRight DataGridViewCellStyle2.Format = "N1" DataGridViewCellStyle2.NullValue = Nothing Me.clmnGewicht.DefaultCellStyle = DataGridViewCellStyle2 Me.clmnGewicht.HeaderText = "Gewicht" Me.clmnGewicht.Name = "clmnGewicht" Me.clmnGewicht.Width = 80 ' 'usrCntlSND_Handling ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.Controls.Add(Me.pnlT1) Me.Name = "usrCntlSND_Handling" Me.Size = New System.Drawing.Size(549, 92) Me.pnlT1.ResumeLayout(False) Me.pnlT1.PerformLayout() CType(Me.MyDatagridview1, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) End Sub Friend WithEvents pnlT1 As System.Windows.Forms.Panel Friend WithEvents txtATAold As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents txtATCMRNFremd As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents Label1 As Label Friend WithEvents MyDatagridview1 As VERAG_PROG_ALLGEMEIN.MyDatagridview Friend WithEvents Label2 As Label Friend WithEvents lkl As LinkLabel Friend WithEvents clmnArt As DataGridViewComboBoxColumn Friend WithEvents clmnATA As DataGridViewTextBoxColumn Friend WithEvents clmnColli As DataGridViewTextBoxColumn Friend WithEvents clmnGewicht As DataGridViewTextBoxColumn End Class