Delphi多层C/S的客户端调用服务器端的方法

2009-06-28 10:38:11 作者：C 编程 来源：编程 浏览次数：0 网友评论 0 条

　　我在APPLICATION SERVER中声明一个方法，

　　PROCEDURE GETQUERYPARA(VAR CPARA:OLEVARIANT);
BEGIN
QUERY.CLOSE;
QUERY.PARAMBYNAME[CODE].ASSTRING:=CPARA;
END;

　　客户端调用:

　　PROCEDURE TFORM1.FORMSHOW(SENDER:TOBJECT);
BEGIN
CLIENTDATASET1.CLOSE;
DATAMODULE1.REMOOTESERVER1.APPSERVER.GETQUERYPARA(参数);
CLIENTDATASET1.OPEN;
END;

　　因为我SERVER中有多个QUERY,但只有一个PROVIDER,用你那种方法当然可行.

　　但这种方法控制起来比较容易.运行是没有问题,

　　只不过不知上面的方法是否"合法",请多指教.