Changing button properties

[jmosley708]

I'm building a keno game and I'm using 80 buttons to select the numbers. I would like to know of a way to randomly select and change the buttons color from a function.

Thanks

[monoceres]

Maby something like this:

GUICreate("Sample",610,500)
Dim $controls[180]

Dim $x=10, $y=10
For $i=0 To Ubound($controls)-1
    $controls[$i]=GUICtrlCreateButton($i,$x,$y,30,30)
    $x+=40
    If $x>=600 Then
        $x=10
        $y+=40
    EndIf
Next

GUISetSTate()
_RandomizeControlColor($controls)

Do
    $msg=GUIGetMsg()

Until $msg=-3


Func _RandomizeControlColor($array)
    For $i=0 To UBound($array)-1
        GUICtrlSetBkColor($array[$i],Random(0x000000,0xFFFFFF,1))
    Next
EndFunc