Разрыв соединения производится методом:

procedure Close; override;

В результате свойство Active примет значение true и процедура уничтожит обслуживающий поток TServerSocketThread. Однако последнее происходит при условии, что сервер использовал режим блокировки bmThreadBlocking. Вфинале Close() вызовет событие:

property OnDestroyHandle: TSocketNotifyEvent;

Изучив почти весь арсенал свойств и методов сервера, вновь вернемся к тому, с чего начали - свойству BlockMode, а еще точнее к режиму блокировки bmThreadBlocking. Как было отмечено ранее, это синхронный режим работы, но в котором обслуживание каждого клиента производится в отдельном потоке. Доступ к потоку предоставляется свойством:

property ServerSocketThread: TServerSocketThread;