如果得到SAFARRAY的值

Question

我在DELPHI中导入了COM DLL文件在连接某个接口后,该接口可以得到的值设置的是SAFEARRAY类型我怎样在DELPHI取得该值?vcurve:=centselect.CurvePoints(vfan,0);
vcurve.volume; volume是一个safearray类型,有100个值我如何取得这100个值?我用的如下方法
  ArrayBounds.lLbound:=0;
  ArrayBounds.cElements:=100;
  volumepoints:=SafeArrayCreate(vavariant,1,ArrayBounds);
  SafeArrayAccessData(vcurve.volumepoints,Mypointer);     
  for I:=0 to 99 do
  begin
  showmessage(floattostr(integerarray(mypointer)[i]));
  end;是否有问题?

Answer 1

SafeArrayCreate是怎么執行的？
var
  volumepoints : SafeArray of Integer;  setLength(volumepoints,100);