_ArrayAdd issue

[SlowCoder74]

Here's an issue I ran into with _ArrayAdd.  Maybe not problem so much, but something I thought needed a workaround ...

#include <Array.au3>

local $aMyArray[1]

_ArrayAdd($aMyArray,"blah")

Since you can't create an array with 0 elements in AutoIT, using _ArrayAdd in this fashion completely ignores the first element. 

I built my own version that does not, and I believe it conforms more with intended AutoIT array usage.

Func _ArrayAddValue(ByRef $aArray,$sValue = "")
    ;adds an element (redim) to 1D array, and assigns value to it
    ;if a non-array variable is provided, it will be converted (original data lost) to array, with value assigned to element [0]
    ;$aArray - array to add element and value to
    ;$sValue - value to assign to added element

    local $bIsNewArray = False
    if Not IsArray($aArray) Then ;create array
        Dim $aArray[1]
        $bIsNewArray = True
    EndIf

    if $bIsNewArray = False then ReDim $aArray[UBound($aArray) + 1]
    $aArray[UBound($aArray) - 1] = $sValue
EndFunc

New version of calling code would look like:

local $aMyArray

_ArrayAddValue($aMyArray,"blah")

Note that the newly initialized variable is NOT initially an array, which allows the _ArrayAddValue to add a value to the [0] element.

Thoughts?

[water]

With the latest stable version of AutoIt (3.3.10.x) you can have empty arrays:

Local $aMyArray[0]

The Array UDF supports empty arrays in 3.3.10.x.

[Melba23]

SlowCoder74,

 

  Quote

Since you can't create an array with 0 elements in AutoIT

Says who?

#include <Array.au3>
#include <MsgBoxConstants.au3>

; Start with 1 element and delete it
Global $aArray[1] = [0]
_ArrayDelete($aArray, 0)
MsgBox($MB_SYSTEMMODAL, "Size", "Array has " & UBound($aArray) & " items")
_ArrayAdd($aArray, "New Item")
MsgBox($MB_SYSTEMMODAL, "Size", "Array has " & UBound($aArray) & " items")

; Or just start with none in the first place
Global $aArray[0]
MsgBox($MB_SYSTEMMODAL, "Size", "Array has " & UBound($aArray) & " items")
_ArrayAdd($aArray, "New Item")
MsgBox($MB_SYSTEMMODAL, "Size", "Array has " & UBound($aArray) & " items")

M23

[SlowCoder74]

  On 1/22/2014 at 5:09 PM, water said:

With the latest stable version of AutoIt (3.3.10.x) you can have empty arrays:

Local $aMyArray[0]

The Array UDF supports empty arrays in 3.3.10.x.

 

  On 1/22/2014 at 5:13 PM, Melba23 said:

SlowCoder74,

 

Says who?

#include <Array.au3>
#include <MsgBoxConstants.au3>

; Start with 1 element and delete it
Global $aArray[1] = [0]
_ArrayDelete($aArray, 0)
MsgBox($MB_SYSTEMMODAL, "Size", "Array has " & UBound($aArray) & " items")
_ArrayAdd($aArray, "New Item")
MsgBox($MB_SYSTEMMODAL, "Size", "Array has " & UBound($aArray) & " items")

; Or just start with none in the first place
Global $aArray[0]
MsgBox($MB_SYSTEMMODAL, "Size", "Array has " & UBound($aArray) & " items")
_ArrayAdd($aArray, "New Item")
MsgBox($MB_SYSTEMMODAL, "Size", "Array has " & UBound($aArray) & " items")

M23

 

 

Yay!  Yoohoo!  Alright!  Cheer!

Forcing nonempty arrays has been one of the very few banes of my AutoIT experience!  Thank you for fixing that!

Downloading the newest release now ...