user admin check for bsiSource

2023-08-02 08:23:52 +02:00 · 2023-08-02 08:23:52 +02:00 · 89df2495e7
commit 89df2495e7
parent 5196bcda8e
1 changed files with 6 additions and 0 deletions
--- a/app/DD-Record-Organizer/frmDoc_Links.vb
+++ b/app/DD-Record-Organizer/frmDoc_Links.vb
@ -9,6 +9,12 @@ Public Class frmDoc_Links
        Try
            Refresh_Grid_Data(Documents)

+            If USER_IS_ADMIN Then
+                bsiSource.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
+            Else
+                bsiSource.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
+            End If
+
            ' TODO: this does not work for the old form
            If Documents.Count = 0 Then
                Text = $"Document-Links for: NODOC-ID"