delphi如何提取JSON的值?

w84271765 2010-07-19 09:58:20
{"a":1,"b":1,"c":0,"d":0,"dog":{"dogId":3,"isHungry":1},"e":5,"exp":128774,"farmlandStatus":
[{"a":225,"b":4,"bitmap":1,"c":0,"d":0,"e":1,"f":0,"g":0,"h":1,"i":100,"j":2,"k":0,"l":0,"m":0,"n":{},"o":0,"p":
{},"pId":0,"q":1279176648,"r":0},{"a":118,"b":1,"bitmap":1,"c":0,"d":0,"e":1,"f":0,"g":0,"h":1,"i":100,"j":0,"k":0,"l":0,"m":0,"n":
{},"o":0,"p":{},"pId":0,"q":1279201098,"r":0},
{"a":225,"b":4,"bitmap":1,"c":0,"d":0,"e":1,"f":0,"g":0,"h":1,"i":100,"j":2,"k":0,"l":0,"m":0,"n":{},"o":0,"p":
{},"pId":0,"q":1279176648,"r":0},{"a":225,"b":4,"bitmap":1,"c":0,"d":0,"e":1,"f":0,"g":0,"h":1,"i":100,"j":2,"k":0,"l":0,"m":0,"n":
{},"o":0,"p":{},"pId":0,"q":1279176648,"r":0},
{"a":225,"b":4,"bitmap":1,"c":0,"d":0,"e":1,"f":0,"g":0,"h":1,"i":100,"j":2,"k":0,"l":0,"m":0,"n":{},"o":0,"p":
{},"pId":0,"q":1279176648,"r":0},{"a":225,"b":4,"bitmap":1,"c":0,"d":0,"e":1,"f":0,"g":0,"h":1,"i":100,"j":2,"k":0,"l":0,"m":0,"n":
{},"o":0,"p":{},"pId":0,"q":1279176648,"r":0},
{"a":225,"b":4,"bitmap":1,"c":0,"d":0,"e":1,"f":0,"g":0,"h":1,"i":100,"j":2,"k":0,"l":0,"m":0,"n":{},"o":0,"p":
{},"pId":0,"q":1279176648,"r":0},{"a":83,"b":4,"bitmap":1,"c":0,"d":0,"e":1,"f":0,"g":0,"h":1,"i":100,"j":1,"k":0,"l":0,"m":0,"n":
{},"o":0,"p":{},"pId":0,"q":1279216248,"r":0},
{"a":83,"b":4,"bitmap":0,"c":0,"d":0,"e":1,"f":0,"g":0,"h":1,"i":100,"j":1,"k":0,"l":0,"m":0,"n":{},"o":0,"p":
{},"pId":0,"q":1279216248,"r":0},{"a":83,"b":4,"bitmap":0,"c":0,"d":0,"e":1,"f":0,"g":0,"h":1,"i":100,"j":3,"k":0,"l":0,"m":0,"n":
{},"o":0,"p":{},"pId":0,"q":1279216248,"r":0},
{"a":83,"b":4,"bitmap":0,"c":0,"d":0,"e":1,"f":0,"g":0,"h":1,"i":100,"j":1,"k":0,"l":0,"m":0,"n":{},"o":0,"p":
{},"pId":0,"q":1279216248,"r":0},{"a":83,"b":4,"bitmap":0,"c":0,"d":0,"e":1,"f":0,"g":0,"h":1,"i":100,"j":1,"k":0,"l":0,"m":0,"n":
{},"o":0,"p":{},"pId":0,"q":1279216248,"r":0},
{"a":83,"b":4,"bitmap":0,"c":0,"d":0,"e":1,"f":0,"g":0,"h":1,"i":100,"j":1,"k":0,"l":0,"m":0,"n":{},"o":0,"p":
{},"pId":0,"q":1279216248,"r":0},{"a":83,"b":4,"bitmap":0,"c":0,"d":0,"e":1,"f":0,"g":0,"h":1,"i":100,"j":1,"k":0,"l":0,"m":0,"n":
{},"o":0,"p":{},"pId":0,"q":1279216248,"r":0},
{"a":83,"b":4,"bitmap":0,"c":0,"d":0,"e":1,"f":0,"g":0,"h":1,"i":100,"j":1,"k":0,"l":0,"m":0,"n":{},"o":0,"p":
{},"pId":0,"q":1279216248,"r":0},{"a":83,"b":4,"bitmap":0,"c":0,"d":0,"e":1,"f":0,"g":0,"h":1,"i":100,"j":1,"k":0,"l":0,"m":0,"n":
{},"o":0,"p":{},"pId":0,"q":1279216248,"r":0},
{"a":83,"b":4,"bitmap":0,"c":0,"d":0,"e":1,"f":0,"g":0,"h":1,"i":100,"j":1,"k":0,"l":0,"m":0,"n":{},"o":0,"p":
{},"pId":0,"q":1279216248,"r":0},{"a":83,"b":4,"bitmap":0,"c":0,"d":0,"e":1,"f":0,"g":0,"h":1,"i":100,"j":1,"k":0,"l":0,"m":0,"n":
{},"o":0,"p":{},"pId":0,"q":1279216248,"r":0}],"items":{"1":{"itemId":253},"2":{"itemId":274},"4":{"itemId":520},"9":
{"itemId":90015}},"serverTime":{"time":1279281876},"task":{"taskFlag":0,"taskId":0},"user":
{"canbad":50,"exp":128774,"headPic":"","healthMode":{"beginTime":0,"canClose":1,"date":"1970-01-01|1970-01-
07","endTime":547200,"serverTime":1279281876,"set":0,"time":"08|00","valid":0},"missionTime":168743,"money":626114,"pf":1,"
uId":84401312,"uinLogin":84271765,"userName":"","yellowlevel":0,"yellowstatus":0},"weather":{"weatherDesc":"雨
天","weatherId":3}}



如何用DELPHI把这些值取出来?

serverTime":{"time":1279281876}
uId":84401312,"
uinLogin":84271765,"
userName":"","





...全文
514 10 打赏 收藏 转发到动态 举报
写回复
用AI写文章
10 条回复
切换为时间正序
请发表友善的回复…
发表回复
allen12345 2010-07-29
  • 打赏
  • 举报
回复
JSON是什么东西啊,菜鸟求教
亮剑_ 2010-07-27
  • 打赏
  • 举报
回复
找个JSON解析库,看一看DEMO,查一查文档就差不多了
楼主几位已贴链接,不再重复
fancy967 2010-07-27
  • 打赏
  • 举报
回复
顶楼上了的,我也是看了万一老师教程过来的人
w413133157 2010-07-23
  • 打赏
  • 举报
回复
http://www.cnblogs.com/del/category/215158.html
看这个,万一老师讲的非常详细
choosejing 2010-07-22
  • 打赏
  • 举报
回复
json:=SO(memo1.text);
uID:=json.I['uid'];
uUserName:=json.S['USERNAME'];

如果是对象的话那就再转化次
w84271765 2010-07-20
  • 打赏
  • 举报
回复
我知道用json来解析,但是不知道从哪下手啊.比如我要取serverTime":{"time":1279281876}
uId":84401312,"
uinLogin":84271765,"
userName":"","

JSON要怎么写啊

比如:
var
json:ISuperObject;
begin
json := o.(memo1.text);

memo2.text:=........o.['user.uid']

memo2.text:=
end;
MinxSoft 2010-07-19
  • 打赏
  • 举报
回复
http://sourceforge.net/projects/lkjson/
luxuewei5214 2010-07-19
  • 打赏
  • 举报
回复
整个json解析控件
haitao 2010-07-19
  • 打赏
  • 举报
回复
json也是树形层次存储的,分析起来也与xml一样麻烦
只是javascript遇到它们可以直接使用(由js的解释器分析了),才觉得方便
piaolankeke002 2010-07-19
  • 打赏
  • 举报
回复
:NBA本来我劝莱利在夏天搞定杰佛森或者小斯其中的一个谁想到他居然弄来了博什。而布泽尔去了公牛。斯隆早就看出来依靠现在的阵容只能做火箭的死敌。而成不了菲尔的对手,所以卖了个大前引进个中锋。希望德隆能向着Mvp使劲!

829

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 非技术区
社区管理员
  • 非技术区社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧