在一个三层结构中，如何在应用程序服务器端得知目前连接上的客户端的数目，及其IP地址（SocketConnection连接)?

Question

在一个三层结构中，如何在应用程序服务器端得知目前连接上的客户端的数目，及其IP地址（SocketConnection连接)???

Answer 1

用 ScktSrvr.dpr的源代码自己修改一下就行了。

Answer 2

在BORLAND DELPHI自带的DEMO中有的

Answer 3

clientcount:tlabel;
...
private
 fclientcount:integer;
public
  procedure updateclientcount(incr:integer);//更新客户端连接数
。
procedure tmain.updateclientcount(incr:integer);
begin
  fclientcout:=fclientcout+incr;
  clientcount.caption:=inttostr(fclientcount);
end;