Удалить пользователя из личного списка контактов указанного человека.
function mPersonalContactsDeleteUser(iUINOwner, iUIN: integer): integer;
Параметр |
Тип |
Значение |
|---|---|---|
iUINOwner |
integer |
уникальный идентификатор пользователя, владелец личного списка контактов, >0; |
iUIN |
integer |
идентификатор пользователя, которого нужно удалить UIN > 0. |
0 |
ошибок нет, пользователь успешно удалён; |
-1 |
личный список контактов владельца пуст; |
-2 |
удаляемого UIN-а нет в списке контактов владельца; |
-3 |
UIN владельца списка контактов не зарегистрирован на сервере; |
-4 |
UIN удаляемого пользователя не зарегистрирован на сервере; |
-5 |
UIN не может быть равным 0 (встроенный робот). |
const
UIN_OWNER = 6;
UIN_USER = 3;
var
sMsg: string;
iResult: integer;
begin
iResult := mPersonalContactsDeleteUser(UIN_OWNER, UIN_USER);
case iResult of
0: begin
sMsg := 'all ok!';
mPersonalContactsRefresh(UIN_OWNER);
end;
-1: sMsg := 'iUINOwner doesn''t have any contacts';
-2: sMsg := 'UIN is not in the list';
-3: sMsg := 'iUINOwner doesn''t exist';
-4: sMsg := 'iUIN doesn''t exist';
-5: sMsg := 'you can''t use the robot''s UIN :-[';
end;
mLogScript(sMsg, '');
end.[15:43:58] (Log "mPersonalContactsDeleteUser"): UIN is not in the list
[15:43:58] (Run "mPersonalContactsDeleteUser"): Время выполнения скрипта: 8 мс
[15:43:58] (Run "mPersonalContactsDeleteUser"): Скрипт выполнен успешно.