edv/SDL
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

BRG Auswertung DURMAZ - TELOTEC

Browse Source 
BRG Auswertung UNISPED
This commit is contained in:
Andreas Luxbauer
2024-08-20 09:00:22 +02:00
parent 7bc2bbe25a
commit 13b3671d4f
12 changed files with 488 additions and 294 deletions
Download Patch File Download Diff File Expand all files Collapse all files

22
SDL/buchhaltung/frmBU_Mahnlauf_Ausgabe.Designer.vb generated
View File

@@ -24,13 +24,13 @@ Partial Class frmBU_Mahnlauf_Ausgabe
Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmBU_Mahnlauf_Ausgabe))
Me.pnl = New System.Windows.Forms.Panel()
Me.cbxMailOffnen = New System.Windows.Forms.CheckBox()
Me.btnPrint = New System.Windows.Forms.Button()
Me.btnMail = New System.Windows.Forms.Button()
Me.Panel1 = New System.Windows.Forms.Panel()
Me.Button1 = New System.Windows.Forms.Button()
Me.Label6 = New System.Windows.Forms.Label()
Me.btnPDF = New System.Windows.Forms.Button()
Me.cbxMailOffnen = New System.Windows.Forms.CheckBox()
Me.pnl.SuspendLayout()
Me.Panel1.SuspendLayout()
Me.SuspendLayout()
@@ -49,6 +49,16 @@ Partial Class frmBU_Mahnlauf_Ausgabe
Me.pnl.Size = New System.Drawing.Size(384, 180)
Me.pnl.TabIndex = 1
'
'cbxMailOffnen
'
Me.cbxMailOffnen.AutoSize = True
Me.cbxMailOffnen.Location = New System.Drawing.Point(135, 158)
Me.cbxMailOffnen.Name = "cbxMailOffnen"
Me.cbxMailOffnen.Size = New System.Drawing.Size(78, 17)
Me.cbxMailOffnen.TabIndex = 56
Me.cbxMailOffnen.Text = "Mail öffnen"
Me.cbxMailOffnen.UseVisualStyleBackColor = True
'
'btnPrint
'
Me.btnPrint.BackColor = System.Drawing.Color.Transparent
@@ -137,16 +147,6 @@ Partial Class frmBU_Mahnlauf_Ausgabe
Me.btnPDF.TextAlign = System.Drawing.ContentAlignment.BottomCenter
Me.btnPDF.UseVisualStyleBackColor = False
'
'cbxMailOffnen
'
Me.cbxMailOffnen.AutoSize = True
Me.cbxMailOffnen.Location = New System.Drawing.Point(135, 158)
Me.cbxMailOffnen.Name = "cbxMailOffnen"
Me.cbxMailOffnen.Size = New System.Drawing.Size(78, 17)
Me.cbxMailOffnen.TabIndex = 56
Me.cbxMailOffnen.Text = "Mail öffnen"
Me.cbxMailOffnen.UseVisualStyleBackColor = True
'
'frmBU_Mahnlauf_Ausgabe
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)

2
SDL/buchhaltung/frmBU_Mahnlauf_Ausgabe.vb
View File

@@ -20,7 +20,7 @@
End Sub
Private Sub btnMail_Click(sender As Object, e As EventArgs) Handles btnMail.Click
If cbxMailOffnen.Checked Then
If cbxMailOffnen.Checked Or cbxMailOffnen.Visible = False Then
AUSGABE = "MAIL"
Else
AUSGABE = "MAIL_SEND"