TServerSocket / ActiveConnections

← →
Serguar © (2002-11-11 13:31) [0]

Привет всем! После отсоединения TClientSocket от TServerSocket (на событии OnClientDisconnect) у последнего не изменяется свойство ActiveConnections. (по крайней мере сразу, как при соединении). Мож я че не понимаю, где его отлавливать?

← →
Digitman © (2002-11-11 13:39) [1]

Это - нормально.
Изменение списка активных коннектов произойдет сразу после выхода из проц-ры обработки события OnClientDisconnect()

см. исх.текст компонента

← →
Serguar © (2002-11-11 13:59) [2]

Ок

← →
Serguar © (2002-11-12 09:27) [3]

Только я не пойму как отловить момент изменения свойства ActiveConnections, или момент завершения события OnClientDisconnect. Не проверять же по таймеру ?

← →
Digitman © (2002-11-12 09:43) [4]

а для каких целей может понадобиться "момент изменения свойства ActiveConnections" ?

← →
Serguar © (2002-11-12 10:15) [5]

В главном окне серверного приложения в строке StatusBar отображается количество подключенных клиентов. По мере подключения/отключения его значение изменяется. Можно конечно завести глобальную переменную и изменять ее, но раз уж существует соответствующее свойство - хотелось бы использовать его. При наступлении события OnClientConnect его значение изменяется, а при событии OnClientDisconnect - значение изменяется после выхода из процедуры обработки, как было вами сказано выше. Так вот мне и нужно знать момент, когда значение ActiveConnections будет уже измененным.

← →
Digitman © (2002-11-12 10:27) [6]

В событиях OnConnect/OnDisconnect посылай некоему своему окну некое предопределенное сообщение с пом. PostMessage()

Когда приложение обработает сообщения, в контексте которых вызываются обработчики событий OnConnect/OnDisconnect, состояние ActiveConnections изменится должным образом, и , когда очередь дойдет до обработки сообщения, посланного тобой в PostMessage(), обработчик последнего попросту обращается к ActiveConnections и считывает актуальное значение этого св-ва

Нихрена себе... :-O. Тогда уж лучше я с глобальной переменной буду работать.

Вот ведь беда ! Страшно сложно это)

Конечно, можно и через глобальную перем-ю

В OnConnect - инкремент
В OnDisconnect - декремент

TServerSocket / ActiveConnections Найти похожие ветки