本文整理自网络,侵删。
uses system.json var {statement json} InfoJson: TJSONObject;begin InfoJson := TJSONObject.ParseJSONValue({json字符串}) as TJSONObject; InfoJson.GetValue('unit');{取值} end;
相关阅读 >>
Delphi xe6取得android智能手机的电话号码等的终端信息
Delphi indy 10tidftp中的directorylisting使用
Delphi tarray<tarray<string>> 用法
更多相关阅读请进入《Delphi》频道 >>