Получить полный текстовый путь к указанной группе (департаменту) из общего древовидного списка контактов от корня, по его числовому идентификатору.
function mGetDepartmentTextPathByID(iID: integer): string;
Параметр |
Тип |
Значение |
---|---|---|
iID |
integer |
числовой идентификатор группы в общем списке контактов сервера MyChat. |
Полный путь от корня, названия групп разделяются между собой символом обратного слеша ("\"). Если общий список контактов пуст или идентификатора группы не существует, будет возвращена пустая строка.
const
iUIN = 6;
var
iUserDeptID: integer;
sPath, sUserDisplayName: string;
begin
iUserDeptID := mGetUserDepartmentID(iUIN);
if iUserDeptID > 0 then begin
sPath := mGetDepartmentTextPathByID(iUserDeptID);
sUserDisplayName := mGetUserAttribute(iUIN, 'DisplayName');
mLogScript('User "' + sUserDisplayName + '" UIN ' + inttostr(iUIN) + ' is in the "' + sPath + '" group of common contacts', '');
end else mLogScript('User "' + sUserDisplayName + '" UIN ' + inttostr(iUIN) + ' isn''t in the common contacts list', '');
end.
[15:26:34] (Log "mGetDepartmentTextPathByID"): User "Алексей Пикуров" UIN 6 is in the "Разработчики MyChat\Teamleads" group of common contacts
[15:26:34] (Run "mGetDepartmentTextPathByID"): Время выполнения скрипта: 7 мс
[15:26:34] (Run "mGetDepartmentTextPathByID"): Скрипт выполнен успешно.