PSafeArray可能是一个数组的指针我不知道PSafeArray是如何申明的,不过我可以给你一个
例子,或许你能得到一些启发:
Type
  WordArrayP=^TWordArray;
  TWordArray=array [0..0] of Word;Var
  Lbuffer:WordArrayP;  Lbuffer:=AllocMem(256*2);  //分配256个word(2 bytes)值的内存...
for i:=0 to 255 do
  Begin
    Lbuffer^[i]:=Random($FFFF);
  end;
...FreeMem(LBuffer);//释放内存