UserContext (Instance)

Syfre (discuter | contributions)
(Nouvelle page : <source lang='delphi'>property UserContext:TfwUserContext;</source> '''Lecture seule''' Cette propriété retourne le contexte utilisateur auquel est associé l'objet. {{tip|Le co...)
Modification suivante →

---

Version du 25 juillet 2009 à 16:34

property UserContext:TfwUserContext;

Lecture seule

Cette propriété retourne le contexte utilisateur auquel est associé l'objet.

Tip : Le contexte utilisateur contient les droits associés à l'utilisateur

Exemple: Prend en compte les droits de l'utilisateur dans un filtre

{Procedure _AddRights(var vWhere:String; aClassName:String);}
begin
  Result := FALSE;
  if UserContext.Rights.HasClassRestrictions(aClassName) then
  begin
    if vWhere='' then
      vWhere:='(' + UserContext.Rights.ClassRestrictions(aClassName) + ')'
    else
      vWhere:='('+ vWhere + ')and('+ UserContext.Rights.ClassRestrictions(aClassName) + ')';
  end;
end;

Voir aussi:

— Objets métiers (tech) — Développement DSM —