delphi解析json处理单元

【文件属性】：

文件名称：delphi解析json处理单元

文件大小：66KB

文件格式：PAS

更新时间：2019-07-21 12:23:51

delphi、Json

json串解析单元。简单易用，没有bug。 使用方法如下： var ResponseJson: string; Json, childJson: TlkJSONobject; begin Json := TlkJson.ParseText(ResponseJson) as TlkJsonObject; try Success := Trim(Json.Field['success'].Value); Msg := Trim(Json.Field['msg'].Value); childJson := Json.Field['data'] as TlkJsonObject; finally FreeAndNil(Json); end; end;