[J-Fobos]

kakashonog111, на крайний случай, если вас не устраивают эти пакеты можно рвать соединение средсвами пх

begin
if fromserver and (pck='тут пакет') then begin
DisconnectServer; DisconnectClient; end;
end.