Umgang mit PSafeArray

[TiGü]

Dir ist schon klar das PSafeArray ein Zeiger auf ein record/struct ist und kein Array?

Delphi-Quellcode:

  PSafeArray = ^TSafeArray;
  {$EXTERNALSYM tagSAFEARRAY}
  tagSAFEARRAY = record
    cDims: Word;
    fFeatures: Word;
    cbElements: LongWord;
    cLocks: LongWord;
    pvData: Pointer;
    rgsabound: array[0..0] of TSafeArrayBound;
  end;
  TSafeArray = tagSAFEARRAY;
  {$EXTERNALSYM SAFEARRAY}
  SAFEARRAY = TSafeArray;

Vielleicht hilft dir das auch weiter?
http://blog.virtec.org/2008/07/the-m...of-psafearray/