Форум: "Сети";
Текущий архив: 2003.02.27;
Скачать: [xml.tar.bz2];
ВнизПеребор активных соединений TServerSocket Найти похожие ветки
← →
DJ_Sedoy (2003-01-07 07:38) [0]Поскажите плз, как бы грамотнее сделать:
имеем TServerSocket, к которому подключено N количество TClientSocket.
Необходимо по событию onServerSocket1ClientDisconnect послать всем оставшимся любую строку. (Скажем так, для " контрольного обзвона").
← →
Мазут Береговой (2003-01-07 08:33) [1]var SSocket : TServerSocket;
S : string;
......
S:="Для контрольного обзвона...";
With SSocket.Socket do
For I:=0 to ActiveConnections - 1 do
If Connections[I].Connected
then Connections[I].SendText(S);
← →
DJ_Sedoy (2003-01-08 06:05) [2]Нет :(
Если имеем 10 соединений, и отключился кто-то "из середины", то последнего мы не обзвоним.
← →
mrcat (2003-01-08 13:43) [3]DJ_Sedoy © (08.01.03 06:05)
используйте Data: Pointer - удобно.
← →
DJ_Sedoy (2003-01-08 22:09) [4]В каком контексте? Просто не могу сообразить, что имеется в виду.
Страницы: 1 вся ветка
Форум: "Сети";
Текущий архив: 2003.02.27;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.006 c