How declare large number of global variables?

[Wasted]

Hi all ...

I was wondering if there is a way to declare a large number of global variables programatically.

For example, I need to declare AB_1 thru to AB_100 as global variables. Is there a way to do this without having to declare each separately?

Any help is appreciated ....

Wasted

[UEZ]

Look at Assign() function.

Br,

UEZ

[Zedna]

Look at Execute() I'm not sure if it supports also Dim statement but you may try.

Also look at these functions related to this: Eval(), Assign(), IsDeclared()

Edited June 13, 2012 by Zedna

[water]

Use an array:

Global $sAB[100]
ConsoleWrite($sAB[0] & " " & $sAB[99]) ; Write first and last element

[UEZ]

Little example:

For $i = 1 To 100
    Assign("AB_" & $i, $i)
Next

$i = Random(1,  100, 1)

MsgBox(0, Default, "Variable AB_" & $i & ": " & Eval("AB_" & $i))

Br,

UEZ

[Wasted]

Thanks everyone ...

This seems to work OK..

start()

Func start()
global $i
For $i = 1 To 100
    Assign("AB_" & $i, $i,2)
Next
$i = Random(1,  100, 1)
;MsgBox(0, Default, "Variable AB_" & $i & ": " & Eval("AB_" & $i))
MsgBox(0, Default, "Variable AB_" & $i)
test()
EndFunc
func test()
$i = Random(1,  100, 1)
MsgBox(0, Default, "Variable AB_" & $i)
EndFunc

Wasted