怎么样实现客户端传递一个查寻参数到Server端?(100分)

  • 主题发起人 主题发起人 szabo
  • 开始时间 开始时间
S

szabo

Unregistered / Unconfirmed
GUEST, unregistred user!
不知道怎么定义参数及传递?
请高手赐教!
Thanks
 
具体问题是什么?有没有用到中间层?
 
1.Server端:
在Type Library编辑器中,向接口加一个方法,如: SetParam, 它的Parameters加要变的参数表;
通过SetParam改变查询参数。
2.Client端
取联接对象:
var
mi: IMidasInterface;
mi := Dcom.GetServer as IMidasInterface;
// 假定用DCOM
mi.SetParam...
 
服务器端
procedure SetSQL(const SQLstr: WideString;
Flag:Boolean=True);
begin
With ADOQdo
begin
Close;
SQL.Clear;
SQL.Add(SQLstr);
if Flag then
Open
else

ExecSQL;
end;
end;
客户端
ClientDataset调用这个接口就可以!
 
后退
顶部