Delphi JSONObject 값 가져오기

var
  tempObj : TJSONObject;
begin
  tempObj := TJSONObject.Create;

  tempObj.AddPair('A', '1')
  tempObj.AddPair('B', '2')
  tempObj.AddPair('C', '3')

  showmessage(tempObj.Get('A').JsonValue.Value);
  // '1'

end;

 

array 찾아올때

///(TJSONArray.Items[i] as TJSONObject).Get('A').JsonValue.Value;