GetSafeArrayPointer: Unterschied zwischen den Versionen

Aus API-Wiki
Wechseln zu: Navigation, Suche
Zeile 1: Zeile 1:
liefert einen [[Pointer]] zu einem [[Array]] , ist dieser 0 (Null), ist das Array (noch) nicht dimensioniert
+
liefert einen Pointer zu einem [[Array]] , ist dieser 0 (Null), ist das Array (noch) nicht dimensioniert
  
  
Zeile 7: Zeile 7:
  
  
  Dim mArray() As Long
+
  Dim mArr() As Long
  Dim pSafeArray As Long
+
  Dim pSafeArr As Long
 
    
 
    
  Call GetSafeArrayPointer(mArray, pSafeArray)
+
  Call GetSafeArrayPointer(mArr, pSafeArr)
 
  MsgBox (pSafeArray <> 0)
 
  MsgBox (pSafeArray <> 0)
 
    
 
    
  ReDim mArray(5)
+
  ReDim mArr(5)
  Call GetSafeArrayPointer(mArray, pSafeArray)
+
  Call GetSafeArrayPointer(mArr, pSafeArr)
  MsgBox (pSafeArray <> 0)
+
  MsgBox (pSafeArr <> 0)

Version vom 7. März 2008, 10:36 Uhr

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 (pSafeArray <> 0)
  
ReDim mArr(5)
Call GetSafeArrayPointer(mArr, pSafeArr)
MsgBox (pSafeArr <> 0)