Q&A

  • Socket의 ActiveConnections에 대한 질문 하나...
현재 접속된 클라이언트수를 보여주고 싶은데...

그게 잘 안되네여...

서버쪽에는 이렇게 구현했습니다.



procedure TfrmServer.sSocketClientConnect(Sender: TObject;

Socket: TCustomWinSocket);

begin

stbStatus.Panels[0].Text := 'Client Connected - [' +

IntToStr(sSocket.Socket.ActiveConnections) + ']';

end;



procedure TfrmServer.sSocketClientDisconnect(Sender: TObject;

Socket: TCustomWinSocket);

begin

stbStatus.Panels[0].Text := 'Client Connected - [' +

IntToStr(sSocket.Socket.ActiveConnections) + ']';



end;



위와같이 구현한것이 잘못된건가요?

클라이언트에서 접속이 끊기면...서버쪽에 ClientDisconnect 이벤트가 발생할텐데..

아닌가여?

만약 서버에 하나의 클라이언트가 붙으면 ActiveConnections가 1인데..

클라이언트가 Disconnect를 해도 왜 ActiveConnections이 1인지...

고수님들의 자세한 설명 바랍니다..





0  COMMENTS