Получить название группы прав пользователя по его UIN.

 

Синтаксис

function mGetUserRoleName(iUIN: integer): string;

 

Параметры и возвращаемые значения

Параметр

Тип

Значение

iUIN

integer

уникальный идентификатор пользователя.

 

Результат функции

Название группы прав пользователя, если он существует. Если указан несуществующий UIN, будет возвращена пустая строка.

 

Пример
Подсчёт количества пользователей в группах прав "Guests" и "WEB guests".

var 
  sRoleName: string;
  i, iMaxUIN, iGuestsCount, iWEBGuestsCount: integer;
begin
  iMaxUIN         := mGetMaxRegisteredUIN;
  iGuestsCount    := 0;
  iWEBGuestsCount := 0;
  
  mLogScript('Max registered UIN: ' + inttostr(iMaxUIN), '');
  
    for i := 1 to iMaxUIN do
      if mIsUINExists(i) then begin
        sRoleName := mGetUserRoleName(i);
          if sRoleName = 'Guests' then inc(iGuestsCount) else
          if sRoleName = 'WEB guests' then inc(iWEBGuestsCount);
      end;
      
  mLogScript('Guests count: ' + inttostr(iGuestsCount), '');
  mLogScript('WEB Guests count: ' + inttostr(iWEBGuestsCount), '');
end.

Результат работы скрипта

[17:16:28] (Log "mGetUserRoleName"): Max registered UIN: 15868

[17:16:28] (Log "mGetUserRoleName"): Guests count: 3985

[17:16:28] (Log "mGetUserRoleName"): WEB Guests count: 927

[17:16:28] (Run "mGetUserRoleName"): Время выполнения скрипта: 706 мс

[17:16:28] (Run "mGetUserRoleName"): Скрипт выполнен успешно.

 

Ещё посмотреть

IntToStr

mGetMaxRegisteredUIN

mLogScript