我有一个简单的应用程序将REST服务响应转换为Clientdataset。 App有TRESTClient,TRESTRequest,TRESTResponse,TRESTResponseDataSetAdapter和TClientDataSet。 RESTClient从Web服务接收JSON数组。 RESTResponseDataSetAdapter在激活时会导致内存泄漏。此代码生成内存泄漏:
RESTResponseDataSetAdapter1.Response:= RESTResponse1;
RESTResponseDataSetAdapter1.Dataset:= ClientDataSet1;
RESTRequest1.Resource := ServiceURL;
RESTRequest1.Execute;
RESTResponseDataSetAdapter1.Active:=true;
这里有什么问题?它是Delphi XE7的错误吗?看起来有些TJSONValue从未被释放过。