function TServerMethods.updateTest(Value: string; Obj: TJSONObject): TJsonObject; var DataJson: TJSONObject; begin if Assigned(Obj) then begin // DataJson := TJsonObject.ParseJSONValue(Obj.ToJSON) as TJsonObject; // Result := DataJson; Result := Obj; end; end;
以上是POST方法，接收参数：传进去是TJSONObject，返回也是TJSONObject，但结果就是报错！有知道的朋友留言一下！
以下代码正常：
function TServerMethods.updateTest(Value: string; Obj: TJSONObject): TJsonObject; var DataJson: TJSONObject; begin if Assigned(Obj) then begin DataJson := TJsonObject.ParseJSONValue(Obj.ToJSON) as TJsonObject; Result := DataJson; // Result := Obj; end; end;
原文：https://www.cnblogs.com/redhat588/p/15234085.html