datasnap 的HTTP 调用返回JSON

datasnap 相关设置，就不细说了，直接上函数

 

uses System.JSON
function TServerMethods.Updatehello: Tjsonobject;
var
temp:tjsonobject;
begin
temp:=tjsonobject.Create;
temp.AddPair(Tjsonstring.Create('code'),tjsonstring.Create('00000')) ;
temp.AddPair(Tjsonstring.Create('error'),tjsonstring.Create('')) ;
result:=temp;

end;

　　

调用时，输入地址：

http://127.0.0.1:9001/datasnap/rest/TServerMethods/Updatehello

返回结果

{"result":[{"code":"00000","error":""}]}

　　

转载于:https://www.cnblogs.com/zhqian/p/9219413.html