8tomat8,
Почему? В ПНХ же есть ф-ции отключения клиента.
guplen,
Можно, но тогда придется не закрывать ПНХ и комп не вырубать).
Добавлено через 1 минуту
DELPHI Код:
const
name = 'НИК ВАШЕГО ЧАРА';
var
NetPing: string;
LogOutOk: boolean;
begin
if (ConnectName=name) and FromServer then begin
case pck[1] of
#$D3: begin
if LogOutOk then begin
buf:=NetPing;
SendToServerEx(name);
end;
end;
end;
end;
//****************************************************
if (ConnectName=name) and FromClient then begin
case pck[1] of
#$09: begin
NoFreeOnClientDisconnect;
NoFreeOnServerDisconnect;
pck:='';
buf:=#$7E;
SendToClientEx(name);
LogOutOk:=true;
end;
#$A8: begin
NetPing:=pck;
pck:='';
end;
end;
end;
end.
А вот собсно сам скрипт на отключение клиента.