1、在data explorer中选择dbExpress-->Datasnap,新建连接
2、选择协议为http,设置 port和hostname
3、点击“Test Connection”
这就表示连接datanasp Rest服务器成功
4、将刚刚建立的连接拖到窗口
5、点击该Tsqlconnect控件,可以看到连接参数已经全部填好
6、拖入一个TSqlServerMethod控件,设置正确的SQlConnection参数,点击SwevweMethodName,
可以看淡datasnap Rest服务器端的函数
选择需要的服务器端函数
7.在窗体总调用函数
procedure TForm1.Button1Click(Sender: TObject);
var
LSStream: TStringStream;
begin
SqlServerMethod1.ExecuteMethod;
LSStream := TStringStream.Create(SqlServerMethod1.Params[0].AsBlob);
try
if LSStream <> nil then
begin
LSStream.Position := 0;
FDMemTable1.LoadFromStream(LSStream, TFDStorageFormat.sfBinary);
end;
finally
begin
LSStream.Free;
end;
end;
end;