This commit is contained in:
2023-12-04 16:26:46 +01:00
11 changed files with 54 additions and 20 deletions

View File

@@ -247,7 +247,7 @@
</value>
</data>
<data name="btnSendEnvelope.Caption" xml:space="preserve">
<value>Umschlag senden</value>
<value>Einladungen versenden</value>
</data>
<data name="btnSendEnvelope.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>

View File

@@ -302,6 +302,8 @@ Partial Public Class frmEnvelopeEditor
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)
End If
End Sub

View File

@@ -42,7 +42,7 @@ Partial Class frmMain
Me.btnEditEnvelope = New DevExpress.XtraBars.BarButtonItem()
Me.btnDeleteEnvelope = New DevExpress.XtraBars.BarButtonItem()
Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonPageEnvelopeActions = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonStatusBar = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
Me.XtraTabPage2 = New DevExpress.XtraTab.XtraTabPage()
Me.GridCompleted = New DevExpress.XtraGrid.GridControl()
@@ -223,17 +223,17 @@ Partial Class frmMain
'
'RibbonPage1
'
Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1})
Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageEnvelopeActions})
Me.RibbonPage1.Name = "RibbonPage1"
resources.ApplyResources(Me.RibbonPage1, "RibbonPage1")
'
'RibbonPageGroup1
'RibbonPageEnvelopeActions
'
Me.RibbonPageGroup1.ItemLinks.Add(Me.btnCreateEnvelope)
Me.RibbonPageGroup1.ItemLinks.Add(Me.btnEditEnvelope)
Me.RibbonPageGroup1.ItemLinks.Add(Me.btnDeleteEnvelope)
Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
resources.ApplyResources(Me.RibbonPageGroup1, "RibbonPageGroup1")
Me.RibbonPageEnvelopeActions.ItemLinks.Add(Me.btnCreateEnvelope)
Me.RibbonPageEnvelopeActions.ItemLinks.Add(Me.btnEditEnvelope)
Me.RibbonPageEnvelopeActions.ItemLinks.Add(Me.btnDeleteEnvelope)
Me.RibbonPageEnvelopeActions.Name = "RibbonPageEnvelopeActions"
resources.ApplyResources(Me.RibbonPageEnvelopeActions, "RibbonPageEnvelopeActions")
'
'RibbonStatusBar
'
@@ -324,7 +324,7 @@ Partial Class frmMain
Friend WithEvents RibbonControl As DevExpress.XtraBars.Ribbon.RibbonControl
Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents RibbonPageEnvelopeActions As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents RibbonStatusBar As DevExpress.XtraBars.Ribbon.RibbonStatusBar
Friend WithEvents btnCreateEnvelope As DevExpress.XtraBars.BarButtonItem
Friend WithEvents GridEnvelopes As DevExpress.XtraGrid.GridControl

View File

@@ -318,7 +318,7 @@
<data name="RibbonControl.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 0</value>
</data>
<data name="RibbonPageGroup1.Text" xml:space="preserve">
<data name="RibbonPageEnvelopeActions.Text" xml:space="preserve">
<value>Funktionen</value>
</data>
<data name="RibbonPage1.Text" xml:space="preserve">
@@ -688,10 +688,10 @@
<data name="&gt;&gt;RibbonPage1.Type" xml:space="preserve">
<value>DevExpress.XtraBars.Ribbon.RibbonPage, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;RibbonPageGroup1.Name" xml:space="preserve">
<value>RibbonPageGroup1</value>
<data name="&gt;&gt;RibbonPageEnvelopeActions.Name" xml:space="preserve">
<value>RibbonPageEnvelopeActions</value>
</data>
<data name="&gt;&gt;RibbonPageGroup1.Type" xml:space="preserve">
<data name="&gt;&gt;RibbonPageEnvelopeActions.Type" xml:space="preserve">
<value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;ViewCompleted.Name" xml:space="preserve">

View File

@@ -160,4 +160,13 @@ Public Class frmMain
' Cleanup Methods
TempFiles.CleanUp()
End Sub
Private Sub XtraTabControl1_SelectedPageChanged(sender As Object, e As DevExpress.XtraTab.TabPageChangedEventArgs) Handles XtraTabControl1.SelectedPageChanged
Select Case XtraTabControl1.SelectedTabPageIndex
Case 1
RibbonPageEnvelopeActions.Enabled = False
Case 0
RibbonPageEnvelopeActions.Enabled = True
End Select
End Sub
End Class