IsMember(Subject: ISecuritySubject): Boolean;
Subject - субъект безопасности, который необходимо проверить.
Метод IsMember осуществляет проверку наличия указанного субъекта безопасности в текущей группе пользователей.
Метод возвращает True, если субъект безопасности, передаваемый в качестве параметра Subject, является членом данной группы пользователей.
Sub Main;
Var
MB: IMetabase;
MS: IMetabaseSecurity;
MG: IMetabaseGroups;
MGroup: IMetabaseGroup;
SSS: ISecuritySubjects;
SS: ISecuritySubject;
S: String;
Begin
MB:=MetabaseClass.Active;
MS:=MB.Security;
MG:=MS.Groups;
MGroup:=MG.Item(0);
SSS:=MS.AllUsers;
SS:=SSS.Item(200);
If MGroup.IsMember(SS) Then
s:="Yes";
Else
s:="No";
End If;
End Sub Main;
После выполнения примера в переменной «s» будет содержаться «Yes» если пользователь с индексом «200» является членом первой группы пользователей.
См. также: