GetCurrentUserRights (TdbfMessageBox)
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 :