数组变量参数如何传递给过程服务器？(100分)

在过程服务器中定义了一个过程tran 如果参数只有两个容易定义，
a:=1;
b:='asd';
用dcomconnection1.appserver.tran(a,b)调用过程。
问题：
如果a和b是50维的数组变量如何传递，总不能使用dcomconnection1.appserver.
tran(a[1],a[2]...a[50],b[1],b[2]...b[50])？

使用variant来保存数组，服务器接收后在转换

dcomconnection1.appserver.tran(这里面如何写参数)？

client：
var a,b:OleVariant;
a:=VarArrayCreate([0,49],varVariant); //定义a[]
b:=VarArrayCreate([0,49],varVariant); //定义b[]
a[0]:=......
a[49]:=.....
b[0]:=......
b[49]:=.....
dcomconnection1.appserver.tran(a,b);
server:
procedure XXXX.tran(a:OleVariant;b:OleVariant);
begin
serverform.Label1.Caption:=a[0];
serverform.Label2.Caption:=a[49];
serverform.Label3.Caption:=b[0];
serverform.Label3.Caption:=b[49];
end;

接受答案了.

白衣书生：本来将分给你，但一不小将分分配错误，请你原谅！！！

to:白衣书生
不好意思，楼主的误操作。

http://www.delphibbs.com/delphibbs/dispq.asp?lid=1446761

您要愿意的话帮我结贴，算还给您的分，谢了。