刚好需要将 FireDAC DataSet (TFDDataSet, TFDQuery...) 转成 JSON，网上找了一圈，原来从 XE6 开始就支持这个功能了：
储存：
DataSet1.SaveToFile(‘d:\Data.json‘, sfJSON);
载入：
DataSet1.LoadFromFile(‘d:\Data.json‘, sfJSON);
支持的格式有：
TFDStorageFormat = (sfAuto, sfXML, sfBinary, sfJSON);
[笔记] FireDAC DataSet 导入及导出 JSON
原文：http://www.cnblogs.com/onechen/p/6671427.html