Создать новую группу в личном списке контактов для указанного пользователя.

 

Синтаксис

function mPersonalContactsAddGroup(iUINOwner: integer; sGroupName: string): integer;

 

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

Параметр

Тип

Значение

iUINOwner

integer

уникальный идентификатор пользователя, >0;

sGroupName

string

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

 

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

>0

ошибок нет, группа успешно создана, результат = ID группы;

-1

группа с таким названием уже есть в личном списке контактов пользователя;

-2

название группы не может быть пустым или состоящим из пробелов;

-3

несуществующий UIN пользователя;

-4

название группы слишком длинное (ограничение не больше 255 символов по умолчанию);

-5

в названии группы есть недопустимые символы (CRLF, управляющие непечатные символы UNICODE или ASCII);

-6

UIN владельца группы не может быть 0 (встроенный робот).

 

Пример

const
  UIN_OWNER  = 6;
  GROUP_NAME = 'First group';
var
  iGroupID: integer;
  sMsg: string;
begin
  iGroupID := mPersonalContactsAddGroup(UIN_OWNER, GROUP_NAME);
   
    case iGroupID of
      -1: sMsg := 'group with this name is already exists';
      -2: sMsg := 'group name cannot be empty';
      -3: sMsg := 'owner uin does not exist';
      -4: sMsg := 'group name is too long';
      -5: sMsg := 'group name has invalid characters';
      -6: sMsg := 'you can''t use UIN = 0';
       else begin
         sMsg := 'all ok, GroupID = ' + IntToStr(iGroupID);
         mPersonalContactsRefresh(UIN_OWNER);
       end;
     end;
        
  mLogScript(sMsg, '');  
end.

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

[18:06:19] (Log "mPersonalContactsAddGroup"): all ok, GroupID = 1203

[18:06:19] (Run "mPersonalContactsAddGroup"): Время выполнения скрипта: 16 мс

[18:06:19] (Run "mPersonalContactsAddGroup"): Скрипт выполнен успешно.
 

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

IntToStr

mLogScript

mPersonalContactsRefresh