本文为你演示怎样在客户端执行存贮过程。
假如你的存贮过程返回一个数据集,那你需要调用 TStoredProc 的 Open 方法,然后,只需要使用 TDataSetProvider 来连接它就行了。效果很好。
假如你的存贮过程不返回一个数据集,这就意味着需要调用 TStoreProc 的 ExecProc 方法。步骤是:
1 为你的接口增添一个方法
procedure ExecProc(Params: Integer);
2 在 remote data module中写实现代码
procedure ExecProc(Params: Integer);
begin
StoredProc1.ParamByName('@Param').AsInteger := Params;
StoredProc1.ExecProc;
end;
3 在客户端,调用此过程
DComConnection1.AppServer.ExecProc(1);