Delphi Multi-c/S client Invoke server-side method

I declare a method in application server,

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

Client invocation:

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

Because I have multiple query in server, but only one provider, it is certainly feasible to use your method.

But this method is easier to control. Running is no problem

Just do not know whether the above method is "lawful", please advise more.