S的客户端调用服务器端的方法

Delphi多层C/S的客户端调用服务器端的方法2008-02-02我在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,用你那种方法当然可行.

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

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