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控件进行请求的发送与反馈信息的接收。