红鱼儿

2022年12月4日

学习Delphi原生JSON框架（三）TJsonArray

摘要： 基于前面写的内容，我们可以快速读取一个数组的JSON串了，直接上代码： procedure TForm6.Button2Click(Sender: TObject); begin var jsonstr:= '{' + ' "code": 0,' + ' "msg": "Success",' + ' 阅读全文

posted @ 2022-12-04 17:59 红鱼儿 阅读(1224) 评论(1) 推荐(0)
学习Delphi原生JSON框架（二）TJsonArray

摘要： 前面写了如何快速读取一个JSON串，但只是针对简单的类型，如果JSON串中有数组该怎么办呢？ 一、例子代码 先看下面的代码，读取一个学生的各科成绩。 procedure TForm6.Button1Click(Sender: TObject); var jsonstr:string; jv:TJSO 阅读全文

posted @ 2022-12-04 15:07 红鱼儿 阅读(1848) 评论(0) 推荐(0)