JSON¶

JSON parsing.

TJSONParser.Construct¶

function TJSONArray.Construct: TJSONArray; static;
function TJSONObject.Construct: TJSONObject; static;
function TJSONParser.Construct: TJSONParser; static;

Constructors for JSON. Use the new keyword for these.

var
  parser: TJSONParser;
begin
  parser := new TJSONParser();
  parser.Parse('{"someNumber": 123, someString: "hello"}');

  WriteLn parser.Typ;
  WriteLn parser.Count;
  WriteLn parser.Item[0].Typ;
  WriteLn parser.Item[0].AsInt;
  WriteLn parser.Item['someString'].Typ;
  WriteLn parser.Item['someString'].AsString;
end;

TJSONParser.Parse¶

procedure TJSONParser.Parse(Str: String);

Parse a json string.

TJSONParser.Load¶

procedure TJSONParser.Load(FileName: String);

Parse json from a file.

TJSONParser.Save¶

procedure TJSONParser.Save(FileName: String; Options: EJSONFormatOptions = []; Indent: Integer = 2);

Formats the json parser to a string and saves to file.

TJSONItem.Typ¶

property TJSONItem.Typ: EJSONType

Returns json type of the item.

This can be any of:

EJSONType.UNKNOWN
EJSONType.INT
EJSONType.FLOAT
EJSONType.STR
EJSONType.BOOL
EJSONType.NULL
EJSONType.ARR
EJSONType.OBJ

TJSONItem.Format¶

function TJSONItem.Format(Options: EJSONFormatOptions = []; Indent: Integer = 2): String;

Formats the json item into a JSON string.

Options can be a set of:

EJSONFormatOption.SINGLE_LINE_ARR: Array without CR/LF : all on one line
EJSONFormatOption.SINGLE_LINE_OBJ: Object without CR/LF : all on one line
EJSONFormatOption.NO_QUOTE_MEMBERS: Do not quote object member names.
EJSONFormatOption.USE_TABS: Use tab characters instead of spaces.
EJSONFormatOption.NO_WHITESPACE: Do not use whitespace at all