2019年3月8日
六、Delphi10.3通过Json.Serializers单元对大量数据序列化
摘要： 一、参考我之前的博客，Delphi可以很方便的把类和结构体转换成JSON数据，但是数据量大了，就会非常之慢，1万条数据需要20秒左右。如果引用Serializers单元，那么100万数据只需要4秒左右，每秒处理20万+,速度还是很快的。 二、写一个简单的类 TPeople = class priva 阅读全文
posted @ 2019-03-08 23:50 像一棵海草海草海草 阅读(746) 评论(0) 推荐(1)
五、Delphi10.3通过REST单元使类和JSON数据互相转换
摘要： 一、我们定义一个简单的类 TPeople = class private FName: string; FScore: Integer; FAge: TDateTime; public property Name: string read FName write FName; property Sc 阅读全文
posted @ 2019-03-08 23:12 像一棵海草海草海草 阅读(1520) 评论(0) 推荐(0)
四、Delphi10.3读取JSON数据
摘要： 一、我们有一段JSON数据如下： { "五班": [ { "姓名": "张三", "成绩": 75.5 }, { "姓名": "李四", "成绩": 21.7 } ] } 二、使用Delphi代码读取，代码如下： uses System.Types, System.JSON, System.JSON 阅读全文
posted @ 2019-03-08 22:24 像一棵海草海草海草 阅读(3204) 评论(0) 推荐(0)
三、用Delphi10.3 创建一条JSON数据的第三种方法，非常简洁的写法
摘要： 一、用Delphi10.3构造一个JSON数据的第三种方法，并格式化输出，代码如下： uses // System.JSON, System.JSON.Types, System.JSON.Writers, System.JSON.Builders; procedure TForm1.Button3 阅读全文
posted @ 2019-03-08 21:06 像一棵海草海草海草 阅读(1434) 评论(0) 推荐(1)
二、用Delphi10.3 创建一条JSON数据的第二种方法，并格式化输出
摘要： 一、用Delphi10.3构造一个JSON数据的第二种方法，并格式化输出，代码如下： uses //System.JSON, System.JSON.Types, System.JSON.Writers; procedure TForm1.Button2Click(Sender: TObject); 阅读全文
posted @ 2019-03-08 19:58 像一棵海草海草海草 阅读(1119) 评论(0) 推荐(0)
一、用Delphi10.3 创建一条JSON数据
摘要： 一、用Delphi10.3构造一个JSON数据，非常之容易，代码如下： uses System.JSON; procedure TForm1.Button1Click(Sender: TObject); var m_Object, m_Json1, m_Json2: TJSONObject; m_J 阅读全文
posted @ 2019-03-08 19:43 像一棵海草海草海草 阅读(1998) 评论(0) 推荐(0)