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":""}]}