Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.02.27;
Скачать: CL | DM;

Вниз

Перебор активных соединений 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;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.021 c
1-87421
Nikolai_S
2003-02-18 11:44
2003.02.27
Как вызвать диалог для выбора даты?


1-87526
msoftware
2003-02-16 06:55
2003.02.27
Вопрос покомпоненте JvxRichEdit


14-87629
Dima2002
2003-02-10 13:41
2003.02.27
RxLib для Delphi 7


1-87441
SergeyDon
2003-02-18 16:23
2003.02.27
Socket в dll


3-87284
eLVik
2003-02-09 00:09
2003.02.27
Вопросы по ADO