간단하게 JSON 파싱하기

uses
  .., System.JSON;

var  
  JsonObj: TJSONObject;  
  JsonString: string;
begin  
  JsonString := '{"Key": "Value", "Array":[{".."}]}';

  JsonObj := TJSONObject.ParseJSONValue(JsonString) as TJSONObject;

  ..
  ShowMessage(JsonObj.GetValue('Key'));
end;

 

2020/02/17 - [Delphi/꿀팁] - JSONArray에서 값 가져오기

2020/02/17 - [Delphi/꿀팁] - JSONObject에서 값 가져오기