GetSafeArrayPointer
Aus API-Wiki
Version vom 7. März 2008, 10:41 Uhr von Pks (Diskussion | Beiträge)
liefert einen Pointer zu einem Array , ist dieser 0 (Null), ist das Array (noch) nicht dimensioniert
Private Declare Sub GetSafeArrayPointer Lib _ "msvbvm60.dll" Alias "GetMem4" (pArray() As Any, sfaPtr As Long)
Dim mArr() As Long Dim pSafeArr As Long Call GetSafeArrayPointer(mArr, pSafeArr) MsgBox (pSafeArr <> 0) ReDim mArr(5) Call GetSafeArrayPointer(mArr, pSafeArr) MsgBox (pSafeArr <> 0)