jj 26.09 activate calendar tab on maximize
This commit is contained in:
parent
c4c19ea229
commit
3fa63f2a16
@ -773,11 +773,11 @@ Public Class frmMain
|
||||
End Sub
|
||||
|
||||
Private Sub ribbonMain_Merge(sender As Object, e As RibbonMergeEventArgs) Handles ribbonMain.Merge
|
||||
'TODO: ribbonMain.Pages enhtält immer noch nicht die pageCalendar >:(
|
||||
' Zeigt im Ribbon Control den Kalender-Tab an, wenn der Kalender Maximiert wurde
|
||||
If e.MergedChild.Name = "ribbonCalendar" Then
|
||||
For Each page As RibbonPage In Me.ribbonMain.Pages
|
||||
For Each page As RibbonPage In e.MergeOwner.MergedPages
|
||||
If page.Name = "pageCalendar" Then
|
||||
Me.ribbonMain.SelectedPage = page
|
||||
e.MergeOwner.SelectedPage = page
|
||||
End If
|
||||
Next
|
||||
End If
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user