MyChat Scripts: функция mGetUserRoleName, получить название группы прав пользователя

Получить название группы прав пользователя по его 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.