This commit is contained in:
Jonathan Jenne
2022-03-04 11:01:40 +01:00
20 changed files with 4305 additions and 193 deletions

View File

@@ -94,6 +94,13 @@ Public Class frmAdmin_Start
If Handle_LoadPage(e.Node.Tag.ToString) Then
RibbonPageGroup1.Enabled = True
CurrentPage = e.Node.Tag.ToString
btnAddRecord.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
Select Case CurrentPage
Case PAGE_IDB_DOCTYPE
btnAddRecord.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
End Select
End If
Catch ex As Exception