Thenext

摘要： var h,i: integer; ss, url: string; mem: TMemoryStream; str1: tstringlist; memstr: TStringStream; iddec: TIdEncoderMIME; JSONObject,JSONObject2: TJSONObject; // JSON类 jsonArray: TJSONA... 阅读全文

摘要： 有一个对JSON处理的单元，在你需要使用JSON的单元里面引入"System.json"，随后你就可以用Delphi自己的json处理类了。 注意： 1,JSON类创建后，里面所有元素不用管释放，JSON类自己管理，千万不要画蛇添足啊！！！！！！ const // 演示用的JSON jsonStri 阅读全文