从ServerSocket获取连接ID

Question

我需要从ServerSocket获取连接ID。通过客户端我发送文本，我需要知道哪个客户端发送文本。任何想法??

Answer 1

procedure Tf_serveur.ServerSocket1ClientRead(Sender: TObject;
  Socket: TCustomWinSocket);
begin
  Memo1.Lines.Add(Socket.RemoteAddress+'\>'+Socket.ReceiveText);``
  // Socket.RemoteAddress  is the client ip 
  // Socket.RemoteHost     is the client nameposte
  // Socket.receivetext    is the client text sinding
end;

Answer 2

我在想他是指套接字的句柄

procedure TForm1.srvrsckt1ClientConnect(Sender: TObject;
  Socket: TCustomWinSocket);
  var connectedClientSockHandle : Integer;
begin
  connectedClientSockHandle := socket.Handle;
end;

Answer 3

我认为您应该做的是将每个新连接（在onaccept函数中）分配给唯一ID（随机字母/数字），然后从client-＆gt;服务器发送的每个命令都将包含唯一ID那个客户。