diff --git a/EnvelopeGenerator.Form/frmMain.Designer.vb b/EnvelopeGenerator.Form/frmMain.Designer.vb index d3c2dd55..ae744310 100644 --- a/EnvelopeGenerator.Form/frmMain.Designer.vb +++ b/EnvelopeGenerator.Form/frmMain.Designer.vb @@ -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() @@ -225,17 +225,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 ' @@ -326,7 +326,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 diff --git a/EnvelopeGenerator.Form/frmMain.resx b/EnvelopeGenerator.Form/frmMain.resx index 7ec7f7a6..27572997 100644 --- a/EnvelopeGenerator.Form/frmMain.resx +++ b/EnvelopeGenerator.Form/frmMain.resx @@ -318,7 +318,7 @@ 0, 0 - + Funktionen @@ -688,10 +688,10 @@ DevExpress.XtraBars.Ribbon.RibbonPage, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - RibbonPageGroup1 + + RibbonPageEnvelopeActions - + DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a diff --git a/EnvelopeGenerator.Form/frmMain.vb b/EnvelopeGenerator.Form/frmMain.vb index b7edc668..1fd89a6f 100644 --- a/EnvelopeGenerator.Form/frmMain.vb +++ b/EnvelopeGenerator.Form/frmMain.vb @@ -161,4 +161,12 @@ Public Class frmMain 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 \ No newline at end of file