Delphi7 JSON文件生成

最近有一个把文本数据按格式转JSON的需求，本来想使用读写文件的方式把内容写到文本文件，然后把文本文件保存问.json格式，后来仔细读了一下客户需求的JSON格式，发现里面包含JSON键值对、JSON数组等层层嵌套，于是想到使用SuperObject。

单元文件下载：https://download.csdn.net/download/Student_cc/12697119

下面说一下我的使用过程：

把单元文件加载进来；
定义json对象，这里要注意使用的类型是ISuperObject，申明时使用TSuperObject，看下面代码

mainjson, subjson : ISuperObject;
mainjson := TSuperObject.Create(stObject);
subjson := TSuperObject.Create(stArray);
mainjson.S['line'] := 'SS';
mainjson.S['value_flag'] := 'Y';
subjson[''] := mainjson;   // 把json对象传给数组

释放对象：直接用nil;
编译程序出错，按照如下图片修改即可；

{$UNDEF SaveQ} {$IFOPT Q+} {$Q-} {$DEFINE SaveQ} {$ENDIF}
class function TSuperAvlEntry.Hash(const k: SOString): Cardinal;
varh: cardinal;i: Integer;
beginh := 0;for i := 1 to Length(k) doh := h*129 + ord(k[i]) + $9e370001;Result := h;
end;
{$IFDEF SaveQ} {$Q+} {$UNDEF SaveQ} {$ENDIF}

Delphi7 JSON文件生成相关推荐

echarts 导入地区.json文件生成地图
echarts 导入地区.json文件生成地图提前说明: 对于前端写大屏展示,在地图这一块有很多是直接引用的 gis 文件,但是也有一部分是使用的 echarts数据可视化的地图. 本文只是 ...
python脚本将json文件生成C语言结构体
1.引言以前用过python脚本根据excel生成相关C语言代码,其实本质就是文件的读写,主要是逻辑问题,这次尝试将json文件生成C语言的结构体. 2.代码这是一个json文件,生成这个结构体的 ...
根据标注精灵助手标好并导出的json文件生成txt文件(一)
最近在做自然场景的OCR检测识别算法,对于检测来说,需要对文件图片进行ground truth坐标点label的标注,刚开始使用的是标注精灵助手,标注好boundingbox后导出的是json格式的文 ...
compile_commands.json文件生成
cmake工程 cmake工程生成 compile_commands.json 文件比较简单,定义 CMAKE_EXPORT_COMPILE_COMMANDS 即可. cmake -DCMAKE_EX ...
AndroidStudio中安装GsonFormat插件并根据json文件生成JavaBean
场景在Android中访问某接口会返回json数据,怎样根据json数据生成对应的JavaBean. 博客: https://blog.csdn.net/badao_liumang_qizhi 关注 ...
Java json文件生成
将一个map集合转换成json文件并导出: // 数据准备:JSONObject resData = new JSONObject();ArrayList<Map> list = new ...
Html将Json对象在页面结构化显示与Json文件生成下载
需要引入bootstrap.css .jquery.json-viewer.css .jquery.json-viewer.js 结构化显示的Json 下载后的文件 Json对象初始化var opt ...
qt先生成json文件后程序启动时读取json文件在一组数据模拟下正常，换一组数据就出现乱码
提要程序编号后自己模拟的数据程序在生成和解析json时都正常,但是换了一组数据,生成的json文件中部分中文乱码,且出现json文件的格式被混乱的现象. 效果上述出现的不正确的json文件,如下: ...
使用maven根据JSON文件自动生成Java POJO类（Java Bean）源文件
根据JSON文件自动生成Java POJO类(Java Bean)源文件本文介绍使用程序jsonschema2pojo来自动生成Java的POJO类源文件,本文主要使用maven,其他构建工具请参考 ...
.NetCore2.1 WebAPI 根据swagger.json自动生成客户端代码
前言上一篇博客中我们可以得知通过Swagger插件可以很方便的提供给接口开发者在线调试,但是实际上Swagger附带的功能还有很多, 比如使用NSwag生成客户端调用代码,进一步解放接口开发者. N ...

Delphi7 JSON文件生成

Delphi7 JSON文件生成

Delphi7 JSON文件生成相关推荐

最新文章

热门文章