;================================================================================================== ; Funktion _GetTestArray($iUbDim1 [, $iUbDim2=0, $sValue='Wert ']]) ; Beschreibung Gibt ein 1D- oder 2D-Array mit Testdaten zurück ; Parameter $iUbDim1 Anzahl Elemente 1. Dimension ; optional $iUbDim2 Anzahl Elemente 2. Dimension; wird kein Wert oder Wert < 2 übergeben, ; dann wird ein 1D-Array erzeugt; Standard: 0 = 1D-Array ; optional $sValue Standard: "Wert $i" bzw. "Wert $i/ $k"; $i bzw $k werden immer angefügt ; Autor BugFix (bugfix@autoit.de) ;================================================================================================== Func _GetTestArray($iUbDim1, $iUbDim2=0, $sValue='Wert ') Local $i, $k, $2ndDim = False Local $aOut[$iUbDim1] If $iUbDim2 > 1 Then $2ndDim = True ReDim $aOut[$iUbDim1][$iUbDim2] EndIf For $i = 0 To $iUbDim1 -1 If $2ndDim Then For $k = 0 To $iUbDim2 -1 $aOut[$i][$k] = $sValue & $i & '/ ' & $k Next Else $aOut[$i] = $sValue & $i EndIf Next Return $aOut EndFunc ;==>_GetTestArray