剛好需要將 FireDAC DataSet (TFDDataSet, TFDQuery...) 轉成 JSON,網上找了一圈,原來從 XE6 開始就支持這個功能了:
儲存:
DataSet1.SaveToFile('d:\Data.json', sfJSON);
載入:
DataSet1.LoadFromFile('d:\Data.json', sfJSON);
支持的格式有:
TFDStorageFormat = (sfAuto, sfXML, sfBinary, sfJSON);
經常上網的朋友可能早就已經發現,在一些浏覽器的底部會在
//聲明GetSystemPowerStatu
本例效果圖: 代碼文件:unit Unit1;inter
本例效果圖:unit Unit1; interface
//聲明: DrawFrameControl( DC:
本例效果圖: 本例使用的資源文件(TestRes.rc