ReDim: 2 way.

[rasim]

Hello! First example of array ReDim:

#include <Array.au3>

Dim $aNewArray[1]

For $i = 1 To 2
    $aNewArray[0] += 1
    ReDim $aNewArray[$aNewArray[0] + 1]
    $aNewArray[$aNewArray[0]] = $i
Next
_ArrayDisplay($aNewArray)oÝ÷ Ùj+Ê+­ç-Úw^Å©©æ®¶­sb6æ6ÇVFRfÇC´'&æS2fwC° ¤FÒb33c¶æWt'&³Ð ¤f÷"b33c¶¢ÒFò  b33c¶æWt'&µT&÷VæBb33c¶æWt'&ÒÒ³Ò &TFÒb33c¶æWt'&²T&÷VæBb33c¶æWt'&ҲРb33c¶æWt'&µT&÷VæBb33c¶æWt'&ÒÒÒb33c¶ ¤æW@ ¥ô'&F7Æb33c¶æWt'&

Not work. Where wrong?

[randallc]

Hi,

Try;

For $i = 1 To 2
    $aNewArray[0]=UBound($aNewArray-1)
    ReDim $aNewArray[UBound($aNewArray) + 1]
    $aNewArray[UBound($aNewArray)-1] = $i
Next
_ArrayDisplay($aNewArray)

Best, Randall

[rasim]

randallc

Thanks for help, but i should like to know why 2-nd example don`t work correct.

[WolfWorld]

#include <Array.au3>

Dim $aNewArray[1]

For $j = 1 To 2
    $aNewArray[UBound($aNewArray) - 1] += 1 ;here it $aNewArray[1] not $aNewArray[0]
    ReDim $aNewArray[(UBound($aNewArray) - 1) + 1]
    $aNewArray[UBound($aNewArray) - 1] = $j;here it $aNewArray[1] not $aNewArray[0]
Next

_ArrayDisplay($aNewArray)

[rasim]

athiwatc

You are tested yourself code before posting? Your example don`t work.

[WolfWorld]

This one work, and sorry for the upper one i thongh i got it so i didn't test it

#include <Array.au3>

Dim $aNewArray[1]

For $j = 1 To 2
    ReDim $aNewArray[UBound($aNewArray) + 1]
    $aNewArray[UBound($aNewArray) - 1] = $j
Next
$aNewArray[0] = UBound($aNewArray) - 1

_ArrayDisplay($aNewArray)oÝ÷ Ù«­¢+Ø¥¹±Õ±ÐíÉÉä¹ÔÌÐì()¥´ÀÌØí9ÝÉÉålÅt()½ÈÀÌØí¨ôÄQ¼È($ÀÌØí9ÝÉÉåmU   ½Õ¹ ÀÌØí9ÝÉÉ䤴ÀÌØí©tôU  ½Õ¹ ÀÌØí9ÝÉÉä¤(%I¥´ÀÌØí9ÝÉÉåmU    ½Õ¹ ÀÌØí9ÝÉÉ䤬Åt($ÀÌØí9ÝÉÉåmU    ½Õ¹ ÀÌØí9ÝÉÉ䤴ÅtôÀÌØí¨)9áÐ(()}ÉÉå¥ÍÁ±ä ÀÌØí9ÝÉÉä¤

The problem with your is UBound($aNewArray) - 1 Doesn't always make 0

Edited January 15, 2008 by athiwatc

[rasim]

athiwatc

Thanks!

[therks]

I know this is resolved already, but I just had to mention I don't understand why you had

(UBound($aNewArray) - 1) + 1

Considering all you do is add and subtract 1 so it's the same number.

[weaponx]

Lets not forget the uselessness of this piece:

$aNewArray[uBound($aNewArray) - $j] = UBound($aNewArray)

Which is the same as:

$aNewArray[0] = UBound($aNewArray)