RSS订阅 | 匿名投稿
您的位置:网站首页 > Android > 正文

Delphi XE7组件TetheringManager1发送消息

作者:admin 来源: 日期:2015/4/16 15:35:38 人气: 标签:

介绍

本文章介绍了Delphi XE7组件TetheringManager1发送消息,今天对这个组件又进行了研究,并写了一个手机客户端以及PC客户端,通过连接可以通过手机忘PC端发送命令,以前需要写很多行的代码,现在就很简单了。在本论坛有代码例子,不过只是进行连接和验证,今天做了发送消息的代码。

发送消息的代码
procedure TForm1.Button2Click(Sender: TObject);
begin
  //
  TetheringAppProfile1.sendString(TetheringManager1.RemoteProfiles[0],
    'SendMessage', '123');
end;




接受消息的代码
procedure TForm1.TetheringAppProfile1ResourceReceived(const Sender: TObject;
  const AResource: TRemoteResource);
begin
  //
  ListBox3.Items.Add(AResource.ToJsonString);
end;


当然发送也可以发送stream,这样可以发送文件或者图片,这样通过手机可以做控制电脑的程序,后续再多研究研究。

读完这篇文章后,您心情如何?
0
0
0
0
0
0
0
0
本文网址:
下一篇:没有资料