SuperObject使用

SuperObject是一个轻量级的JSON解析库，可以方便地处理JSON数据。下面是使用SuperObject的基本示例：

1. 解析JSON字符串

uses SuperObject;

var
  jsonStr: string;
  jsonObj: ISuperObject;
begin
  jsonStr := '{"name":"John", "age":30}';
  jsonObj := SO(jsonStr);  // 解析JSON字符串
  Writeln(jsonObj.S['name']);  // 输出John
  Writeln(jsonObj.I['age']);  // 输出30
end;

2. 创建JSON对象

uses SuperObject;

var
  jsonObj: ISuperObject;
begin
  jsonObj := TSuperObject.Create(stObject);  // 创建空的JSON对象
  jsonObj.S['name'] := 'John';  // 设置属性
  jsonObj.I['age'] := 30;
  Writeln(jsonObj.AsJSon());  // 输出{"name":"John","age":30}
end;

3. 遍历JSON对象

uses SuperObject;

var
  jsonObj: ISuperObject;
  iter: TSuperObjectIter;
begin
  jsonObj := SO('{"name":"John","age":30,"friends":["Amy","Bob","Charlie"]}');
  if (jsonObj.DataType = stObject) then
  begin
    if (jsonObj.AsObject.Iterate(iter)) then
    begin
      repeat
        Writeln(iter.key, ':', iter.val.AsString);
      until not jsonObj.AsObject.Iterate(iter);
    end;
  end;
end;

以上是SuperObject的一些基本用法，希望能够帮到你！