TIdTCPServer - как узнать кол-во подключенных клиентов?

← →
Behemoth © (2004-01-16 15:13) [0]

В стандартном примере это отслеживается вручную или я что-то не так понял. Может всё таки есть способ.....

← →
Reindeer Moss Eater © (2004-01-16 15:23) [1]

ShowMessage(IntToStr(IdTCPServer1.Threads.LockList.Count);
IdTCPServer1.Threads.UnlockList;

← →
Behemoth © (2004-01-16 15:32) [2]

Работает только в сторону увеличения. А если клиент кончился, то IdTCPServer1.Threads.LockList.Count не уменьшается...

Работает так, как надо.
Сколько клиентских подключений есть, столько и будет показывать в ShowMessage;