IdTCPServer是不是已經記錄了他目前的所有鏈接？
我會在某時全部清空這些鏈接。
我覺得是不是可以直接通過他的某些成員就可以讀到這些鏈接。之后關閉他們。

目前我採用的方法是用一個列錶，在connect時，記錄下來，在disconnect時刪除。但是會佔用一些資源。

另外在多CPU的機器上，在ADD或者Delete時可能會出問題的，這個如何避免？？

不知道有沒有更好的方法？

謝謝各位！

編輯記錄

HI, 我是這樣子寫的，您參考一下

Indy 9
[code delphi]
var I: Integer;
List: TList;
begin
with IdTCPServer1.Threads do
begin
List := LockList;
try
try
for I := List.Count-1 downto 0 do
TIdPeerThread(List[I]).Connection.Disconnect;
except
end;
finally
UnlockList;
end;
end;
end;
[/code]

Indy 10
[code delphi]
var I: Integer;
List: TList;
begin
with IdTCPServer1.Contexts do
begin
List := LockList;
try
try
for I := List.Count-1 downto 0 do
TIdContext(List[I]).Connection.Disconnect;
except
end;
finally
UnlockList;
end;
end;
end;
[/code]

不過，請注意一項事情
此項方式會觸發 IdTCPServer 的 OnDisconnect 事件，如果裡面也有寫類似上面的 LockList 的話
將會造成互相咬死的狀況哦~~，你的程式就會出現白白一片了!!

===================引 用 zhgwbzhd 文 章===================
IdTCPServer是不是已經記錄了他目前的所有鏈接？
我會在某時全部清空這些鏈接。
我覺得是不是可以直接通過他的某些成員就可以讀到這些鏈接。之后關閉他們。

目前我採用的方法是用一個列錶，在connect時，記錄下來，在disconnect時刪除。但是會佔用一些資源。

另外在多CPU的機器上，在ADD或者Delete時可能會出問題的，這個如何避免？？

不知道有沒有更好的方法？

謝謝各位！

------
價值的展現，來自於你用哪一個角度來看待它!!

編輯記錄

謝謝哦！

我現在也在採用類似的方法，先把這個綫程記錄在 列錶內。之后再刪除。