Partial Class frmDigicust 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() Me.components = New System.ComponentModel.Container() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmDigicust)) Me.Button1 = New System.Windows.Forms.Button() Me.pnlHead = New System.Windows.Forms.Panel() Me.cbxAviso = New System.Windows.Forms.CheckBox() Me.txtVorpapierT = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.txtLWKLand = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.UsrCntl_Consignee = New SDL.usrCntlAdresse() Me.txtVorpapier = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.lblVorpapier = New System.Windows.Forms.Label() Me.lblInfo = New System.Windows.Forms.Label() Me.Label6 = New System.Windows.Forms.Label() Me.Label8 = New System.Windows.Forms.Label() Me.cboStammreferenz = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.txtLKWId = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.usrCntl_consignor = New SDL.usrCntlAdresse() Me.Label4 = New System.Windows.Forms.Label() Me.sbBestimmungsZollstelle = New VERAG_PROG_ALLGEMEIN.MySearchBox() Me.Label3 = New System.Windows.Forms.Label() Me.dgvAnhaenge = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components) Me.columnName = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.txtDyMandant = New System.Windows.Forms.Label() Me.Label1 = New System.Windows.Forms.Label() Me.txtDyNiederlassung = New System.Windows.Forms.Label() Me.lblBezugsnummer = New System.Windows.Forms.Label() Me.lblAnh = New System.Windows.Forms.Label() Me.cbxAbsender = New System.Windows.Forms.CheckBox() Me.cbxEmpfänger = New System.Windows.Forms.CheckBox() Me.pnlHead.SuspendLayout() CType(Me.dgvAnhaenge, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'Button1 ' Me.Button1.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.Button1.BackColor = System.Drawing.Color.White Me.Button1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Button1.ImageAlign = System.Drawing.ContentAlignment.TopCenter Me.Button1.Location = New System.Drawing.Point(244, 713) Me.Button1.Margin = New System.Windows.Forms.Padding(2) Me.Button1.Name = "Button1" Me.Button1.Size = New System.Drawing.Size(159, 42) Me.Button1.TabIndex = 26 Me.Button1.Text = "An DC senden -->" Me.Button1.UseVisualStyleBackColor = False ' 'pnlHead ' Me.pnlHead.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink Me.pnlHead.BackColor = System.Drawing.Color.White Me.pnlHead.Controls.Add(Me.cbxEmpfänger) Me.pnlHead.Controls.Add(Me.cbxAbsender) Me.pnlHead.Controls.Add(Me.cbxAviso) Me.pnlHead.Controls.Add(Me.txtVorpapierT) Me.pnlHead.Controls.Add(Me.txtLWKLand) Me.pnlHead.Controls.Add(Me.UsrCntl_Consignee) Me.pnlHead.Controls.Add(Me.txtVorpapier) Me.pnlHead.Controls.Add(Me.lblVorpapier) Me.pnlHead.Controls.Add(Me.lblInfo) Me.pnlHead.Controls.Add(Me.Label6) Me.pnlHead.Controls.Add(Me.Label8) Me.pnlHead.Controls.Add(Me.cboStammreferenz) Me.pnlHead.Controls.Add(Me.txtLKWId) Me.pnlHead.Controls.Add(Me.usrCntl_consignor) Me.pnlHead.Controls.Add(Me.Label4) Me.pnlHead.Controls.Add(Me.sbBestimmungsZollstelle) Me.pnlHead.Controls.Add(Me.Label3) Me.pnlHead.Controls.Add(Me.dgvAnhaenge) Me.pnlHead.Controls.Add(Me.txtDyMandant) Me.pnlHead.Controls.Add(Me.Label1) Me.pnlHead.Controls.Add(Me.txtDyNiederlassung) Me.pnlHead.Controls.Add(Me.lblBezugsnummer) Me.pnlHead.Location = New System.Drawing.Point(3, 2) Me.pnlHead.Name = "pnlHead" Me.pnlHead.Size = New System.Drawing.Size(606, 706) Me.pnlHead.TabIndex = 112 ' 'cbxAviso ' Me.cbxAviso.AutoSize = True Me.cbxAviso.Checked = True Me.cbxAviso.CheckState = System.Windows.Forms.CheckState.Checked Me.cbxAviso.Location = New System.Drawing.Point(409, 35) Me.cbxAviso.Name = "cbxAviso" Me.cbxAviso.Size = New System.Drawing.Size(150, 17) Me.cbxAviso.TabIndex = 156 Me.cbxAviso.Text = "Daten aus Aviso schicken" Me.cbxAviso.UseVisualStyleBackColor = True ' 'txtVorpapierT ' Me.txtVorpapierT._DateTimeOnly = False Me.txtVorpapierT._numbersOnly = False Me.txtVorpapierT._numbersOnlyKommastellen = "" Me.txtVorpapierT._numbersOnlyTrennzeichen = True Me.txtVorpapierT._Prozent = False Me.txtVorpapierT._ShortDateNew = False Me.txtVorpapierT._ShortDateOnly = False Me.txtVorpapierT._TimeOnly = False Me.txtVorpapierT._TimeOnly_Seconds = False Me.txtVorpapierT._value = "" Me.txtVorpapierT._Waehrung = False Me.txtVorpapierT._WaehrungZeichen = True Me.txtVorpapierT.ForeColor = System.Drawing.Color.Black Me.txtVorpapierT.Location = New System.Drawing.Point(410, 86) Me.txtVorpapierT.MaxLineLength = -1 Me.txtVorpapierT.MaxLines_Warning = "" Me.txtVorpapierT.MaxLines_Warning_Label = Nothing Me.txtVorpapierT.Name = "txtVorpapierT" Me.txtVorpapierT.Size = New System.Drawing.Size(33, 20) Me.txtVorpapierT.TabIndex = 155 ' 'txtLWKLand ' Me.txtLWKLand._DateTimeOnly = False Me.txtLWKLand._numbersOnly = False Me.txtLWKLand._numbersOnlyKommastellen = "" Me.txtLWKLand._numbersOnlyTrennzeichen = True Me.txtLWKLand._Prozent = False Me.txtLWKLand._ShortDateNew = False Me.txtLWKLand._ShortDateOnly = False Me.txtLWKLand._TimeOnly = False Me.txtLWKLand._TimeOnly_Seconds = False Me.txtLWKLand._value = "" Me.txtLWKLand._Waehrung = False Me.txtLWKLand._WaehrungZeichen = True Me.txtLWKLand.ForeColor = System.Drawing.Color.Black Me.txtLWKLand.Location = New System.Drawing.Point(533, 58) Me.txtLWKLand.MaxLineLength = -1 Me.txtLWKLand.MaxLines_Warning = "" Me.txtLWKLand.MaxLines_Warning_Label = Nothing Me.txtLWKLand.Name = "txtLWKLand" Me.txtLWKLand.Size = New System.Drawing.Size(37, 20) Me.txtLWKLand.TabIndex = 154 ' 'UsrCntl_Consignee ' Me.UsrCntl_Consignee._Titel = "Empfänger:" Me.UsrCntl_Consignee.BackColor = System.Drawing.Color.White Me.UsrCntl_Consignee.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.UsrCntl_Consignee.Location = New System.Drawing.Point(303, 158) Me.UsrCntl_Consignee.Name = "UsrCntl_Consignee" Me.UsrCntl_Consignee.Size = New System.Drawing.Size(284, 132) Me.UsrCntl_Consignee.TabIndex = 151 ' 'txtVorpapier ' Me.txtVorpapier._DateTimeOnly = False Me.txtVorpapier._numbersOnly = False Me.txtVorpapier._numbersOnlyKommastellen = "" Me.txtVorpapier._numbersOnlyTrennzeichen = True Me.txtVorpapier._Prozent = False Me.txtVorpapier._ShortDateNew = False Me.txtVorpapier._ShortDateOnly = False Me.txtVorpapier._TimeOnly = False Me.txtVorpapier._TimeOnly_Seconds = False Me.txtVorpapier._value = "" Me.txtVorpapier._Waehrung = False Me.txtVorpapier._WaehrungZeichen = True Me.txtVorpapier.ForeColor = System.Drawing.Color.Black Me.txtVorpapier.Location = New System.Drawing.Point(449, 86) Me.txtVorpapier.MaxLineLength = -1 Me.txtVorpapier.MaxLines_Warning = "" Me.txtVorpapier.MaxLines_Warning_Label = Nothing Me.txtVorpapier.Name = "txtVorpapier" Me.txtVorpapier.Size = New System.Drawing.Size(121, 20) Me.txtVorpapier.TabIndex = 150 ' 'lblVorpapier ' Me.lblVorpapier.Location = New System.Drawing.Point(319, 89) Me.lblVorpapier.Name = "lblVorpapier" Me.lblVorpapier.Size = New System.Drawing.Size(67, 13) Me.lblVorpapier.TabIndex = 149 Me.lblVorpapier.Text = "Vorpapier" ' 'lblInfo ' Me.lblInfo.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.lblInfo.ForeColor = System.Drawing.Color.Red Me.lblInfo.Location = New System.Drawing.Point(64, 310) Me.lblInfo.Name = "lblInfo" Me.lblInfo.Size = New System.Drawing.Size(460, 27) Me.lblInfo.TabIndex = 148 ' 'Label6 ' Me.Label6.Location = New System.Drawing.Point(10, 337) Me.Label6.Name = "Label6" Me.Label6.Size = New System.Drawing.Size(135, 13) Me.Label6.TabIndex = 147 Me.Label6.Text = "Dokumente:" ' 'Label8 ' Me.Label8.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.Label8.AutoSize = True Me.Label8.Location = New System.Drawing.Point(14, 58) Me.Label8.Name = "Label8" Me.Label8.Size = New System.Drawing.Size(57, 13) Me.Label8.TabIndex = 146 Me.Label8.Text = "Stammref.:" Me.Label8.TextAlign = System.Drawing.ContentAlignment.TopRight ' 'cboStammreferenz ' Me.cboStammreferenz._allowedValuesFreiText = Nothing Me.cboStammreferenz._allowFreiText = False Me.cboStammreferenz._value = "" Me.cboStammreferenz.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer)) Me.cboStammreferenz.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList Me.cboStammreferenz.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.cboStammreferenz.FormattingEnabled = True Me.cboStammreferenz.Location = New System.Drawing.Point(77, 55) Me.cboStammreferenz.Name = "cboStammreferenz" Me.cboStammreferenz.Size = New System.Drawing.Size(154, 21) Me.cboStammreferenz.TabIndex = 145 ' 'txtLKWId ' Me.txtLKWId._DateTimeOnly = False Me.txtLKWId._numbersOnly = False Me.txtLKWId._numbersOnlyKommastellen = "" Me.txtLKWId._numbersOnlyTrennzeichen = True Me.txtLKWId._Prozent = False Me.txtLKWId._ShortDateNew = False Me.txtLKWId._ShortDateOnly = False Me.txtLKWId._TimeOnly = False Me.txtLKWId._TimeOnly_Seconds = False Me.txtLKWId._value = "" Me.txtLKWId._Waehrung = False Me.txtLKWId._WaehrungZeichen = True Me.txtLKWId.ForeColor = System.Drawing.Color.Black Me.txtLKWId.Location = New System.Drawing.Point(409, 58) Me.txtLKWId.MaxLineLength = -1 Me.txtLKWId.MaxLines_Warning = "" Me.txtLKWId.MaxLines_Warning_Label = Nothing Me.txtLKWId.Name = "txtLKWId" Me.txtLKWId.Size = New System.Drawing.Size(115, 20) Me.txtLKWId.TabIndex = 144 ' 'usrCntl_consignor ' Me.usrCntl_consignor._Titel = "Absender" Me.usrCntl_consignor.BackColor = System.Drawing.Color.White Me.usrCntl_consignor.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.usrCntl_consignor.Location = New System.Drawing.Point(5, 158) Me.usrCntl_consignor.Name = "usrCntl_consignor" Me.usrCntl_consignor.Size = New System.Drawing.Size(284, 132) Me.usrCntl_consignor.TabIndex = 143 ' 'Label4 ' Me.Label4.Location = New System.Drawing.Point(14, 85) Me.Label4.Name = "Label4" Me.Label4.Size = New System.Drawing.Size(78, 20) Me.Label4.TabIndex = 114 Me.Label4.Text = "Bes-Zollstelle:" ' 'sbBestimmungsZollstelle ' Me.sbBestimmungsZollstelle._allowFreitext = False Me.sbBestimmungsZollstelle._AllowSetValue = False Me.sbBestimmungsZollstelle._allowSpaceAsSplitter = False Me.sbBestimmungsZollstelle._autoSizeGross = False Me.sbBestimmungsZollstelle._hideIfListEmpty = True Me.sbBestimmungsZollstelle._value = "" Me.sbBestimmungsZollstelle.conn_art = "FMZOLL" Me.sbBestimmungsZollstelle.dgvpos = "LEFT" Me.sbBestimmungsZollstelle.DISPLAY_PARAM = Nothing Me.sbBestimmungsZollstelle.INVISIBLE_COLUMNS = Nothing Me.sbBestimmungsZollstelle.key_visible = False Me.sbBestimmungsZollstelle.KEYPARAM = Nothing Me.sbBestimmungsZollstelle.Location = New System.Drawing.Point(102, 82) Me.sbBestimmungsZollstelle.Name = "sbBestimmungsZollstelle" Me.sbBestimmungsZollstelle.searchActive = True Me.sbBestimmungsZollstelle.Size = New System.Drawing.Size(129, 20) Me.sbBestimmungsZollstelle.SQL_ORDER_BY = Nothing Me.sbBestimmungsZollstelle.SQL_SELECT = Nothing Me.sbBestimmungsZollstelle.SQL_WHERE = Nothing Me.sbBestimmungsZollstelle.SQL_WhereParamList = Nothing Me.sbBestimmungsZollstelle.TabIndex = 115 Me.sbBestimmungsZollstelle.usrcntl = Nothing ' 'Label3 ' Me.Label3.Location = New System.Drawing.Point(319, 61) Me.Label3.Name = "Label3" Me.Label3.Size = New System.Drawing.Size(50, 15) Me.Label3.TabIndex = 113 Me.Label3.Text = "LKW-KZ:" ' 'dgvAnhaenge ' Me.dgvAnhaenge.AKTUALISIERUNGS_INTERVALL = -1 Me.dgvAnhaenge.AllowUserToAddRows = False Me.dgvAnhaenge.AllowUserToDeleteRows = False Me.dgvAnhaenge.AllowUserToResizeColumns = False Me.dgvAnhaenge.AllowUserToResizeRows = False Me.dgvAnhaenge.BackgroundColor = System.Drawing.Color.White Me.dgvAnhaenge.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.dgvAnhaenge.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.columnName}) Me.dgvAnhaenge.Location = New System.Drawing.Point(13, 353) Me.dgvAnhaenge.Name = "dgvAnhaenge" Me.dgvAnhaenge.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect Me.dgvAnhaenge.Size = New System.Drawing.Size(590, 347) Me.dgvAnhaenge.TabIndex = 112 ' 'columnName ' Me.columnName.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill Me.columnName.HeaderText = "Name" Me.columnName.Name = "columnName" Me.columnName.ReadOnly = True ' 'txtDyMandant ' Me.txtDyMandant.BackColor = System.Drawing.Color.White Me.txtDyMandant.Location = New System.Drawing.Point(2, 2) Me.txtDyMandant.Name = "txtDyMandant" Me.txtDyMandant.Size = New System.Drawing.Size(44, 13) Me.txtDyMandant.TabIndex = 109 Me.txtDyMandant.Text = "VERG" Me.txtDyMandant.TextAlign = System.Drawing.ContentAlignment.TopRight ' 'Label1 ' Me.Label1.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.Label1.AutoSize = True Me.Label1.BackColor = System.Drawing.Color.White Me.Label1.Location = New System.Drawing.Point(318, 2) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(82, 13) Me.Label1.TabIndex = 106 Me.Label1.Text = "Bezugsnummer:" ' 'txtDyNiederlassung ' Me.txtDyNiederlassung.BackColor = System.Drawing.Color.White Me.txtDyNiederlassung.Location = New System.Drawing.Point(52, 3) Me.txtDyNiederlassung.Name = "txtDyNiederlassung" Me.txtDyNiederlassung.Size = New System.Drawing.Size(45, 12) Me.txtDyNiederlassung.TabIndex = 108 Me.txtDyNiederlassung.Text = "SUB" ' 'lblBezugsnummer ' Me.lblBezugsnummer.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.lblBezugsnummer.BackColor = System.Drawing.Color.White Me.lblBezugsnummer.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.lblBezugsnummer.Location = New System.Drawing.Point(406, 2) Me.lblBezugsnummer.Name = "lblBezugsnummer" Me.lblBezugsnummer.Size = New System.Drawing.Size(193, 23) Me.lblBezugsnummer.TabIndex = 107 Me.lblBezugsnummer.Text = "4800/000000/17 AAA" Me.lblBezugsnummer.TextAlign = System.Drawing.ContentAlignment.MiddleRight ' 'lblAnh ' Me.lblAnh.Location = New System.Drawing.Point(474, 713) Me.lblAnh.Name = "lblAnh" Me.lblAnh.Size = New System.Drawing.Size(135, 13) Me.lblAnh.TabIndex = 152 Me.lblAnh.Visible = False ' 'cbxAbsender ' Me.cbxAbsender.AutoSize = True Me.cbxAbsender.Location = New System.Drawing.Point(9, 135) Me.cbxAbsender.Name = "cbxAbsender" Me.cbxAbsender.Size = New System.Drawing.Size(133, 17) Me.cbxAbsender.TabIndex = 157 Me.cbxAbsender.Text = "Absender übernehmen" Me.cbxAbsender.UseVisualStyleBackColor = True ' 'cbxEmpfänger ' Me.cbxEmpfänger.AutoSize = True Me.cbxEmpfänger.Checked = True Me.cbxEmpfänger.CheckState = System.Windows.Forms.CheckState.Checked Me.cbxEmpfänger.Location = New System.Drawing.Point(303, 135) Me.cbxEmpfänger.Name = "cbxEmpfänger" Me.cbxEmpfänger.Size = New System.Drawing.Size(139, 17) Me.cbxEmpfänger.TabIndex = 158 Me.cbxEmpfänger.Text = "Empfänger übernehmen" Me.cbxEmpfänger.UseVisualStyleBackColor = True ' 'frmDigicust ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink Me.ClientSize = New System.Drawing.Size(621, 769) Me.Controls.Add(Me.lblAnh) Me.Controls.Add(Me.pnlHead) Me.Controls.Add(Me.Button1) Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) Me.Name = "frmDigicust" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Me.Text = "Digicust" Me.pnlHead.ResumeLayout(False) Me.pnlHead.PerformLayout() CType(Me.dgvAnhaenge, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) End Sub Friend WithEvents Button1 As Button Friend WithEvents pnlHead As Panel Friend WithEvents lblInfo As Label Friend WithEvents Label6 As Label Friend WithEvents Label8 As Label Friend WithEvents cboStammreferenz As VERAG_PROG_ALLGEMEIN.MyComboBox Friend WithEvents txtLKWId As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents usrCntl_consignor As SDL.usrCntlAdresse Friend WithEvents Label4 As Label Friend WithEvents sbBestimmungsZollstelle As VERAG_PROG_ALLGEMEIN.MySearchBox Friend WithEvents Label3 As Label Friend WithEvents dgvAnhaenge As VERAG_PROG_ALLGEMEIN.MyDatagridview Friend WithEvents columnName As DataGridViewTextBoxColumn Friend WithEvents txtDyMandant As Label Friend WithEvents Label1 As Label Friend WithEvents txtDyNiederlassung As Label Friend WithEvents lblBezugsnummer As Label Friend WithEvents UsrCntl_Consignee As SDL.usrCntlAdresse Friend WithEvents txtVorpapier As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents lblVorpapier As Label Friend WithEvents txtVorpapierT As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents txtLWKLand As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents cbxAviso As CheckBox Friend WithEvents lblAnh As Label Friend WithEvents cbxEmpfänger As CheckBox Friend WithEvents cbxAbsender As CheckBox End Class