2023-12-04

- Anpassungen Main Form
- Titel wird initial in das Subject geschrieben

EnvelopeGenerator.Common/Entities/Envelope.vb

@@ -29,8 +29,6 @@
         End Get
     End Property
 
-
-
     Public Function ValidateReceiverDocumentData() As List(Of String)
         Dim oErrors As New List(Of String)
 
@@ -45,6 +43,4 @@
         Return oErrors
     End Function
 
-
-
 End Class

EnvelopeGenerator.Form/frmEnvelopeEditor.vb

@@ -57,6 +57,7 @@ Partial Public Class frmEnvelopeEditor
             If oResult = DialogResult.OK Then
                 Controller.Envelope.Title = oDataForm.EnvelopeTitle
                 Controller.Envelope.ContractType = oDataForm.EnvelopeContractType
+                Controller.Envelope.Subject += " " + oDataForm.EnvelopeTitle
             Else
                 Me.Close()
             End If

EnvelopeGenerator.Form/frmMain.Designer.vb

@@ -27,8 +27,9 @@ Partial Class frmMain
         Me.XtraTabPage1 = New DevExpress.XtraTab.XtraTabPage()
         Me.GridEnvelopes = New DevExpress.XtraGrid.GridControl()
         Me.ViewReceivers = New DevExpress.XtraGrid.Views.Grid.GridView()
-        Me.ColEmail = New DevExpress.XtraGrid.Columns.GridColumn()
         Me.ColReceiverStatus = New DevExpress.XtraGrid.Columns.GridColumn()
+        Me.ColName = New DevExpress.XtraGrid.Columns.GridColumn()
+        Me.ColEmail = New DevExpress.XtraGrid.Columns.GridColumn()
         Me.ViewEnvelopes = New DevExpress.XtraGrid.Views.Grid.GridView()
         Me.colContractType = New DevExpress.XtraGrid.Columns.GridColumn()
         Me.colStatus = New DevExpress.XtraGrid.Columns.GridColumn()
@@ -109,26 +110,38 @@ Partial Class frmMain
         Me.GridEnvelopes.MainView = Me.ViewEnvelopes
         Me.GridEnvelopes.MenuManager = Me.RibbonControl
         Me.GridEnvelopes.Name = "GridEnvelopes"
+        Me.GridEnvelopes.ShowOnlyPredefinedDetails = True
         Me.GridEnvelopes.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.ViewReceivers, Me.ViewEnvelopes})
         '
         'ViewReceivers
         '
-        Me.ViewReceivers.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.ColEmail, Me.ColReceiverStatus})
+        Me.ViewReceivers.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.ColReceiverStatus, Me.ColName, Me.ColEmail})
         Me.ViewReceivers.GridControl = Me.GridEnvelopes
         Me.ViewReceivers.Name = "ViewReceivers"
+        Me.ViewReceivers.OptionsDetail.AllowZoomDetail = False
+        Me.ViewReceivers.OptionsView.ShowDetailButtons = False
+        Me.ViewReceivers.OptionsView.ShowGroupPanel = False
+        Me.ViewReceivers.OptionsView.ShowIndicator = False
         resources.ApplyResources(Me.ViewReceivers, "ViewReceivers")
         '
-        'ColEmail
-        '
-        resources.ApplyResources(Me.ColEmail, "ColEmail")
-        Me.ColEmail.FieldName = "Email"
-        Me.ColEmail.Name = "ColEmail"
-        '
         'ColReceiverStatus
         '
         resources.ApplyResources(Me.ColReceiverStatus, "ColReceiverStatus")
         Me.ColReceiverStatus.FieldName = "Status"
         Me.ColReceiverStatus.Name = "ColReceiverStatus"
+        Me.ColReceiverStatus.OptionsColumn.AllowEdit = False
+        '
+        'ColName
+        '
+        resources.ApplyResources(Me.ColName, "ColName")
+        Me.ColName.FieldName = "Name"
+        Me.ColName.Name = "ColName"
+        '
+        'ColEmail
+        '
+        resources.ApplyResources(Me.ColEmail, "ColEmail")
+        Me.ColEmail.FieldName = "Email"
+        Me.ColEmail.Name = "ColEmail"
         '
         'ViewEnvelopes
         '
@@ -327,4 +340,5 @@ Partial Class frmMain
     Friend WithEvents GridColumn5 As DevExpress.XtraGrid.Columns.GridColumn
     Friend WithEvents GridColumn6 As DevExpress.XtraGrid.Columns.GridColumn
     Friend WithEvents GridColumn7 As DevExpress.XtraGrid.Columns.GridColumn
+    Friend WithEvents ColName As DevExpress.XtraGrid.Columns.GridColumn
 End Class

EnvelopeGenerator.Form/frmMain.resx

@@ -134,25 +134,43 @@
   <data name="GridEnvelopes.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
     <value>Fill</value>
   </data>
-  <data name="ColEmail.Caption" xml:space="preserve">
-    <value>Email</value>
-  </data>
-  <assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
-  <data name="ColEmail.Visible" type="System.Boolean, mscorlib">
-    <value>True</value>
-  </data>
-  <data name="ColEmail.VisibleIndex" type="System.Int32, mscorlib">
-    <value>0</value>
-  </data>
   <data name="ColReceiverStatus.Caption" xml:space="preserve">
     <value>Status</value>
   </data>
+  <assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
   <data name="ColReceiverStatus.Visible" type="System.Boolean, mscorlib">
     <value>True</value>
   </data>
   <data name="ColReceiverStatus.VisibleIndex" type="System.Int32, mscorlib">
+    <value>0</value>
+  </data>
+  <data name="ColReceiverStatus.Width" type="System.Int32, mscorlib">
+    <value>145</value>
+  </data>
+  <data name="ColName.Caption" xml:space="preserve">
+    <value>Name</value>
+  </data>
+  <data name="ColName.Visible" type="System.Boolean, mscorlib">
+    <value>True</value>
+  </data>
+  <data name="ColName.VisibleIndex" type="System.Int32, mscorlib">
     <value>1</value>
   </data>
+  <data name="ColName.Width" type="System.Int32, mscorlib">
+    <value>456</value>
+  </data>
+  <data name="ColEmail.Caption" xml:space="preserve">
+    <value>Email</value>
+  </data>
+  <data name="ColEmail.Visible" type="System.Boolean, mscorlib">
+    <value>True</value>
+  </data>
+  <data name="ColEmail.VisibleIndex" type="System.Int32, mscorlib">
+    <value>2</value>
+  </data>
+  <data name="ColEmail.Width" type="System.Int32, mscorlib">
+    <value>460</value>
+  </data>
   <data name="ViewReceivers.ViewCaption" xml:space="preserve">
     <value>Empfänger</value>
   </data>
@@ -169,7 +187,7 @@
     <value>0</value>
   </data>
   <data name="colContractType.Width" type="System.Int32, mscorlib">
-    <value>133</value>
+    <value>120</value>
   </data>
   <data name="colStatus.Caption" xml:space="preserve">
     <value>Status</value>
@@ -181,7 +199,7 @@
     <value>1</value>
   </data>
   <data name="colStatus.Width" type="System.Int32, mscorlib">
-    <value>54</value>
+    <value>119</value>
   </data>
   <data name="colTitle.Caption" xml:space="preserve">
     <value>Titel</value>
@@ -193,7 +211,7 @@
     <value>2</value>
   </data>
   <data name="colTitle.Width" type="System.Int32, mscorlib">
-    <value>159</value>
+    <value>352</value>
   </data>
   <data name="colSubject.Caption" xml:space="preserve">
     <value>Betreff</value>
@@ -205,7 +223,7 @@
     <value>3</value>
   </data>
   <data name="colSubject.Width" type="System.Int32, mscorlib">
-    <value>159</value>
+    <value>352</value>
   </data>
   <data name="colAddedWhen.Caption" xml:space="preserve">
     <value>Erstellt am</value>
@@ -217,7 +235,7 @@
     <value>4</value>
   </data>
   <data name="colAddedWhen.Width" type="System.Int32, mscorlib">
-    <value>51</value>
+    <value>118</value>
   </data>
   <data name="btnCreateEnvelope.Caption" xml:space="preserve">
     <value>Neuer Umschlag</value>
@@ -574,18 +592,24 @@
   <data name="&gt;&gt;ViewReceivers.Type" xml:space="preserve">
     <value>DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
-  <data name="&gt;&gt;ColEmail.Name" xml:space="preserve">
-    <value>ColEmail</value>
-  </data>
-  <data name="&gt;&gt;ColEmail.Type" xml:space="preserve">
-    <value>DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
   <data name="&gt;&gt;ColReceiverStatus.Name" xml:space="preserve">
     <value>ColReceiverStatus</value>
   </data>
   <data name="&gt;&gt;ColReceiverStatus.Type" xml:space="preserve">
     <value>DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
+  <data name="&gt;&gt;ColName.Name" xml:space="preserve">
+    <value>ColName</value>
+  </data>
+  <data name="&gt;&gt;ColName.Type" xml:space="preserve">
+    <value>DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;ColEmail.Name" xml:space="preserve">
+    <value>ColEmail</value>
+  </data>
+  <data name="&gt;&gt;ColEmail.Type" xml:space="preserve">
+    <value>DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
   <data name="&gt;&gt;ViewEnvelopes.Name" xml:space="preserve">
     <value>ViewEnvelopes</value>
   </data>