Delphi Json生成实体类(自适应) 第二版 优化转换效率

• 数据库

文章目录

    • 概要
    • 整体架构流程
    • 技术细节
    • 小结

概要

上一篇讲了Delphi Json生成实体类(自适应) ，在宝哥的指点下提出Tjson库效率比TJsonSerializer慢2000倍(理论)。本文讨论使用 TJsonSerializer库具体操作流程和步骤。

整体架构流程

`1：修改json生成器

1.1 uses 修改单元名称

1.2 加类成员变量注解符

1.3 修改函数

1.4 修改保存pas

技术细节

` 1.1 uses 修改单元名称在这里插入图片描述

1.2 加类成员变量注解符在这里插入图片描述

1.3 修改函数 TStubClass.GetImplementationPart 函数

在这里插入图片描述

1.4修改保存pas

保存pas功能原作者不知道为什么没写保存代码，加上一行就行。

在这里插入图片描述

效果图

在这里插入图片描述

大量json数据我就没测试了，全能中间件在他的文章中做过测试Qjson、XsuperObject、System.Json.Serializer，JsonDataObjects等

效率最高的是JsonDataObjects，

System.Json.Serializer排第二，全能大佬也是推荐使用System.Json.Serializer。原因是Delphi自带，以后升级不会受第三方库牵连。

小结

` 上一篇在json转类使用的单元Rest.Tjson在一天总请求比较小(大概几百的情况下)感觉不到速度快慢。

如果一天几万以上的请求会导致Server端或接口程序等响应过慢。通过Fantasy和宝哥的指点换了新的单元（System.Json.Serializers）提高效率。

本文最难点在于 1.2 加类成员变量注解符 原来在1.2的图解 绿色字体已说明

备注：下载json转成Delphi类的工具（开源）

https://github.com/CloudDelphi/Delphi-JsonToDelphiClass

本文来自网络，不代表协通编程立场，如若转载，请注明出处：https://net2asp.com/aafb3f8f0c.html

赞 (0)
« 上一篇 1天前
下一篇 » 1天前

相关推荐