Can you delete a place in an array?

[russell]

i took this from the help

#include <Array.au3>
Local $avArray[10]
$avArray[0] = "JPM"
$avArray[1] = "Holger"
$avArray[2] = "Jon"
$avArray[3] = "Larry"
$avArray[4] = "Jeremy"
$avArray[5] = "Valik"
$avArray[6] = "Cyberslug"
$avArray[7] = "Nutster"
$avArray[8] = "JdeB"
$avArray[9] = "Tylo"
_ArrayDisplay($avArray, "$avArray set manually 1D")
_ArrayDisplay($avArray, "$avArray set manually 1D transposed", -1, 1)

If i were to not have a vaule in let say $avArray[4], is there are way to drop it so it read

$avArray[0] = "JPM"
$avArray[1] = "Holger"
$avArray[2] = "Jon"
$avArray[3] = "Larry"
$avArray[5] = "Valik"
$avArray[6] = "Cyberslug"
$avArray[7] = "Nutster"
$avArray[8] = "JdeB"
$avArray[9] = "Tylo"

Or reorganize to drop the dead space? Like this

$avArray[0] = "JPM"
$avArray[1] = "Holger"
$avArray[2] = "Jon"
$avArray[3] = "Larry"
$avArray[4] = "Valik"
$avArray[5] = "Cyberslug"
$avArray[6] = "Nutster"
$avArray[7] = "JdeB"
$avArray[8] = "Tylo"

Currently the best i can do is like this:

$avArray[0] = "JPM"
$avArray[1] = "Holger"
$avArray[2] = "Jon"
$avArray[3] = "Larry"
$avArray[4] =
$avArray[5] = "Valik"
$avArray[6] = "Cyberslug"
$avArray[7] = "Nutster"
$avArray[8] = "JdeB"
$avArray[9] = "Tylo"

But i need to find a way to no have the dead spot

Edited November 16, 2011 by russell

[Realm]

_ArrayDelete()

Directly from the Help File:

#include <Array.au3>

Local $avArray[10]

$avArray[0] = "JPM"
$avArray[1] = "Holger"
$avArray[2] = "Jon"
$avArray[3] = "Larry"
$avArray[4] = "Jeremy"
$avArray[5] = "Valik"
$avArray[6] = "Cyberslug"
$avArray[7] = "Nutster"
$avArray[8] = "JdeB"
$avArray[9] = "Tylo"

_ArrayDisplay($avArray, "$avArray BEFORE _ArrayDelete()")
_ArrayDelete($avArray, 8)
_ArrayDisplay($avArray, "$avArray AFTER _ArrayDelete()")

Edit: Added example from Helpfile

Edited November 16, 2011 by Realm

[water]

_Arraydelete($avArray, 4) will delete the empty element.

[russell]

oo ok i was thinking it would only delete the value in that element. Thanks

[russell]

So why doesn't this work

#include <Array.au3>
Local $avArray[10]
$avArray[0] = "JPM"
$avArray[1] = "Holger"
$avArray[2] = "Jon"
$avArray[3] = "Larry"
$avArray[4] = ""
$avArray[5] = "sam"
$avArray[6] = "Cyberslug"
$avArray[7] = "Nutster"
$avArray[8] = "JdeB"
$avArray[9] = "Tylo"
For $i = 0 to $avArray
If $avArray[$i] ="" Then _ArrayDelete($avArray, $i)
Next
_ArrayDisplay($avArray, "$avArray AFTER _ArrayDelete()")

Edited November 16, 2011 by russell

[water]

If you delete an element of an array you have to run through the array from the highest to the lowest element:

#include <Array.au3>
Local $avArray[10]
$avArray[0] = "JPM"
$avArray[1] = "Holger"
$avArray[2] = "Jon"
$avArray[3] = "Larry"
$avArray[4] = ""
$avArray[5] = "sam"
$avArray[6] = "Cyberslug"
$avArray[7] = "Nutster"
$avArray[8] = "JdeB"
$avArray[9] = "Tylo"
For $i = Ubound($avArray, 1)-1 to 0
  If $avArray[$i] ="" Then _ArrayDelete($avArray, $i)
Next
_ArrayDisplay($avArray, "$avArray AFTER _ArrayDelete()")

Because if the array has 5 elements at the beginning and you delete one element (now the array has onyl 4 elements) your loops still goes up to element 5 which then doesn't exist any more.

Edited November 16, 2011 by water

[russell]

alright, so you have the place held and have to esitail reload or review in information in the array? BTW thanks

[Herb191]

I am sure there is more then one way to do this but when I use _ArrayDelete in a loop this is how I do it.

#include <Array.au3>
Local $avArray[10]
$avArray[0] = "JPM"
$avArray[1] = "Holger"
$avArray[2] = "Jon"
$avArray[3] = ""
$avArray[4] = "Jeremy"
$avArray[5] = "sam"
$avArray[6] = ""
$avArray[7] = "Nutster"
$avArray[8] = "JdeB"
$avArray[9] = "Tylo"

$count = 0
For $i = 0 To UBound($avArray, 1) - 1
    If $avArray[$i] = "" Then _ArrayDelete($avArray, $i)
    $count = $count + 1
    If $count = UBound($avArray, 1) - 1 Then ExitLoop
Next
_ArrayDisplay($avArray, "$avArray AFTER _ArrayDelete()")

Edited November 16, 2011 by Herb191

[russell]

that seems to work, thank you very much

[water]

esitail? Sorry, my english-german dictionary can't help me with this word.

[Malkey]

@water

"Step -1"

Malkey

[BrewManNH]

Herb191

That code won't work the way you want it to. You have to recurse through the array in reverse, or you're either going to get an array subscript error, or not delete items that you need to delete. The best way is the way that water showed, except you need to add a Step -1 at the end of the For $i = Ubound($avArray, 1)-1 to 0 line.

EDIT: Typo

Edited November 17, 2011 by BrewManNH

[Spiff59]

Using ArrayDelete seems pretty inefficient, as it both processes the entire array each time it's called, and executes a Redim() on the array each time it's called.

I would think a single pass through the array, and a single Redim() like this would be a better way to go:

#include <Array.au3>
Local $avArray[10]
$avArray[0] = "JPM"
$avArray[1] = "Holger"
$avArray[2] = "Jon"
$avArray[3] = ""
$avArray[4] = "Jeremy"
$avArray[5] = "sam"
$avArray[6] = ""
$avArray[7] = "Nutster"
$avArray[8] = "JdeB"
$avArray[9] = "Tylo"

Local $idx = 0
For $i = 0 To UBound($avArray) - 1
    If $avArray[$i] <> "" Then
        $avArray[$idx] = $avArray[$i]
        $idx += 1
    EndIf
Next
ReDim $avArray[$idx]
_ArrayDisplay($avArray, "$avArray AFTER _ArrayDelete()")

edit: bit 'o clean up

Edited November 17, 2011 by Spiff59

[water]

@water

"Step -1"

Malkey

Oops

I shouldn't post untested code!