DataSet与JSON互转

DataSetConverter4Delphi

https://github.com/ezequieljuliano/DataSetConverter4Delphi

----------------------------------------------------------------------

QJson 可以这样
QJson := TQJson.Create;
QJson.FromRtti(结构体);

QJson.ToRtti(结构体)
即可。
非常方便 但是前提是 必须 delphi xe以上版本。

----------------------------------------------------------------------

利用rtti啊， 很方便，如果再加上 泛型什么的就可以做到通用的函数。。
如果是使用superobject单元的话，他自带的有TSuperRttiContext，可以做得到，自己实现也容易

D7里面表面上Record是没有RTTI信息的，但是实际上是有的，只是它们不说。只是TypeInfo弄来弄去很麻烦，不如高版本的RTTI来的方便。

http://bbs.2ccc.com/topic.asp?topicid=527696

https://github.com/ezequieljuliano/REST4Delphi