delphi - 解析 JSON 字符串以检测错误响应

Question

我正在使用使用 JSON 格式响应的服务器。

当请求包含有效数据时，它们会以这样的字符串响应

{“数据”：{“结果”：[{“分支”：“ACCT590006”}]}}

但是如果请求的参数不正确，则响应如下

{"error":{"errors":[{"domain":"global","reason":"invalid","message":"Invalid Params"}],"code":98865,"message":"参数值无效"}}

所以问题是我如何确定服务器的响应何时包含使用该TJSONObject 对象的错误字符串，并另外解析 JSON 字符串以显示这样的消息和错误代码。

Failed reason : invalid 
Message : Invalid params 
Code: 98865 
message : invalid param value.

score 1 · Accepted Answer

我使用 JSON 进行了一些工作，每次我从代码（delphi 7）中解析。但我搜索了一下，在这里你可能会找到你的问题的答案： http ://edn.embarcadero.com/print/40882

稍加调整，这应该可以工作。

最好的问候，
拉杜

1 回答 1