客户如何回应其他要求的客户[使用应用共享]

Question

另一个客户如何回应指定的客户？

请帮助。

客户端：

procedure TForm1.Button2Click(Sender: TObject);
begin
tAProfile.SendString(tManager.RemoteProfiles.First,'cSend3','Sent by CLIENT 3');  //Send to client 3
end;

procedure TForm2.tAProfileResourceReceived(const Sender: TObject;
  const AResource: TRemoteResource);
  var i:integer;
  begin
if AResource.Hint='cSend3' then
  begin
    Label1.Text:=AResource.Value.AsString;  

    tAProfile.SendString(tManager.RemoteProfiles[1],'client','Sent by client');  //Send to Client
  end;

end;