uses system.json var {statement json} InfoJson: TJSONObject; begin InfoJson := TJSONObject.ParseJSONValue({json字符串}) as TJSONObject; InfoJson.GetValue('unit');{取值} end;
Delphi Json
猜你喜欢
转载自www.cnblogs.com/YiShen/p/9778205.html
今日推荐
周排行