datasnap 服务器端使用 fdquery+fdconnection,服务器端有一个服务方法getdataset(sqltext:string):tdataset;
客户端使用dbgrid+datasource+datasetprovider+sqlservermethod+sqlconnection
如果
self.ClientDataSet1.Close;
self.ClientDataSet1.RemoteServer := nil;
self.ClientDataSet1.CommandText := '';
// clientmodule1.SqlServerMethod1.SQLConnection:=clientmodule1.SQLConnection1;
// clientmodule1.SqlServerMethod1.ExecuteMethod;
clientmodule1.SqlServerMethod1.ParamByName('sqltext').AsString :=
'select * from tborderlist limit 20';
clientmodule1.SqlServerMethod1.Active:=true; //这句会有问题,无法执行查询,显示REMOTE ERROR: UNEXPEXTED METADATA TYPE
self.ClientDataSet1.SetProvider(self.dsp2);
self.ClientDataSet1.Open;
所以只能把发服务端的组件 改为tsqlconnection+sqldataset 用于返回tdataset类型。