2023-09-25

EnvelopeGenerator.Form/frmEnvelopeEditor.vb

@@ -61,7 +61,8 @@ Partial Public Class frmEnvelopeEditor
             Next
 
             If Envelope.Status = Constants.EnvelopeStatus.Sent Then
-                SetFormReadonly()
+                ' TODO - Nach Testen
+                ' SetFormReadonly()
             End If
         End If
 
@@ -223,7 +224,11 @@ Partial Public Class frmEnvelopeEditor
                 .EnvelopeTitle = Controller.Envelope.Title,
                 .EnvelopeContractType = Controller.Envelope.ContractType
             }
-        oForm.ShowDialog()
+        If oForm.ShowDialog() = DialogResult.OK Then
+            Controller.Envelope.Title = oForm.EnvelopeTitle
+            Controller.Envelope.ContractType = oForm.EnvelopeContractType
+
+        End If
     End Sub
 
     Private Sub GridReceivers_PaintEx(sender As Object, e As DevExpress.XtraGrid.PaintExEventArgs) Handles GridReceivers.PaintEx