Delphi用QJSON解析JSON格式的数据.docxVIP

本来用superobjec来t 到 QJSON 来处理。 解析JSON 已经够用了，可惜这个东东不能在移动段使用，于是找 这是一个国内高手写开源免费的东西，赞一个。加入数据如下： {message:ok,status:1,state:3,data: [{time:2012-07-07 13:35:14,cont客ex户t已:签收}, {time:2012-07-07 09:10:10,cont离ex开t:[北京石景山营业厅] 派送中，递送员 [温]，电话[]}, {time:2012-07-06 19:46:38,cont到ex达t:[北京石景山营业厅]}, {time:2012-07-06 15:22:32,cont离ex开t:[北京石景山营业厅] 派送中，递送员 [温]，电话[]}, {time:2012-07-06 15:05:00,cont到ex达t:[北京石景山营业厅]}, {time:2012-07-06 13:37:52,cont离ex开t:[北京_同城中转站] 发往 [北京石景山营业厅]}, {time:2012-07-06 12:54:41,cont到ex达t:[北京_同城中转站]}, {time:2012-07-06 11:11:03,cont离ex开t:[北 同城中转站]}, 京运转中心驻站班组] 发往 [北京_ {time:2012-07-06 1