文件名称:delphi JSON 助手( uSZHN_JSON.pas)
文件大小:6KB
文件格式:PAS
更新时间:2024-07-12 06:28:01
delphi JSON TJSONObject TJSONArray
通过Helper扩充,实现delphi 原生的JSON操作书写方法可以类似于SuperObject 书写简单,代码清晰。例如: jo := TJSONObject.Create; try jo.S['name'] := '张大顺'; jo.I['age'] := 40; jo.B['married'] := True; jo.A['books'] := TJSONArray.Create; jo.A['books'].Add('《Web开发人员参考大全》').Add('《delphi深度学习》'); jo.O['organization'] := TJSONObject.Create; jo.O['organization'].S['oname'] := '大中华科技'; jo.O['organization'].I['oyear'] := 20;