SendEmail Added ContextMenuStrip

2025-03-05 09:43:27 +01:00
parent 4a72319b56
commit e383dfe3af
4 changed files with 139 additions and 101 deletions
--- a/SDL/Fakturierung/usrCntlFaktAbrechnung.Designer.vb
+++ b/SDL/Fakturierung/usrCntlFaktAbrechnung.Designer.vb
@@ -82,6 +82,7 @@ Partial Class usrCntlFaktAbrechnung
        Me.lblRechnungsDatum = New System.Windows.Forms.Label()
        Me.lblRechnungsNummer = New System.Windows.Forms.Label()
        Me.Panel1 = New System.Windows.Forms.Panel()
+        Me.Button17 = New System.Windows.Forms.Button()
        Me.txtTextZZ = New VERAG_PROG_ALLGEMEIN.MyRichTextBox()
        Me.dgvAnhaenge = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
        Me.optAnhSel = New System.Windows.Forms.DataGridViewCheckBoxColumn()
@@ -273,13 +274,17 @@ Partial Class usrCntlFaktAbrechnung
        Me.EmpfängerToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.AuftraggeberToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.AvisiererToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ContextMenuStrip3 = New System.Windows.Forms.ContextMenuStrip(Me.components)
+        Me.AbsenderToolStripMenuItem2 = New System.Windows.Forms.ToolStripMenuItem()
+        Me.EmpfängerToolStripMenuItem2 = New System.Windows.Forms.ToolStripMenuItem()
+        Me.AuftraggeberToolStripMenuItem2 = New System.Windows.Forms.ToolStripMenuItem()
+        Me.AvisiererToolStripMenuItem2 = New System.Windows.Forms.ToolStripMenuItem()
        Me.ContextMenuStrip2 = New System.Windows.Forms.ContextMenuStrip(Me.components)
        Me.GutschriftAusRechnungToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.SeperateRechnungFürEUSTToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.GutschriftAnVeragToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.VeragAGToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.VeragCSToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
-        Me.Button17 = New System.Windows.Forms.Button()
        Me.rtbAbf_Besonderheiten = New SDL.usrCntlKundenBesonderheiten()
        Me.pnlTop.SuspendLayout()
        Me.Panel3.SuspendLayout()
@@ -305,6 +310,7 @@ Partial Class usrCntlFaktAbrechnung
        CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.CntxtAbfArt.SuspendLayout()
        Me.ContextMenuStrip1.SuspendLayout()
+        Me.ContextMenuStrip3.SuspendLayout()
        Me.ContextMenuStrip2.SuspendLayout()
        Me.SuspendLayout()
        '
@@ -851,6 +857,20 @@ Partial Class usrCntlFaktAbrechnung
        Me.Panel1.Size = New System.Drawing.Size(830, 1142)
        Me.Panel1.TabIndex = 1
        '
+        'Button17
+        '
+        Me.Button17.BackgroundImageLayout = System.Windows.Forms.ImageLayout.None
+        Me.Button17.ContextMenuStrip = Me.ContextMenuStrip3
+        Me.Button17.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button17.Location = New System.Drawing.Point(656, 887)
+        Me.Button17.Margin = New System.Windows.Forms.Padding(10, 3, 3, 3)
+        Me.Button17.Name = "Button17"
+        Me.Button17.Padding = New System.Windows.Forms.Padding(20, 0, 0, 0)
+        Me.Button17.Size = New System.Drawing.Size(166, 24)
+        Me.Button17.TabIndex = 92
+        Me.Button17.Text = "E-Mail Erstellen"
+        Me.Button17.UseVisualStyleBackColor = True
+        '
        'txtTextZZ
        '
        Me.txtTextZZ.Location = New System.Drawing.Point(64, 1061)
@@ -3932,6 +3952,37 @@ Partial Class usrCntlFaktAbrechnung
        Me.AvisiererToolStripMenuItem.Size = New System.Drawing.Size(153, 22)
        Me.AvisiererToolStripMenuItem.Text = "4 Avisierer"
        '
+        'ContextMenuStrip3
+        '
+        Me.ContextMenuStrip3.ImageScalingSize = New System.Drawing.Size(24, 24)
+        Me.ContextMenuStrip3.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.AbsenderToolStripMenuItem2, Me.EmpfängerToolStripMenuItem2, Me.AuftraggeberToolStripMenuItem2, Me.AvisiererToolStripMenuItem2})
+        Me.ContextMenuStrip3.Name = "ContextMenuStrip3"
+        Me.ContextMenuStrip3.Size = New System.Drawing.Size(154, 92)
+        '
+        'AbsenderToolStripMenuItem2
+        '
+        Me.AbsenderToolStripMenuItem2.Name = "AbsenderToolStripMenuItem2"
+        Me.AbsenderToolStripMenuItem2.Size = New System.Drawing.Size(153, 22)
+        Me.AbsenderToolStripMenuItem2.Text = "1 Absender"
+        '
+        'EmpfängerToolStripMenuItem2
+        '
+        Me.EmpfängerToolStripMenuItem2.Name = "EmpfängerToolStripMenuItem2"
+        Me.EmpfängerToolStripMenuItem2.Size = New System.Drawing.Size(153, 22)
+        Me.EmpfängerToolStripMenuItem2.Text = "2 Empfänger"
+        '
+        'AuftraggeberToolStripMenuItem2
+        '
+        Me.AuftraggeberToolStripMenuItem2.Name = "AuftraggeberToolStripMenuItem2"
+        Me.AuftraggeberToolStripMenuItem2.Size = New System.Drawing.Size(153, 22)
+        Me.AuftraggeberToolStripMenuItem2.Text = "3 Auftraggeber"
+        '
+        'AvisiererToolStripMenuItem2
+        '
+        Me.AvisiererToolStripMenuItem2.Name = "AvisiererToolStripMenuItem2"
+        Me.AvisiererToolStripMenuItem2.Size = New System.Drawing.Size(153, 22)
+        Me.AvisiererToolStripMenuItem2.Text = "4 Avisierer"
+        '
        'ContextMenuStrip2
        '
        Me.ContextMenuStrip2.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.GutschriftAusRechnungToolStripMenuItem, Me.SeperateRechnungFürEUSTToolStripMenuItem, Me.GutschriftAnVeragToolStripMenuItem})
@@ -3969,19 +4020,6 @@ Partial Class usrCntlFaktAbrechnung
        Me.VeragCSToolStripMenuItem.Size = New System.Drawing.Size(122, 22)
        Me.VeragCSToolStripMenuItem.Text = "Verag CS"
        '
-        'Button17
-        '
-        Me.Button17.BackgroundImageLayout = System.Windows.Forms.ImageLayout.None
-        Me.Button17.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.Button17.Location = New System.Drawing.Point(656, 887)
-        Me.Button17.Margin = New System.Windows.Forms.Padding(10, 3, 3, 3)
-        Me.Button17.Name = "Button17"
-        Me.Button17.Padding = New System.Windows.Forms.Padding(20, 0, 0, 0)
-        Me.Button17.Size = New System.Drawing.Size(166, 24)
-        Me.Button17.TabIndex = 92
-        Me.Button17.Text = "E-Mail Erstellen"
-        Me.Button17.UseVisualStyleBackColor = True
-        '
        'rtbAbf_Besonderheiten
        '
        Me.rtbAbf_Besonderheiten.BackColor = System.Drawing.Color.White
@@ -4039,6 +4077,7 @@ Partial Class usrCntlFaktAbrechnung
        CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).EndInit()
        Me.CntxtAbfArt.ResumeLayout(False)
        Me.ContextMenuStrip1.ResumeLayout(False)
+        Me.ContextMenuStrip3.ResumeLayout(False)
        Me.ContextMenuStrip2.ResumeLayout(False)
        Me.ResumeLayout(False)

@@ -4262,10 +4301,16 @@ Partial Class usrCntlFaktAbrechnung
    Friend WithEvents SdfToolStripMenuItem As ToolStripMenuItem
    Friend WithEvents Button15 As Button
    Friend WithEvents ContextMenuStrip1 As ContextMenuStrip
+    Friend WithEvents Button17 As Button
    Friend WithEvents AbsenderToolStripMenuItem As ToolStripMenuItem
    Friend WithEvents EmpfängerToolStripMenuItem As ToolStripMenuItem
    Friend WithEvents AuftraggeberToolStripMenuItem As ToolStripMenuItem
    Friend WithEvents AvisiererToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents ContextMenuStrip3 As ContextMenuStrip
+    Friend WithEvents AbsenderToolStripMenuItem2 As ToolStripMenuItem
+    Friend WithEvents EmpfängerToolStripMenuItem2 As ToolStripMenuItem
+    Friend WithEvents AuftraggeberToolStripMenuItem2 As ToolStripMenuItem
+    Friend WithEvents AvisiererToolStripMenuItem2 As ToolStripMenuItem
    Friend WithEvents txtTextZZ As VERAG_PROG_ALLGEMEIN.MyRichTextBox
    Friend WithEvents Button16 As Button
    Friend WithEvents ContextMenuStrip2 As ContextMenuStrip
@@ -4278,5 +4323,5 @@ Partial Class usrCntlFaktAbrechnung
    Friend WithEvents VeragCSToolStripMenuItem As ToolStripMenuItem
    Friend WithEvents lblOFgesperrt As Label
    Friend WithEvents cboVorauskasse As VERAG_PROG_ALLGEMEIN.MyComboBox
-    Friend WithEvents Button17 As Button
+
 End Class