如何传递PSafeArray类型的参数

Question

通过Important Type Library...生成的一个类库里有函数原型中需要传入PSafeArray类型的参数，也同时有PSafeArray类型参数的输出：var ItemIDs:PSafeArray;out Errors:PSafeArray; 
我在程序中定义了 
IDs[1]:=Edit1.Text; 
IDs[2]:=Edit2.Text; 
请问我该怎么将IDs[1]、IDs[2]传递给函数中的ItemIDs:PSafeArray参数，同时又该怎样读取输出的Errors的参数。请高手请教。谢谢

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
var
  IDs1,IDs2:PSafeArray;
begin 
  ...
  New(IDs1);
  New(IDs2);
  MyLibFunction(...IDs1,IDs2...);
  ... 
end;

Answer 2

你可以参考一下这个
http://topic.csdn.net/u/20080313/11/acd91fba-607f-4a3e-934f-0d0661fb698d.html