Abfrage vor Senden des Umschlags ergänzt

EnvelopeGenerator.Common/Strings/Envelope.en.resx

@@ -123,6 +123,9 @@
   <data name="Do you want to delete the selected recipient" xml:space="preserve">
     <value>Do you want to delete the selected recipient?</value>
   </data>
+  <data name="Do you want to start the signature process now" xml:space="preserve">
+    <value>Do you want to start the signature process now?</value>
+  </data>
   <data name="Document Could Not Be Saved" xml:space="preserve">
     <value>Document could not be saved!</value>
   </data>
@@ -153,6 +156,9 @@
   <data name="Error when saving the recipients" xml:space="preserve">
     <value>Error when saving the recipients!</value>
   </data>
+  <data name="Error when validating the envelope" xml:space="preserve">
+    <value>Error when validating the envelope:</value>
+  </data>
   <data name="Errors when saving the envelope" xml:space="preserve">
     <value>Errors when saving the envelope</value>
   </data>

EnvelopeGenerator.Common/Strings/Envelope.resx

@@ -123,6 +123,9 @@
   <data name="Do you want to delete the selected recipient" xml:space="preserve">
     <value>Wollen Sie den ausgewählten Empfänger löschen?</value>
   </data>
+  <data name="Do you want to start the signature process now" xml:space="preserve">
+    <value>Wollen Sie den Signaturprozess nun starten?</value>
+  </data>
   <data name="Document Could Not Be Saved" xml:space="preserve">
     <value>Dokument konnte nicht gespeichert werden!</value>
   </data>
@@ -153,6 +156,9 @@
   <data name="Error when saving the recipients" xml:space="preserve">
     <value>Fehler beim Speichern der Empfänger!</value>
   </data>
+  <data name="Error when validating the envelope" xml:space="preserve">
+    <value>Fehler bei der Validierung des Umschlags:</value>
+  </data>
   <data name="Errors when saving the envelope" xml:space="preserve">
     <value>Fehler beim Speichern des Umschlags: </value>
   </data>

EnvelopeGenerator.Common/Strings/Envelope1.Designer.vb

@@ -82,6 +82,15 @@ Namespace My.Resources
             End Get
         End Property
         
+        '''<summary>
+        '''  Sucht eine lokalisierte Zeichenfolge, die Wollen Sie den Signaturprozess nun starten? ähnelt.
+        '''</summary>
+        Public Shared ReadOnly Property Do_you_want_to_start_the_signature_process_now() As String
+            Get
+                Return ResourceManager.GetString("Do you want to start the signature process now", resourceCulture)
+            End Get
+        End Property
+        
         '''<summary>
         '''  Sucht eine lokalisierte Zeichenfolge, die Dokument konnte nicht gespeichert werden! ähnelt.
         '''</summary>
@@ -172,6 +181,15 @@ Namespace My.Resources
             End Get
         End Property
         
+        '''<summary>
+        '''  Sucht eine lokalisierte Zeichenfolge, die Fehler bei der Validierung des Umschlags: ähnelt.
+        '''</summary>
+        Public Shared ReadOnly Property Error_when_validating_the_envelope() As String
+            Get
+                Return ResourceManager.GetString("Error when validating the envelope", resourceCulture)
+            End Get
+        End Property
+        
         '''<summary>
         '''  Sucht eine lokalisierte Zeichenfolge, die Fehler beim Speichern des Umschlags:  ähnelt.
         '''</summary>

EnvelopeGenerator.Form/frmEnvelopeEditor.vb

@@ -297,14 +297,21 @@ Partial Public Class frmEnvelopeEditor
         oErrors = Controller.ValidateEnvelopeForSending(oErrors)
 
         If oErrors.Any() Then
-            ShowValidationErrors(Resources.Envelope.Error_sending_the_envelope, oErrors)
+            ShowValidationErrors(Resources.Envelope.Error_when_validating_the_envelope, oErrors)
+            Exit Sub
+        End If
+
+        Dim oMessage = Resources.Envelope.Do_you_want_to_start_the_signature_process_now
+        If MsgBox(oMessage, MsgBoxStyle.Question Or MsgBoxStyle.YesNo, Text) = MsgBoxResult.No Then
             Exit Sub
         End If
 
         If Controller.SendEnvelope() = False Then
             MsgBox(Resources.Envelope.Envelope_could_not_be_sent, MsgBoxStyle.Critical, Text)
         Else
-            MsgBox(Resources.Envelope.Envelope_Invitations_Sent, MsgBoxStyle.Information, Text)
+            If MsgBox(Resources.Envelope.Envelope_Invitations_Sent, MsgBoxStyle.Information Or MsgBoxStyle.OkOnly, Text) = MsgBoxResult.Ok Then
+                Me.Close()
+            End If
         End If
     End Sub