 |
|
 |
Newsgroups : Borland : borland.public.delphi.internet.winsock : 2008 Mar : Re: Connections of a TIdCcmTCPServer
|
|
|
| Subject: | Re: Connections of a TIdCcmTCPServer |
| Posted by: | "Moore" (moo..@hotmail.com) |
| Date: | 26 Mar 2008 03:01:34 |
I have resolved it, should be like this:
try
for i := 0 to srvProxyTCP.Contexts.LockList.Count - 1 do
ListBox1.Items.Add(TIdContext(srvProxyTCP.Contexts.LockList[i]).Connection.Socket.Binding.PeerIP);
finally
srvProxyTCP.Contexts.UnlockList;
end;
|
|
|
|