das hier dauert einfach endlos:
[autoit]Func _clearApplicationIniArrayEditor()
For $y=0 to 149
for $x=0 to 49
$RunningApplicationPatchData[$y][$x] = ""
Next
Next
EndFunc
inhalt eines großen 2D array´s schnell löschen, aber wie ?
-
- [ gelöst ]
-
WhiteLion -
13. Mai 2011 um 10:33 -
Geschlossen -
Erledigt
-
Wenn du die Dimensionen kennst dann gehts auch so
[autoit]
[/autoit]
Func _clearApplicationIniArrayEditor()
$RunningApplicationPatchData = 0
Dim $RunningApplicationPatchData[149][49]
EndFuncWenn du die Dimensionen nicht kennst übergib einfach Parameter mit
[autoit]
[/autoit]
Func _clearApplicationIniArrayEditor($UBoundy, $UBoundx)
$RunningApplicationPatchData = 0
Dim $RunningApplicationPatchData[$UBoundy][$UBoundx]
EndFunc
[/autoit] -
So funktioniert es immer:
[autoit]Func _ArrayPurge(ByRef $aArray)
[/autoit]
; Author: ProgAndy
Local $iDims = Ubound($aArray, 0)
Switch $iDims
Case 0
Return SetError(1, 0, 0) ; Kein Array
Case 1
Local $i = Ubound($aArray)
Dim $aArray[$i]
Case 2
Local $i = Ubound($aArray)
Local $j = Ubound($aArray, 2)
Dim $aArray[$i][$j]
Case 3
Local $i = Ubound($aArray)
Local $j = Ubound($aArray, 2)
Local $k = Ubound($aArray, 3)
Dim $aArray[$i][$j][$k]
Case Else
Return SetError(2,0,0) ; Zu viele Dimensionen
EndSwitch
Return 1
EndFuncÜbrigens ist [ ][ ] ein 2D-Array. 3D wäre [ ][ ][ ]
-
heute hab ichs irgendwie mit 3d
danke jungens ... das ging