RestAPI
  # Smart RestAPI
Smart中包含了RestAPI客户端的相关功能,可通过RestAPI获取相关的请求信息。
  我们以Smart快速上手中的示例为例,以 Myrtille Login API 为使用的API参照,在其中再添加一个TMemo组件,在其中Lines中输入登录使用的Body信息。
  在Button1OnClick事件中添加以下脚本信息。其中的{server}处请修改为自己设定的Myrtille地址。其中使用到的关键脚本为paxfunc.NetHttpPost。
var
  QUrl: String;
  QSource: String;
  QContentType: String;
begin
  QUrl := 'http://{server}:8008/MyrtilleAdmin/ConnectionService/GetConnectionId';
  QSource := FThis.Memo1.Lines.Text;
  QContentType := 'application/json';
  ShowMessage(paxfunc.NetHttpPost(QUrl,QSource,QContentType));
end;
 1
2
3
4
5
6
7
8
9
10
2
3
4
5
6
7
8
9
10
再次运行此脚本,如果设置正确的话,会在对话框中显示预期收到的信息。
关于其他RestAPI相关的函数可参考paxfunc.NetHttpGet。
除上述方式外,Smart提供了RestAPI控件。可使用RestAPI控件进行请求的发送与反馈信息的接收。