Отключить от сервера любого онлайн-пользователя и принудительно завершить работу его приложения.
procedure mHaltMyChatClient(iCID: integer);
Параметр |
Тип |
Значение |
---|---|---|
iCID |
integer |
уникальный идентификатор активного соединения пользователя. Если указанный CID не существует (пользователь отключен от сервера), то ничего не произойдёт. |
Функция отключает от сервера и завершает работу всех подключенных приложений.
var
sOnlineUINS: string;
iUIN, iCID: integer;
begin
sOnlineUINS := mGetUsersListByParams('online');
while length(sOnlineUINS) > 0 do begin
iUIN := StrToInt(GetNextSt(sOnlineUINS, ','));
iCID := mGetUserCID(iUIN);
mHaltMyChatClient(iCID);
end;
end.
[11:37:47] (Run "mHaltMyChatClient"): Время выполнения скрипта: 4 мс
[11:37:47] (Run "mHaltMyChatClient"): Скрипт выполнен успешно.