Delphi JSON 解析器

Delphi JSON 解析器

在这篇关于 JSON 的文章中，我们将学习如何制作Parser。

执行解析器意味着，例如，如果我们在文件中有一个JSON对象，我们将必须解析它以将其转换为 Delphi 中的正确对象。

它也可以在通过套接字发送JSON时使用，在接收到它时，我们必须创建一个解析器来生成JSON对象并能够这样处理它。

如何从 Delphi 执行 JSON 解析器

在 Delphi 中执行解析器的语法如下：

TJSONObject := TJSONObject.ParseJSONValue(<JSON>, 0) as TJSONObject;

其中 <JSON> 是我们要转换为对象本身的 JSON 类型字符串。

JSON 解析器示例

var

  vJSON : TJSONObject;

  vTxt : string; 

begin

  vTxt := '{"data":{"results":[{"Branch":"ACCT590003"}]}}';

  vJSON := TJSONObject.ParseJSONValue(TEncoding.ASCII.GetBytes(vTxt), 0) as TJSONObject;

end;