有谁知道，给100分！限上午11点前！

OLE高手帮帮忙，怎样使用PSafeArray？
Add(clienthdls）
该函数的参数clienthdls为PsafeArray型，在调用时如何如何加入实参？
PSafeArray = ^TSafeArray;  tagSAFEARRAY = record
    cDims: Word;
    fFeatures: Word;
    cbElements: Longint;
    cLocks: Longint;
    pvData: Pointer;
    rgsabound: array[0..0] of TSafeArrayBound;
  end;