使用SOCKET的问题！

[henren]

使用TServerSocket和ClientSocket进行网络通信。
要使一个服务器可以响应多个客户端的请求，如果服务器端要给指定的某一个客户端发送信息，请问服务器端该如何编程？请多指教！

[l_clove]

easy

[netsys2]

当你的CLIENT登陆时，记录它的SOCKET
TCustomWinSocket *MySocket;
//---------------------------------------------------------------------------
void __fastcall TFrmMain::ServerAccept(TObject *Sender,
TCustomWinSocket *Socket)
{
if( Socket->RemoteAddress == "192.168.1.1")
MySocket = Socket;
}

以后就:
MySocket->SendBuf(yourdata,datalen);

[l_clove]

ServerSocket1->Socket->ActiveConnections表示当前活动的连接数，
ServerSocket1->Socket->Connections[i]表示第i个活动的连接
你要在Client连接的时候(OnAccept)中记录与Client对应的RemoteAddress，然后在发消息时，ServerSocket1->Socket->Connections[i]->RemoteAddress与你要发的Client地址是否一致，