Спасибо скачал 3.5.33.166
и дописал в скрипт
procedure Disconect;
begin
pck:='';
NoCloseServerAfterClientDisconnect;
NoCloseClientAfterServerDisconnect;
buf:=#$7E;
SendToClientex(charname);
end;
и в главный бегин вставил
if FromClient and (connectname=charname) then
case pck[1] of
#$09: Disconect;
end;
Вроде нормально почало пахать )
Добавлено через 1 минуту
Тема закрыта)
Последний раз редактировалось goodvin1709, 20.02.2011 в 15:26.
Причина: Добавлено сообщение
|