kleiner Änderungen bei AddIn-Vollmachten

2022-09-28 17:27:49 +02:00
parent 14c549f5bf
commit 02f1fa1c68
7 changed files with 87 additions and 61 deletions
--- a/VERAGAddIn/frmAvisoFormularAnfügen.Designer.vb
+++ b/VERAGAddIn/frmAvisoFormularAnfügen.Designer.vb
@@ -30,25 +30,24 @@ Partial Class frmAvisoFormularAnfuegen
        Me.btnCancel = New System.Windows.Forms.Button()
        Me.cbVMTypen = New VERAG_PROG_ALLGEMEIN.MyComboBox()
        Me.MyPanel1 = New VERAG_PROG_ALLGEMEIN.MyPanel(Me.components)
-        Me.pbMail = New System.Windows.Forms.PictureBox()
-        Me.pbAnhaenge = New System.Windows.Forms.PictureBox()
        Me.MyPanel2 = New VERAG_PROG_ALLGEMEIN.MyPanel(Me.components)
        Me.lblVMId = New System.Windows.Forms.Label()
        Me.UsrCntlKundenZollVollmachten1 = New SDL.usrCntlKundenZollVollmachten()
        Me.dgvAnhaenge = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
        Me.columnName = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        Me.pbAnhaenge = New System.Windows.Forms.PictureBox()
        Me.MyPanel1.SuspendLayout()
-        CType(Me.pbMail, System.ComponentModel.ISupportInitialize).BeginInit()
-        CType(Me.pbAnhaenge, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.MyPanel2.SuspendLayout()
        CType(Me.dgvAnhaenge, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.pbAnhaenge, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.SuspendLayout()
        '
        'lblKunden
        '
        Me.lblKunden.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
        Me.lblKunden.AutoSize = True
-        Me.lblKunden.Location = New System.Drawing.Point(12, 15)
+        Me.lblKunden.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lblKunden.Location = New System.Drawing.Point(12, 9)
        Me.lblKunden.Name = "lblKunden"
        Me.lblKunden.Size = New System.Drawing.Size(44, 13)
        Me.lblKunden.TabIndex = 2
@@ -80,6 +79,7 @@ Partial Class frmAvisoFormularAnfuegen
        Me.KdSearchBox._ValueKdAndName = True
        Me.KdSearchBox.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
        Me.KdSearchBox.dgvpos = "LEFT"
+        Me.KdSearchBox.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.KdSearchBox.HideSelection = False
        Me.KdSearchBox.KdName = ""
        Me.KdSearchBox.KdNr = "-1"
@@ -89,7 +89,7 @@ Partial Class frmAvisoFormularAnfuegen
        Me.KdSearchBox.Name = "KdSearchBox"
        Me.KdSearchBox.nurAktive = True
        Me.KdSearchBox.searchActive = True
-        Me.KdSearchBox.Size = New System.Drawing.Size(495, 20)
+        Me.KdSearchBox.Size = New System.Drawing.Size(495, 23)
        Me.KdSearchBox.TabIndex = 4
        Me.KdSearchBox.TIMER_SEARCH = True
        Me.KdSearchBox.usrcntl = Nothing
@@ -111,15 +111,15 @@ Partial Class frmAvisoFormularAnfuegen
        Me.cbVMTypen._allowFreiText = False
        Me.cbVMTypen._value = ""
        Me.cbVMTypen.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.cbVMTypen.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.cbVMTypen.FormattingEnabled = True
        Me.cbVMTypen.Location = New System.Drawing.Point(12, 81)
        Me.cbVMTypen.Name = "cbVMTypen"
-        Me.cbVMTypen.Size = New System.Drawing.Size(492, 21)
+        Me.cbVMTypen.Size = New System.Drawing.Size(492, 24)
        Me.cbVMTypen.TabIndex = 35
        '
        'MyPanel1
        '
-        Me.MyPanel1.Controls.Add(Me.pbMail)
        Me.MyPanel1.Controls.Add(Me.pbAnhaenge)
        Me.MyPanel1.Controls.Add(Me.btnOK)
        Me.MyPanel1.Controls.Add(Me.btnCancel)
@@ -129,29 +129,6 @@ Partial Class frmAvisoFormularAnfuegen
        Me.MyPanel1.Size = New System.Drawing.Size(521, 108)
        Me.MyPanel1.TabIndex = 36
        '
-        'pbMail
-        '
-        Me.pbMail.Enabled = False
-        Me.pbMail.Image = Global.VERAGAddIn.My.Resources.Resources.email_big1
-        Me.pbMail.Location = New System.Drawing.Point(12, 11)
-        Me.pbMail.Name = "pbMail"
-        Me.pbMail.Size = New System.Drawing.Size(55, 50)
-        Me.pbMail.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
-        Me.pbMail.TabIndex = 33
-        Me.pbMail.TabStop = False
-        '
-        'pbAnhaenge
-        '
-        Me.pbAnhaenge.Enabled = False
-        Me.pbAnhaenge.Image = Global.VERAGAddIn.My.Resources.Resources.pdf
-        Me.pbAnhaenge.Location = New System.Drawing.Point(73, 12)
-        Me.pbAnhaenge.Name = "pbAnhaenge"
-        Me.pbAnhaenge.Size = New System.Drawing.Size(65, 50)
-        Me.pbAnhaenge.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
-        Me.pbAnhaenge.TabIndex = 32
-        Me.pbAnhaenge.TabStop = False
-        Me.pbAnhaenge.Visible = False
-        '
        'MyPanel2
        '
        Me.MyPanel2.Controls.Add(Me.lblVMId)
@@ -168,7 +145,8 @@ Partial Class frmAvisoFormularAnfuegen
        '
        Me.lblVMId.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
        Me.lblVMId.AutoSize = True
-        Me.lblVMId.Location = New System.Drawing.Point(9, 64)
+        Me.lblVMId.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lblVMId.Location = New System.Drawing.Point(12, 61)
        Me.lblVMId.Name = "lblVMId"
        Me.lblVMId.Size = New System.Drawing.Size(69, 13)
        Me.lblVMId.TabIndex = 36
@@ -210,6 +188,17 @@ Partial Class frmAvisoFormularAnfuegen
        Me.columnName.Name = "columnName"
        Me.columnName.ReadOnly = True
        '
+        'pbAnhaenge
+        '
+        Me.pbAnhaenge.Enabled = False
+        Me.pbAnhaenge.Image = Global.VERAGAddIn.My.Resources.Resources.pdf_gray
+        Me.pbAnhaenge.Location = New System.Drawing.Point(15, 11)
+        Me.pbAnhaenge.Name = "pbAnhaenge"
+        Me.pbAnhaenge.Size = New System.Drawing.Size(65, 50)
+        Me.pbAnhaenge.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
+        Me.pbAnhaenge.TabIndex = 32
+        Me.pbAnhaenge.TabStop = False
+        '
        'frmAvisoFormularAnfuegen
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@@ -225,11 +214,10 @@ Partial Class frmAvisoFormularAnfuegen
        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
        Me.Text = "Formular anfügen"
        Me.MyPanel1.ResumeLayout(False)
-        CType(Me.pbMail, System.ComponentModel.ISupportInitialize).EndInit()
-        CType(Me.pbAnhaenge, System.ComponentModel.ISupportInitialize).EndInit()
        Me.MyPanel2.ResumeLayout(False)
        Me.MyPanel2.PerformLayout()
        CType(Me.dgvAnhaenge, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.pbAnhaenge, System.ComponentModel.ISupportInitialize).EndInit()
        Me.ResumeLayout(False)

    End Sub
@@ -239,7 +227,6 @@ Partial Class frmAvisoFormularAnfuegen
    Friend WithEvents btnCancel As Windows.Forms.Button
    Friend WithEvents cbVMTypen As VERAG_PROG_ALLGEMEIN.MyComboBox
    Friend WithEvents MyPanel1 As VERAG_PROG_ALLGEMEIN.MyPanel
-    Friend WithEvents pbMail As Windows.Forms.PictureBox
    Friend WithEvents pbAnhaenge As Windows.Forms.PictureBox
    Friend WithEvents MyPanel2 As VERAG_PROG_ALLGEMEIN.MyPanel
    Friend WithEvents lblVMId As Windows.Forms.Label