procedure TForm1.Button1Click(Sender: TObject); var ja,jo: ISuperObject; I: Integer; begin ja := SA([]); jo :=SO(); jo.S[); ja.AsArray.Add(jo); Memo1.Lines.Add(ja.AsString);//[{"index":"10"}] jo.S[); Memo1.Lines.Add(ja.AsString);//[{&q…
当遇到一个JSON格式的对象时,不知道它有多少个属性,也不知道有什么属性,该如何遍历它的属性及其属性值呢??? 还是使用Java语言还是很像的,使用for语句. var obj = data[i]; for(var p in obj){ alert(obj[p]); } 其中p表示属性名,obj[p] 表示属性值.就想当于遍历所有属性,然后根据属性获取它的属性值.…