Показать сообщение отдельно
Старый 31.01.2008, 21:20   #10
Пользователь
 
Регистрация: 10.12.2007
Сообщений: 52
Сказал Спасибо: 22
Имеет 16 спасибок в 9 сообщенях
ChiterEPT
По умолчанию

Тоесть если я вызову процедуры из OnConnect они будут работать исключительно для этого соединения? Если это так-то нет смысла делать специальные процедуры. Сейчас проверю вызвать их из OnConnect.

Добавлено спустя 6 минут 24 секунды:
Все проверил. Если вызывать их из OnConnect они работают только для одного соединения! Один вопрос отпал.

Добавлено спустя 7 минут 14 секунд:
Сейчас поэксперементирую с YesFree... вызову его из другой процедуры может чего и получится...

Написал такой скрипт
Код:
begin
if FromServer and (pck[1]=#$4a) and (pck[6]=#$02) then begin
i:=10;
From:=ReadS(i);
Command:=ReadS(i);
case command of
'exit': begin
      YesFreeOnClientDisconnect;
      YesFreeOnServerDisconnect;
      end;
    end;
  end;
end.
Если он работоспособен, значит должен разрывать соединение при получении в приват "exit". Но соединение не разрывается. Или скрипт нерабочий, или процедуры YesFree... не работают должным образом.
ChiterEPT вне форума   Ответить с цитированием