Logik für AddIn Vollmachten eingebaut.

VERAGAddIn/frmAvisoFormularAnfügen.Designer.vb

@@ -35,10 +35,13 @@ Partial Class frmAvisoFormularAnfuegen
         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.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()
         Me.SuspendLayout()
         '
         'lblKunden
@@ -121,16 +124,16 @@ Partial Class frmAvisoFormularAnfuegen
         Me.MyPanel1.Controls.Add(Me.btnOK)
         Me.MyPanel1.Controls.Add(Me.btnCancel)
         Me.MyPanel1.Dock = System.Windows.Forms.DockStyle.Bottom
-        Me.MyPanel1.Location = New System.Drawing.Point(0, 513)
+        Me.MyPanel1.Location = New System.Drawing.Point(0, 523)
         Me.MyPanel1.Name = "MyPanel1"
-        Me.MyPanel1.Size = New System.Drawing.Size(514, 108)
+        Me.MyPanel1.Size = New System.Drawing.Size(526, 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(98, 12)
+        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
@@ -141,12 +144,13 @@ Partial Class frmAvisoFormularAnfuegen
         '
         Me.pbAnhaenge.Enabled = False
         Me.pbAnhaenge.Image = Global.VERAGAddIn.My.Resources.Resources.pdf
-        Me.pbAnhaenge.Location = New System.Drawing.Point(12, 12)
+        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
         '
@@ -157,7 +161,7 @@ Partial Class frmAvisoFormularAnfuegen
         Me.MyPanel2.Dock = System.Windows.Forms.DockStyle.Top
         Me.MyPanel2.Location = New System.Drawing.Point(0, 0)
         Me.MyPanel2.Name = "MyPanel2"
-        Me.MyPanel2.Size = New System.Drawing.Size(514, 114)
+        Me.MyPanel2.Size = New System.Drawing.Size(526, 114)
         Me.MyPanel2.TabIndex = 37
         '
         'lblVMId
@@ -177,12 +181,42 @@ Partial Class frmAvisoFormularAnfuegen
         Me.UsrCntlKundenZollVollmachten1.Size = New System.Drawing.Size(514, 387)
         Me.UsrCntlKundenZollVollmachten1.TabIndex = 38
         '
+        'dgvAnhaenge
+        '
+        Me.dgvAnhaenge.AKTUALISIERUNGS_INTERVALL = -1
+        Me.dgvAnhaenge.AllowUserToAddRows = False
+        Me.dgvAnhaenge.AllowUserToDeleteRows = False
+        Me.dgvAnhaenge.AllowUserToResizeColumns = False
+        Me.dgvAnhaenge.AllowUserToResizeRows = False
+        Me.dgvAnhaenge.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.dgvAnhaenge.BackgroundColor = System.Drawing.Color.White
+        Me.dgvAnhaenge.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+        Me.dgvAnhaenge.ColumnHeadersVisible = False
+        Me.dgvAnhaenge.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.columnName})
+        Me.dgvAnhaenge.Location = New System.Drawing.Point(0, 481)
+        Me.dgvAnhaenge.Name = "dgvAnhaenge"
+        Me.dgvAnhaenge.ReadOnly = True
+        Me.dgvAnhaenge.RowHeadersVisible = False
+        Me.dgvAnhaenge.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
+        Me.dgvAnhaenge.Size = New System.Drawing.Size(523, 48)
+        Me.dgvAnhaenge.TabIndex = 39
+        Me.dgvAnhaenge.Visible = False
+        '
+        'columnName
+        '
+        Me.columnName.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
+        Me.columnName.HeaderText = "Name"
+        Me.columnName.Name = "columnName"
+        Me.columnName.ReadOnly = True
+        '
         'frmAvisoFormularAnfuegen
         '
         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(514, 621)
+        Me.ClientSize = New System.Drawing.Size(526, 631)
+        Me.Controls.Add(Me.dgvAnhaenge)
         Me.Controls.Add(Me.UsrCntlKundenZollVollmachten1)
         Me.Controls.Add(Me.MyPanel2)
         Me.Controls.Add(Me.MyPanel1)
@@ -195,6 +229,7 @@ Partial Class frmAvisoFormularAnfuegen
         CType(Me.pbAnhaenge, System.ComponentModel.ISupportInitialize).EndInit()
         Me.MyPanel2.ResumeLayout(False)
         Me.MyPanel2.PerformLayout()
+        CType(Me.dgvAnhaenge, System.ComponentModel.ISupportInitialize).EndInit()
         Me.ResumeLayout(False)
 
     End Sub
@@ -209,4 +244,6 @@ Partial Class frmAvisoFormularAnfuegen
     Friend WithEvents MyPanel2 As VERAG_PROG_ALLGEMEIN.MyPanel
     Friend WithEvents lblVMId As Windows.Forms.Label
     Friend WithEvents UsrCntlKundenZollVollmachten1 As SDL.usrCntlKundenZollVollmachten
+    Friend WithEvents dgvAnhaenge As VERAG_PROG_ALLGEMEIN.MyDatagridview
+    Friend WithEvents columnName As Windows.Forms.DataGridViewTextBoxColumn
 End Class