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;