Как отослать текст определенному клиенту.

[rust-02]

Пишу программу клиент-сервер,посредством Serversocket, Clientsocket.
Вопрос: как при множественном подключении отправить текст определенному клиенту?
Есть догадки что методом сравнения IP но не знаю как это реализовать.

[_SERGEYX_]

Если нужно отправить только текст - лучше это сделать по UDP. Быстрее работает.

      
      IdUDPClient1.Host := '192.168.0.150';
      IdUDPClient1.Send('Текст сообщения');

procedure TfrmMain.IdUDPServer1UDPRead(Sender: TObject; AData: TStream;
  ABinding: TIdSocketHandle);
var StringFormatedStream: TStringStream; s: string;
begin
  StringFormatedStream := TStringStream.Create('');
  StringFormatedStream.CopyFrom(AData, AData.Size);
  Edit1.Text := ABinding.PeerIP + StringFormatedStream.DataString;
  ABinding.SendTo(ABinding.PeerIP, ABinding.PeerPort, s[1], Length(s));
  StringFormatedStream.Free;
end;