delphi数组问题

用delphi控制另一个应用程序，该程序内部有一个copyobjects方法，定义如下： 
function   CopyObjects(Objects:   OleVariant;   Owner:   OleVariant;   var   IdPairs:   OleVariant):   OleVariant;safecall; 
其中，第一个参数“objects”是一个变体类型（对象的数组），要求输入要复制的原始对象的数组。请 
我是这样做的： 
dim:array   of   variant; 
blockobject：variant; 
然后给赋值 
CopyObjects(dim,blockobject,emptyparam);但是总提示“对象数组无效”错误！问题就是出在dim这个参数上，求 教各位大侠帮帮忙！觉得会是什么原因呢？ 
我对接口的知识了解不多，觉得问题就是出在原来这个程序要求的数组类型，在delphi中如何定义才能不会报错？