Delphi SuperObject 解决节点乱序问题

SuperObject Delphi 的 JSON 操作类改造 - 关于属性顺序的问题。（原创资源） Delphi 的 ISuperObject 属性顺序为随机。但是很多时候，是需要按加入顺序进行读取。我也看了网上很多人有类似需求。也有人问过原作者，作者答复为：JSON协议规定为无序。看了我真是无语。 也看过网上一些人自己的修改，但是修改后有两个问题： 1. 性能急剧下降。原作者是用二叉树对性能做了极大的优化。但是网上修改的方法性能不行。 2. 属性数大于 32 时会出错。（原来用的是二叉树，修改后部分算法未修改，导致此问题）。 我采用的是重写遍历器的方法，和原版性能接近。 * 执行 500*500 数据的节点变更后，性能和原版差别不太大。 * * 原始性能 0.280 秒 * 旧的稳定改版性能 15.774 秒 * 新的稳定改版性能 0.535 秒 * * 性能是原版的 1.9 倍左右。而之前将二叉树变为链表的方法，导致性能变为 56 分之一。 * 温涛，于 2018-10-26。邮箱 delphi2006@163.com