Question

求助-关于socket的问题!

Answer 1

BCB BCB答话：-------TServerSocket.ServerType的值为stNonBlocking(缺省值)时，只有一个缺省线程，不会产生其它线程，编程简单，可以同时传送数据，互不干扰:1.个数：ServerSocket1.Socket.ActiveConnections;2.每响应一个连接: OnClientRead(Socket: )等 ServerSocket1.Socket.Connections数组就会多一项； 这个数组类型是TCustomWinSocket [ ]； ServerSocket1有很多事宜: OnAccept(Socket: ) OnClientConnect (Socket: ) 都有一个Socket类型的参数，经由过程此Socket参数就可 区分是哪一个客户发来的，互不干扰;例如: TForm1.ServerSocket1ClientWrite(Sender:TObject Sender, Socket:TCustomWinSocket) Socket.RemoteAddress 发送客户的IP地址 Socket.RemoteHost 发送客户的地址别号----------------------------------------办事器ServerSocket1天然可以跟连接的任一客户发送数据;每一个客户来请求连接时，应在OnAccept事宜中经由过程Socket参数把它挂号到你自已的存贮单位中，比如ListView1中，每一项有IP等,我编过有关Socket法度榜样，没有任何问题；

Answer 2

办事TServerSocket本来就可支撑同时接待多个TClientSocket的才能，这比如聊天室办事器法度榜样，可接收每一个请求登录的人.用不作推敲多线程；TServerSocket::Socket->Connections[ ]本身是一个数组，每一对TCustomWinSocket互不干扰， 可同时拜访，接收各类客户的登录，每一个连接的Socket都在数组中，

Answer 3

zaoren安在？鄙人正在侧耳倾听，为何没了音信？求求你，帮我一把。to zaoren :