This commit is contained in:
2021-03-09 15:25:39 +01:00
parent c6423afb6a
commit 6eee074497
11 changed files with 302 additions and 176 deletions

View File

@@ -24,6 +24,9 @@ Partial Class frmDokumenteSchicken
Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmDokumenteSchicken))
Me.pnl = New System.Windows.Forms.Panel()
Me.cbxInfoblattFurDigitalabfertigungDrucken = New System.Windows.Forms.CheckBox()
Me.Label2 = New System.Windows.Forms.Label()
Me.rtbSonstigeInfo = New System.Windows.Forms.RichTextBox()
Me.rtbDokumente = New System.Windows.Forms.RichTextBox()
Me.btnOK = New System.Windows.Forms.Button()
Me.Header = New System.Windows.Forms.Panel()
@@ -32,8 +35,6 @@ Partial Class frmDokumenteSchicken
Me.lblTitle = New System.Windows.Forms.Label()
Me.btnClose = New System.Windows.Forms.Button()
Me.lblText = New System.Windows.Forms.Label()
Me.rtbSonstigeInfo = New System.Windows.Forms.RichTextBox()
Me.Label2 = New System.Windows.Forms.Label()
Me.pnl.SuspendLayout()
Me.Header.SuspendLayout()
Me.SuspendLayout()
@@ -42,6 +43,7 @@ Partial Class frmDokumenteSchicken
'
Me.pnl.BackColor = System.Drawing.Color.White
Me.pnl.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.pnl.Controls.Add(Me.cbxInfoblattFurDigitalabfertigungDrucken)
Me.pnl.Controls.Add(Me.Label2)
Me.pnl.Controls.Add(Me.rtbSonstigeInfo)
Me.pnl.Controls.Add(Me.rtbDokumente)
@@ -53,9 +55,39 @@ Partial Class frmDokumenteSchicken
Me.pnl.Dock = System.Windows.Forms.DockStyle.Fill
Me.pnl.Location = New System.Drawing.Point(0, 0)
Me.pnl.Name = "pnl"
Me.pnl.Size = New System.Drawing.Size(316, 410)
Me.pnl.Size = New System.Drawing.Size(316, 452)
Me.pnl.TabIndex = 0
'
'cbxInfoblattFurDigitalabfertigungDrucken
'
Me.cbxInfoblattFurDigitalabfertigungDrucken.AutoSize = True
Me.cbxInfoblattFurDigitalabfertigungDrucken.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!)
Me.cbxInfoblattFurDigitalabfertigungDrucken.Location = New System.Drawing.Point(11, 348)
Me.cbxInfoblattFurDigitalabfertigungDrucken.Name = "cbxInfoblattFurDigitalabfertigungDrucken"
Me.cbxInfoblattFurDigitalabfertigungDrucken.Size = New System.Drawing.Size(300, 24)
Me.cbxInfoblattFurDigitalabfertigungDrucken.TabIndex = 97
Me.cbxInfoblattFurDigitalabfertigungDrucken.Text = "Infoblatt für Digitalabfertigung drucken"
Me.cbxInfoblattFurDigitalabfertigungDrucken.UseVisualStyleBackColor = True
'
'Label2
'
Me.Label2.Cursor = System.Windows.Forms.Cursors.Hand
Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Underline), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label2.Location = New System.Drawing.Point(3, 183)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(422, 25)
Me.Label2.TabIndex = 96
Me.Label2.Text = "Sonstige Info:"
Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
'
'rtbSonstigeInfo
'
Me.rtbSonstigeInfo.Location = New System.Drawing.Point(6, 211)
Me.rtbSonstigeInfo.Name = "rtbSonstigeInfo"
Me.rtbSonstigeInfo.Size = New System.Drawing.Size(301, 130)
Me.rtbSonstigeInfo.TabIndex = 95
Me.rtbSonstigeInfo.Text = ""
'
'rtbDokumente
'
Me.rtbDokumente.Location = New System.Drawing.Point(6, 59)
@@ -66,10 +98,10 @@ Partial Class frmDokumenteSchicken
'
'btnOK
'
Me.btnOK.DialogResult = DialogResult.OK
Me.btnOK.DialogResult = System.Windows.Forms.DialogResult.OK
Me.btnOK.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnOK.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0!)
Me.btnOK.Location = New System.Drawing.Point(81, 347)
Me.btnOK.Location = New System.Drawing.Point(81, 389)
Me.btnOK.Name = "btnOK"
Me.btnOK.Size = New System.Drawing.Size(133, 50)
Me.btnOK.TabIndex = 93
@@ -154,30 +186,11 @@ Partial Class frmDokumenteSchicken
Me.lblText.Text = "Folgende Dokumente sind an den Kunden zu senden:"
Me.lblText.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
'
'rtbSonstigeInfo
'
Me.rtbSonstigeInfo.Location = New System.Drawing.Point(6, 211)
Me.rtbSonstigeInfo.Name = "rtbSonstigeInfo"
Me.rtbSonstigeInfo.Size = New System.Drawing.Size(301, 130)
Me.rtbSonstigeInfo.TabIndex = 95
Me.rtbSonstigeInfo.Text = ""
'
'Label2
'
Me.Label2.Cursor = System.Windows.Forms.Cursors.Hand
Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Underline), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label2.Location = New System.Drawing.Point(3, 183)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(422, 25)
Me.Label2.TabIndex = 96
Me.Label2.Text = "Sonstige Info:"
Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
'
'frmDokumenteSchicken
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(316, 410)
Me.ClientSize = New System.Drawing.Size(316, 452)
Me.Controls.Add(Me.pnl)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
@@ -185,6 +198,7 @@ Partial Class frmDokumenteSchicken
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "frmDokumenteSchicken"
Me.pnl.ResumeLayout(False)
Me.pnl.PerformLayout()
Me.Header.ResumeLayout(False)
Me.ResumeLayout(False)
@@ -200,4 +214,5 @@ Partial Class frmDokumenteSchicken
Public WithEvents rtbDokumente As System.Windows.Forms.RichTextBox
Public WithEvents Label2 As Label
Public WithEvents rtbSonstigeInfo As RichTextBox
Friend WithEvents cbxInfoblattFurDigitalabfertigungDrucken As CheckBox
End Class