Delphi Json之树遍历
摘要：
procedure TForm1.VisitDirJsonTree(const AJsonObj: ISuperObject); var i: Integer; oItem: TSuperAvlEntry; begin for oItem in AJsonObj.AsObject do begin if oItem.Value.DataType = stObject th... 阅读全文
posted @ 2018-03-09 14:35 小夏coding 阅读(424) 评论(0) 推荐(0) 编辑
