_ Partial Class frmLaufzettel 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(frmLaufzettel)) Me.lbl = New System.Windows.Forms.Label() Me.pnl = New System.Windows.Forms.Panel() Me.btn = New System.Windows.Forms.Button() Me.MyPanel1 = New VERAG_PROG_ALLGEMEIN.MyPanel() Me.Button4 = New System.Windows.Forms.Button() Me.cboPrinter = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.cbxVPSplit = New System.Windows.Forms.CheckBox() Me.pnlZumZoll = New System.Windows.Forms.Panel() Me.Button2 = New System.Windows.Forms.Button() Me.CheckBox2 = New System.Windows.Forms.CheckBox() Me.CheckBox3 = New System.Windows.Forms.CheckBox() Me.CheckBox4 = New System.Windows.Forms.CheckBox() Me.Button3 = New System.Windows.Forms.Button() Me.btnDIGITAL = New System.Windows.Forms.Button() Me.Button1 = New System.Windows.Forms.Button() Me.btnLaufzettelDrucken = New System.Windows.Forms.Button() Me.cbxDokumenteDrucken = New System.Windows.Forms.CheckBox() Me.dgvDigitalMailanfügen = New VERAG_PROG_ALLGEMEIN.MyDatagridview() Me.clmnLzMail_ID = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.clmnLzMail_Name = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.DocId = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.dgvLaufzettelDruck = New VERAG_PROG_ALLGEMEIN.MyDatagridview() Me.clmnLzPrint_ID = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.clmnLzPrint_Name = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.PrintDocId = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.printTyp = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.cbxDigitalLZ = New System.Windows.Forms.CheckBox() Me.cbxSAAbfertigung = New System.Windows.Forms.CheckBox() Me.pnl.SuspendLayout() Me.MyPanel1.SuspendLayout() Me.pnlZumZoll.SuspendLayout() CType(Me.dgvDigitalMailanfügen, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.dgvLaufzettelDruck, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'lbl ' Me.lbl.AutoSize = True Me.lbl.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.lbl.ForeColor = System.Drawing.Color.White Me.lbl.Location = New System.Drawing.Point(11, 8) Me.lbl.Name = "lbl" Me.lbl.Size = New System.Drawing.Size(88, 24) Me.lbl.TabIndex = 0 Me.lbl.Text = "Laufzettel" ' 'pnl ' Me.pnl.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) Me.pnl.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.pnl.Controls.Add(Me.btn) Me.pnl.Controls.Add(Me.lbl) Me.pnl.Dock = System.Windows.Forms.DockStyle.Top Me.pnl.Location = New System.Drawing.Point(0, 0) Me.pnl.Name = "pnl" Me.pnl.Size = New System.Drawing.Size(564, 45) Me.pnl.TabIndex = 10 ' 'btn ' Me.btn.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.btn.BackColor = System.Drawing.Color.Red Me.btn.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.btn.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.btn.ForeColor = System.Drawing.Color.White Me.btn.Location = New System.Drawing.Point(483, -1) Me.btn.Margin = New System.Windows.Forms.Padding(0) Me.btn.Name = "btn" Me.btn.Size = New System.Drawing.Size(80, 45) Me.btn.TabIndex = 0 Me.btn.Text = "X" Me.btn.UseVisualStyleBackColor = False ' 'MyPanel1 ' Me.MyPanel1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.MyPanel1.Controls.Add(Me.Button4) Me.MyPanel1.Controls.Add(Me.cboPrinter) Me.MyPanel1.Controls.Add(Me.cbxVPSplit) Me.MyPanel1.Controls.Add(Me.pnlZumZoll) Me.MyPanel1.Controls.Add(Me.Button3) Me.MyPanel1.Controls.Add(Me.btnDIGITAL) Me.MyPanel1.Controls.Add(Me.Button1) Me.MyPanel1.Controls.Add(Me.btnLaufzettelDrucken) Me.MyPanel1.Controls.Add(Me.cbxDokumenteDrucken) Me.MyPanel1.Controls.Add(Me.dgvDigitalMailanfügen) Me.MyPanel1.Controls.Add(Me.dgvLaufzettelDruck) Me.MyPanel1.Controls.Add(Me.cbxDigitalLZ) Me.MyPanel1.Controls.Add(Me.cbxSAAbfertigung) Me.MyPanel1.Dock = System.Windows.Forms.DockStyle.Fill Me.MyPanel1.Location = New System.Drawing.Point(0, 45) Me.MyPanel1.Name = "MyPanel1" Me.MyPanel1.Size = New System.Drawing.Size(564, 571) Me.MyPanel1.TabIndex = 9 ' 'Button4 ' Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button4.Location = New System.Drawing.Point(205, 363) Me.Button4.Name = "Button4" Me.Button4.Size = New System.Drawing.Size(73, 36) Me.Button4.TabIndex = 24 Me.Button4.Text = "Kopieren" Me.Button4.UseVisualStyleBackColor = True ' 'cboPrinter ' Me.cboPrinter._allowedValuesFreiText = Nothing Me.cboPrinter._allowFreiText = False Me.cboPrinter._value = "" Me.cboPrinter.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList Me.cboPrinter.DropDownWidth = 300 Me.cboPrinter.FormattingEnabled = True Me.cboPrinter.Location = New System.Drawing.Point(18, 495) Me.cboPrinter.Name = "cboPrinter" Me.cboPrinter.Size = New System.Drawing.Size(260, 21) Me.cboPrinter.TabIndex = 23 ' 'cbxVPSplit ' Me.cbxVPSplit.AutoSize = True Me.cbxVPSplit.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) Me.cbxVPSplit.Location = New System.Drawing.Point(18, 400) Me.cbxVPSplit.Name = "cbxVPSplit" Me.cbxVPSplit.Size = New System.Drawing.Size(173, 21) Me.cbxVPSplit.TabIndex = 6 Me.cbxVPSplit.Text = "nach Vorpapier splitten" Me.cbxVPSplit.UseVisualStyleBackColor = True ' 'pnlZumZoll ' Me.pnlZumZoll.BackColor = System.Drawing.Color.PapayaWhip Me.pnlZumZoll.Controls.Add(Me.Button2) Me.pnlZumZoll.Controls.Add(Me.CheckBox2) Me.pnlZumZoll.Controls.Add(Me.CheckBox3) Me.pnlZumZoll.Controls.Add(Me.CheckBox4) Me.pnlZumZoll.Dock = System.Windows.Forms.DockStyle.Bottom Me.pnlZumZoll.Location = New System.Drawing.Point(0, 520) Me.pnlZumZoll.Name = "pnlZumZoll" Me.pnlZumZoll.Size = New System.Drawing.Size(562, 49) Me.pnlZumZoll.TabIndex = 12 ' 'Button2 ' Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button2.Location = New System.Drawing.Point(468, 8) Me.Button2.Name = "Button2" Me.Button2.Size = New System.Drawing.Size(83, 36) Me.Button2.TabIndex = 13 Me.Button2.Text = "nur z.Zoll drucken" Me.Button2.UseVisualStyleBackColor = True ' 'CheckBox2 ' Me.CheckBox2.AutoSize = True Me.CheckBox2.Checked = True Me.CheckBox2.CheckState = System.Windows.Forms.CheckState.Checked Me.CheckBox2.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold) Me.CheckBox2.Location = New System.Drawing.Point(18, 14) Me.CheckBox2.Name = "CheckBox2" Me.CheckBox2.Size = New System.Drawing.Size(230, 24) Me.CheckBox2.TabIndex = 3 Me.CheckBox2.Text = """zum Zoll"" Zettel drucken" Me.CheckBox2.UseVisualStyleBackColor = True ' 'CheckBox3 ' Me.CheckBox3.AutoSize = True Me.CheckBox3.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!) Me.CheckBox3.Location = New System.Drawing.Point(284, 14) Me.CheckBox3.Name = "CheckBox3" Me.CheckBox3.Size = New System.Drawing.Size(77, 24) Me.CheckBox3.TabIndex = 4 Me.CheckBox3.Text = "AT Zoll" Me.CheckBox3.UseVisualStyleBackColor = True ' 'CheckBox4 ' Me.CheckBox4.AutoSize = True Me.CheckBox4.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!) Me.CheckBox4.Location = New System.Drawing.Point(376, 14) Me.CheckBox4.Name = "CheckBox4" Me.CheckBox4.Size = New System.Drawing.Size(80, 24) Me.CheckBox4.TabIndex = 5 Me.CheckBox4.Text = "DE Zoll" Me.CheckBox4.UseVisualStyleBackColor = True ' 'Button3 ' Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button3.Location = New System.Drawing.Point(18, 325) Me.Button3.Name = "Button3" Me.Button3.Size = New System.Drawing.Size(260, 36) Me.Button3.TabIndex = 11 Me.Button3.Text = "nur Anlagen drucken" Me.Button3.UseVisualStyleBackColor = True ' 'btnDIGITAL ' Me.btnDIGITAL.BackColor = System.Drawing.Color.PapayaWhip Me.btnDIGITAL.Enabled = False Me.btnDIGITAL.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.btnDIGITAL.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!) Me.btnDIGITAL.Image = Global.AVISO.My.Resources.Resources.digitalerAkt_small Me.btnDIGITAL.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btnDIGITAL.Location = New System.Drawing.Point(284, 424) Me.btnDIGITAL.Name = "btnDIGITAL" Me.btnDIGITAL.Padding = New System.Windows.Forms.Padding(10, 0, 20, 0) Me.btnDIGITAL.Size = New System.Drawing.Size(260, 69) Me.btnDIGITAL.TabIndex = 10 Me.btnDIGITAL.Text = "Laufzettel DIGITAL" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "E-Mail öffnen" Me.btnDIGITAL.TextAlign = System.Drawing.ContentAlignment.MiddleRight Me.btnDIGITAL.UseVisualStyleBackColor = False ' 'Button1 ' Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button1.Location = New System.Drawing.Point(18, 363) Me.Button1.Name = "Button1" Me.Button1.Size = New System.Drawing.Size(188, 36) Me.Button1.TabIndex = 9 Me.Button1.Text = "Laufzettel anzeigen" Me.Button1.UseVisualStyleBackColor = True ' 'btnLaufzettelDrucken ' Me.btnLaufzettelDrucken.BackColor = System.Drawing.Color.PapayaWhip Me.btnLaufzettelDrucken.Enabled = False Me.btnLaufzettelDrucken.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.btnLaufzettelDrucken.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!) Me.btnLaufzettelDrucken.Image = Global.AVISO.My.Resources.Resources.printer Me.btnLaufzettelDrucken.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btnLaufzettelDrucken.Location = New System.Drawing.Point(18, 424) Me.btnLaufzettelDrucken.Name = "btnLaufzettelDrucken" Me.btnLaufzettelDrucken.Padding = New System.Windows.Forms.Padding(10, 0, 20, 0) Me.btnLaufzettelDrucken.Size = New System.Drawing.Size(260, 69) Me.btnLaufzettelDrucken.TabIndex = 8 Me.btnLaufzettelDrucken.Text = "Laufzettel drucken" Me.btnLaufzettelDrucken.TextAlign = System.Drawing.ContentAlignment.MiddleRight Me.btnLaufzettelDrucken.UseVisualStyleBackColor = False ' 'cbxDokumenteDrucken ' Me.cbxDokumenteDrucken.AutoSize = True Me.cbxDokumenteDrucken.Checked = True Me.cbxDokumenteDrucken.CheckState = System.Windows.Forms.CheckState.Checked Me.cbxDokumenteDrucken.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold) Me.cbxDokumenteDrucken.Location = New System.Drawing.Point(17, 25) Me.cbxDokumenteDrucken.Name = "cbxDokumenteDrucken" Me.cbxDokumenteDrucken.Size = New System.Drawing.Size(189, 24) Me.cbxDokumenteDrucken.TabIndex = 1 Me.cbxDokumenteDrucken.Text = "Dokumente drucken" Me.cbxDokumenteDrucken.UseVisualStyleBackColor = True ' 'dgvDigitalMailanfügen ' Me.dgvDigitalMailanfügen.AKTUALISIERUNGS_INTERVALL = -1 Me.dgvDigitalMailanfügen.AllowUserToAddRows = False Me.dgvDigitalMailanfügen.AllowUserToResizeColumns = False Me.dgvDigitalMailanfügen.AllowUserToResizeRows = False Me.dgvDigitalMailanfügen.BackgroundColor = System.Drawing.Color.White Me.dgvDigitalMailanfügen.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.dgvDigitalMailanfügen.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnLzMail_ID, Me.clmnLzMail_Name, Me.DocId}) Me.dgvDigitalMailanfügen.Enabled = False Me.dgvDigitalMailanfügen.Location = New System.Drawing.Point(284, 53) Me.dgvDigitalMailanfügen.Name = "dgvDigitalMailanfügen" Me.dgvDigitalMailanfügen.ReadOnly = True Me.dgvDigitalMailanfügen.RowHeadersVisible = False Me.dgvDigitalMailanfügen.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect Me.dgvDigitalMailanfügen.Size = New System.Drawing.Size(260, 365) Me.dgvDigitalMailanfügen.TabIndex = 7 ' 'clmnLzMail_ID ' Me.clmnLzMail_ID.HeaderText = "Column1" Me.clmnLzMail_ID.Name = "clmnLzMail_ID" Me.clmnLzMail_ID.ReadOnly = True Me.clmnLzMail_ID.Visible = False ' 'clmnLzMail_Name ' Me.clmnLzMail_Name.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill Me.clmnLzMail_Name.HeaderText = "Datei" Me.clmnLzMail_Name.Name = "clmnLzMail_Name" Me.clmnLzMail_Name.ReadOnly = True ' 'DocId ' Me.DocId.HeaderText = "DocId" Me.DocId.Name = "DocId" Me.DocId.ReadOnly = True Me.DocId.Visible = False ' 'dgvLaufzettelDruck ' Me.dgvLaufzettelDruck.AKTUALISIERUNGS_INTERVALL = -1 Me.dgvLaufzettelDruck.AllowUserToAddRows = False Me.dgvLaufzettelDruck.AllowUserToResizeColumns = False Me.dgvLaufzettelDruck.AllowUserToResizeRows = False Me.dgvLaufzettelDruck.BackgroundColor = System.Drawing.Color.White Me.dgvLaufzettelDruck.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.dgvLaufzettelDruck.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnLzPrint_ID, Me.clmnLzPrint_Name, Me.PrintDocId, Me.printTyp}) Me.dgvLaufzettelDruck.Location = New System.Drawing.Point(18, 53) Me.dgvLaufzettelDruck.Name = "dgvLaufzettelDruck" Me.dgvLaufzettelDruck.ReadOnly = True Me.dgvLaufzettelDruck.RowHeadersVisible = False Me.dgvLaufzettelDruck.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect Me.dgvLaufzettelDruck.Size = New System.Drawing.Size(260, 266) Me.dgvLaufzettelDruck.TabIndex = 6 ' 'clmnLzPrint_ID ' Me.clmnLzPrint_ID.HeaderText = "Column1" Me.clmnLzPrint_ID.Name = "clmnLzPrint_ID" Me.clmnLzPrint_ID.ReadOnly = True Me.clmnLzPrint_ID.Visible = False ' 'clmnLzPrint_Name ' Me.clmnLzPrint_Name.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill Me.clmnLzPrint_Name.HeaderText = "Datei" Me.clmnLzPrint_Name.Name = "clmnLzPrint_Name" Me.clmnLzPrint_Name.ReadOnly = True ' 'PrintDocId ' Me.PrintDocId.HeaderText = "printDocId" Me.PrintDocId.Name = "PrintDocId" Me.PrintDocId.ReadOnly = True Me.PrintDocId.Visible = False ' 'printTyp ' Me.printTyp.HeaderText = "printTyp" Me.printTyp.Name = "printTyp" Me.printTyp.ReadOnly = True Me.printTyp.Visible = False ' 'cbxDigitalLZ ' Me.cbxDigitalLZ.AutoSize = True Me.cbxDigitalLZ.Enabled = False Me.cbxDigitalLZ.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold) Me.cbxDigitalLZ.Location = New System.Drawing.Point(284, 25) Me.cbxDigitalLZ.Name = "cbxDigitalLZ" Me.cbxDigitalLZ.Size = New System.Drawing.Size(239, 24) Me.cbxDigitalLZ.TabIndex = 2 Me.cbxDigitalLZ.Text = "DIGITAL: An Mail anfügen" Me.cbxDigitalLZ.UseVisualStyleBackColor = True ' 'cbxSAAbfertigung ' Me.cbxSAAbfertigung.AutoSize = True Me.cbxSAAbfertigung.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!) Me.cbxSAAbfertigung.Location = New System.Drawing.Point(284, 492) Me.cbxSAAbfertigung.Name = "cbxSAAbfertigung" Me.cbxSAAbfertigung.Size = New System.Drawing.Size(255, 24) Me.cbxSAAbfertigung.TabIndex = 14 Me.cbxSAAbfertigung.Text = "SA-Abfertigungs E-Mail (Suben)" Me.cbxSAAbfertigung.UseVisualStyleBackColor = True Me.cbxSAAbfertigung.Visible = False ' 'frmLaufzettel ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.BackColor = System.Drawing.Color.White Me.ClientSize = New System.Drawing.Size(564, 616) Me.Controls.Add(Me.MyPanel1) Me.Controls.Add(Me.pnl) Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) Me.Name = "frmLaufzettel" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Me.Text = "Laufzettel" Me.pnl.ResumeLayout(False) Me.pnl.PerformLayout() Me.MyPanel1.ResumeLayout(False) Me.MyPanel1.PerformLayout() Me.pnlZumZoll.ResumeLayout(False) Me.pnlZumZoll.PerformLayout() CType(Me.dgvDigitalMailanfügen, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.dgvLaufzettelDruck, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) End Sub Friend WithEvents lbl As Label Friend WithEvents cbxDokumenteDrucken As CheckBox Friend WithEvents cbxDigitalLZ As CheckBox Friend WithEvents CheckBox2 As CheckBox Friend WithEvents CheckBox3 As CheckBox Friend WithEvents CheckBox4 As CheckBox Friend WithEvents dgvLaufzettelDruck As VERAG_PROG_ALLGEMEIN.MyDatagridview Friend WithEvents dgvDigitalMailanfügen As VERAG_PROG_ALLGEMEIN.MyDatagridview Friend WithEvents btnLaufzettelDrucken As Button Friend WithEvents MyPanel1 As VERAG_PROG_ALLGEMEIN.MyPanel Friend WithEvents pnl As Panel Friend WithEvents btn As Button Friend WithEvents Button1 As Button Friend WithEvents Button3 As Button Friend WithEvents btnDIGITAL As Button Friend WithEvents pnlZumZoll As Panel Friend WithEvents cbxVPSplit As CheckBox Friend WithEvents clmnLzMail_ID As DataGridViewTextBoxColumn Friend WithEvents clmnLzMail_Name As DataGridViewTextBoxColumn Friend WithEvents DocId As DataGridViewTextBoxColumn Friend WithEvents clmnLzPrint_ID As DataGridViewTextBoxColumn Friend WithEvents clmnLzPrint_Name As DataGridViewTextBoxColumn Friend WithEvents PrintDocId As DataGridViewTextBoxColumn Friend WithEvents printTyp As DataGridViewTextBoxColumn Friend WithEvents Button2 As Button Friend WithEvents cboPrinter As VERAG_PROG_ALLGEMEIN.MyComboBox Friend WithEvents Button4 As Button Friend WithEvents cbxSAAbfertigung As CheckBox End Class