delphi - 从 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;