Получить идентификатор соединения от ServerSocket

Question

Мне нужно получить идентификатор соединения от ServerSocket. Клиент отправляет текст, и мне нужно знать, какой клиент отправил текст. Есть идеи ??

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

Я думаю, вам следует назначить каждому новому соединению (в функции onaccept) уникальный идентификатор (случайные буквы / цифры), тогда каждая команда, отправленная с клиента-> сервера, будет содержать уникальный идентификатор этого клиента .

Answer 3

Я думаю, что он имеет в виду ручку розетки

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