服务器要支持Http协议,打算采用Http+JSON的方式来交换数据.一开始考虑使用superobject,因为以前使用比较多,比较熟悉. 代码如下: class function FDQueryToSJSON(aQuery : TFDQuery) : string; class function TFDQueryJSONReflect.FDQueryToSJSON(aQuery: TFDQuery): string; var sj,aj,sj2,aj2:ISuperObject; i:Inte…