Layout, ImEx

2025-06-18 08:46:01 +02:00
parent cba6e996f2
commit 6c26d1bafa
18 changed files with 15040 additions and 3580 deletions
--- a/Aviso/Benachrichtigung/frmAvisoWeiterleiten.Designer.vb
+++ b/Aviso/Benachrichtigung/frmAvisoWeiterleiten.Designer.vb
@@ -74,6 +74,7 @@ Partial Class frmAvisoWeiterleiten
        Me.btnVERIMEX = New System.Windows.Forms.Button()
        Me.btnAMBAR = New System.Windows.Forms.Button()
        Me.btnATILLA = New System.Windows.Forms.Button()
+        Me.Button2 = New System.Windows.Forms.Button()
        Me.Panel5 = New System.Windows.Forms.Panel()
        Me.Label6 = New System.Windows.Forms.Label()
        Me.dgvAnmhaenge = New System.Windows.Forms.DataGridView()
@@ -82,7 +83,6 @@ Partial Class frmAvisoWeiterleiten
        Me.Button1 = New System.Windows.Forms.Button()
        Me.Label5 = New System.Windows.Forms.Label()
        Me.rtbVermerk = New System.Windows.Forms.RichTextBox()
-        Me.Button2 = New System.Windows.Forms.Button()
        Me.pnl.SuspendLayout()
        CType(Me.pic, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.Panel2.SuspendLayout()
@@ -167,7 +167,7 @@ Partial Class frmAvisoWeiterleiten
        Me.Panel2.Dock = System.Windows.Forms.DockStyle.Left
        Me.Panel2.Location = New System.Drawing.Point(0, 37)
        Me.Panel2.Name = "Panel2"
-        Me.Panel2.Size = New System.Drawing.Size(320, 702)
+        Me.Panel2.Size = New System.Drawing.Size(320, 815)
        Me.Panel2.TabIndex = 17
        '
        'btnTeam
@@ -177,7 +177,7 @@ Partial Class frmAvisoWeiterleiten
        Me.btnTeam.FlatStyle = System.Windows.Forms.FlatStyle.Popup
        Me.btnTeam.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
        Me.btnTeam.ForeColor = System.Drawing.Color.White
-        Me.btnTeam.Location = New System.Drawing.Point(161, 643)
+        Me.btnTeam.Location = New System.Drawing.Point(161, 756)
        Me.btnTeam.Name = "btnTeam"
        Me.btnTeam.Size = New System.Drawing.Size(140, 42)
        Me.btnTeam.TabIndex = 14
@@ -191,7 +191,7 @@ Partial Class frmAvisoWeiterleiten
        Me.btnBenutzer.FlatStyle = System.Windows.Forms.FlatStyle.Popup
        Me.btnBenutzer.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
        Me.btnBenutzer.ForeColor = System.Drawing.Color.White
-        Me.btnBenutzer.Location = New System.Drawing.Point(15, 643)
+        Me.btnBenutzer.Location = New System.Drawing.Point(15, 756)
        Me.btnBenutzer.Name = "btnBenutzer"
        Me.btnBenutzer.Size = New System.Drawing.Size(140, 42)
        Me.btnBenutzer.TabIndex = 13
@@ -222,7 +222,7 @@ Partial Class frmAvisoWeiterleiten
        Me.dgvMitarbeiter.Name = "dgvMitarbeiter"
        Me.dgvMitarbeiter.RowHeadersVisible = False
        Me.dgvMitarbeiter.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
-        Me.dgvMitarbeiter.Size = New System.Drawing.Size(286, 589)
+        Me.dgvMitarbeiter.Size = New System.Drawing.Size(286, 702)
        Me.dgvMitarbeiter.TabIndex = 10
        '
        'MyTextBox1
@@ -258,7 +258,7 @@ Partial Class frmAvisoWeiterleiten
        Me.Panel4.Dock = System.Windows.Forms.DockStyle.Fill
        Me.Panel4.Location = New System.Drawing.Point(320, 37)
        Me.Panel4.Name = "Panel4"
-        Me.Panel4.Size = New System.Drawing.Size(792, 702)
+        Me.Panel4.Size = New System.Drawing.Size(792, 815)
        Me.Panel4.TabIndex = 20
        '
        'Panel1
@@ -270,7 +270,7 @@ Partial Class frmAvisoWeiterleiten
        Me.Panel1.Dock = System.Windows.Forms.DockStyle.Left
        Me.Panel1.Location = New System.Drawing.Point(200, 57)
        Me.Panel1.Name = "Panel1"
-        Me.Panel1.Size = New System.Drawing.Size(577, 468)
+        Me.Panel1.Size = New System.Drawing.Size(577, 581)
        Me.Panel1.TabIndex = 20
        '
        'flpFirma
@@ -278,7 +278,7 @@ Partial Class frmAvisoWeiterleiten
        Me.flpFirma.Dock = System.Windows.Forms.DockStyle.Fill
        Me.flpFirma.Location = New System.Drawing.Point(0, 28)
        Me.flpFirma.Name = "flpFirma"
-        Me.flpFirma.Size = New System.Drawing.Size(575, 438)
+        Me.flpFirma.Size = New System.Drawing.Size(575, 551)
        Me.flpFirma.TabIndex = 1
        '
        'Panel3
@@ -430,7 +430,7 @@ Partial Class frmAvisoWeiterleiten
        Me.Panel7.Dock = System.Windows.Forms.DockStyle.Left
        Me.Panel7.Location = New System.Drawing.Point(0, 57)
        Me.Panel7.Name = "Panel7"
-        Me.Panel7.Size = New System.Drawing.Size(200, 468)
+        Me.Panel7.Size = New System.Drawing.Size(200, 581)
        Me.Panel7.TabIndex = 19
        '
        'flpTeams
@@ -438,7 +438,7 @@ Partial Class frmAvisoWeiterleiten
        Me.flpTeams.Dock = System.Windows.Forms.DockStyle.Fill
        Me.flpTeams.Location = New System.Drawing.Point(0, 28)
        Me.flpTeams.Name = "flpTeams"
-        Me.flpTeams.Size = New System.Drawing.Size(198, 438)
+        Me.flpTeams.Size = New System.Drawing.Size(198, 551)
        Me.flpTeams.TabIndex = 1
        '
        'Panel8
@@ -675,6 +675,17 @@ Partial Class frmAvisoWeiterleiten
        Me.btnATILLA.Text = "ATILLA"
        Me.btnATILLA.UseVisualStyleBackColor = True
        '
+        'Button2
+        '
+        Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Popup
+        Me.Button2.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
+        Me.Button2.Location = New System.Drawing.Point(3, 52)
+        Me.Button2.Name = "Button2"
+        Me.Button2.Size = New System.Drawing.Size(120, 43)
+        Me.Button2.TabIndex = 12
+        Me.Button2.Text = "WARENORT"
+        Me.Button2.UseVisualStyleBackColor = True
+        '
        'Panel5
        '
        Me.Panel5.BackColor = System.Drawing.Color.SeaShell
@@ -684,7 +695,7 @@ Partial Class frmAvisoWeiterleiten
        Me.Panel5.Controls.Add(Me.Label5)
        Me.Panel5.Controls.Add(Me.rtbVermerk)
        Me.Panel5.Dock = System.Windows.Forms.DockStyle.Bottom
-        Me.Panel5.Location = New System.Drawing.Point(0, 525)
+        Me.Panel5.Location = New System.Drawing.Point(0, 638)
        Me.Panel5.Name = "Panel5"
        Me.Panel5.Size = New System.Drawing.Size(790, 175)
        Me.Panel5.TabIndex = 22
@@ -762,23 +773,12 @@ Partial Class frmAvisoWeiterleiten
        Me.rtbVermerk.TabIndex = 0
        Me.rtbVermerk.Text = ""
        '
-        'Button2
-        '
-        Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Popup
-        Me.Button2.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
-        Me.Button2.Location = New System.Drawing.Point(3, 52)
-        Me.Button2.Name = "Button2"
-        Me.Button2.Size = New System.Drawing.Size(120, 43)
-        Me.Button2.TabIndex = 12
-        Me.Button2.Text = "WARENORT"
-        Me.Button2.UseVisualStyleBackColor = True
-        '
        'frmAvisoWeiterleiten
        '
        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(1112, 739)
+        Me.ClientSize = New System.Drawing.Size(1112, 852)
        Me.Controls.Add(Me.Panel4)
        Me.Controls.Add(Me.Panel2)
        Me.Controls.Add(Me.pnl)
--- a/Aviso/Benachrichtigung/frmAvisoWeiterleiten.vb
+++ b/Aviso/Benachrichtigung/frmAvisoWeiterleiten.vb
@@ -272,6 +272,7 @@ Public Class frmAvisoWeiterleiten
            addBtn(flpFirma, "N", "NKN", "VERAG Neunkirchen (Saar)")

            addBtn(flpFirma, "A", "FISK", "VERAG Fiskal")
+            addBtn(flpFirma, "A", "VRR", "VERRECHNUNG")

            Dim dt As DataTable = SQL.loadDgvBySql("SELECT team_id, team_bezeichnung FROM tblTeams WHERE team_firma='VERAG' order by team_id", "ADMIN")
            If dt IsNot Nothing Then