GetCurrentUserRights (TdbfMessageBox)
De Wiki1000
function GetCurrentUserRights:Integer;
Cette fonction retourne les droits de l'utilisateur courant sur la boîte.
Return | Droits de l'utilisateur sur la boîte. |
Exemple
function CheckCurrentReadAccess(const iBox:string):boolean; var box:TdbfMessageBox; begin box := TdbfMessageBox.FindBox(iBox); Result := Assigned(box) and ((box.GetCurrentUserRights and mbuRead)<>0); end;
Voir aussi :