Скрипты Simple-Scada

Синтаксис

function MemberOf(AUserGroupID: Int64): Boolean;

Описание

Возвращает True, если пользователь состоит в группе AUserGroupID. Узнать ID нужной группы можно в меню редактирования пользователей. Получить текущего авторизованного пользователя можно при помощи функции GetCurrentUser.

Пример кода

Допустим, имеется группа "Администраторы" и ее ID = 1. Необходимо проверить, состоит ли пользователь в этой группе и выполнить требуемые действия.

var
  aUser: TM_User;
begin
  // получаем пользователя, под которым авторизован клиент
  aUser := GetCurrentUser;
 
  // если пользователь получен
  if aUser <> nil then
    // и состоит в группе "Администраторы"
    if aUser.MemberOf(1) then
    begin
      // то выполняем нужные действия
    end;
end.