MyChat Scripts: функция mGetUserDepartmentName, имя группы пользователя в общем списке контактов
Получить название департамента пользователя из общего списка контактов по идентификатору пользователя (UIN).
Синтаксис
function mGetUserDepartmentName(iUIN: integer): string;
Параметры и возвращаемые значения
|
Параметр |
Тип |
Значение |
|
iUIN |
integer |
уникальный идентификатор пользователя. |
Результат функции
Название группы. Если общий список контактов пуст, UIN пользователя не существует или не находится в общем списке контактов, будет возвращена пустая строка.
Пример
В примере перебираются все зарегистрированные пользователи сервера, начиная с UIIN = 1, если кто-то из них входит в общий список контактов, то выводится в консоль UIN этого пользователя, его отображаемое имя в чате и название группы в общем списке контактов.
var
i, iMax: integer;
s, sName: string;
begin
iMax := mGetMaxRegisteredUIN;
s := '';
for i := 1 to iMax do
if mIsUINExists(i) then begin
sName := mGetUserDepartmentName(i);
if length(sName) > 0 then begin
s := s +
'User UIN ' + inttostr(i) +
', Name: "' + mGetUserAttribute(i, 'DisplayName') + '" ' +
'is in common contacts list, group : "' + sName + '"' +
CRLF;
end;
end;
if length(s) > 0 then mLogScript(s, '')
else mLogScript('Common contacts list is empty!', '');
end.
Результат работы скрипта
[11:48:05] (Log "mGetUserDepartmentName"): User UIN 3, Name: "Андрей Раков" is in common contacts list, group : "Teamleads"
User UIN 6, Name: "Алексей Пикуров" is in common contacts list, group : "Отдел продаж"
User UIN 5454, Name: "Ноутбук Асеров" is in common contacts list, group : "Бухгалтерия"
User UIN 15427, Name: "Георгий Лысенко" is in common contacts list, group : "Разработчики MyChat"
[11:48:05] (Run "mGetUserDepartmentName"): Время выполнения скрипта: 703 мс
[11:48:05] (Run "mGetUserDepartmentName"): Скрипт выполнен успешно.