2014-04-01 80 views
-2

我有一個項目,我將根據用戶的權限限制訪問某個DevExpress選項卡功能區。特別是,dxRibbon1tab1應該只能由管理員用戶訪問。我寫了下面的代碼,但它不與可見屬性如何限制訪問DevExpress選項卡功能區?

procedure Tfmenu.FormShow(Sender: TObject); 
begin 
    if (level) = 'admin' then 
    begin 
    dxRibbon1tab1.visible := True; 
    fmainform.Caption:= 'this is form for admin'; 
    end 
    else 
    begin 
    dxRibbon1tab1.visible:= False; 
    fmenu.Caption:='this is a form for user'; 
    end;   
end;   

如何讓非管理員用戶使用此特殊選項卡功能區?

+0

順便說一句:窗體類的內部方法只需使用Caption而不是Form1.Caption。 –

+0

什麼是「水平」和它在哪裏/如何設置?你有沒有嘗試調試?在'if(level)...'上放置一個斷點,並查看'level'的值是什麼。它是「管理員」嗎? –

+1

我剛試過它:「不工作」的意思是「不編譯」,因爲沒有'Enabled'屬性。快速瀏覽一下,我沒有看到其他方式來禁用功能區選項卡,但可以使用「可見」來隱藏它。 –

回答

2

您可能想要使用TdxRibbonTab.Visible來顯示/隱藏選項卡。

另一種選擇是上下文選項卡(在DevExpress幫助中搜索「功能區上下文選項卡」)。

第三個選項是使用TdxBar.Visible屬性來顯示/隱藏選項卡的某些部分。

要了解的DevExpress酒吧套房也看看他們的演示

2

還要確保您啓用/禁用與該選項卡上的按鈕相關的動作。即使該選項卡可能不可見,分配給這些操作的快捷鍵仍然有效。

相關問題