AppStd/EnvelopeGenerator
8
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

MS Selected Page Inactivate RibbonGroup

Browse Source
This commit is contained in:
SchreiberM 2023-12-04 16:19:45 +01:00
parent 62d88d6770
commit df02dcf0cf
3 changed files with 21 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
EnvelopeGenerator.Form/frmMain.Designer.vb generated
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()
@ -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

8
EnvelopeGenerator.Form/frmMain.resx
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">

8
EnvelopeGenerator.Form/frmMain.vb
View File

@ -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