Jump to content

Checkboxes Control as only one Box is Checked


FoD-Freeman
 Share

Recommended Posts

Hi i´m a newbie with autoit i found a script for checkboxes i understand the script. but now i search the following option

is it possible to check how many boxes are checked. because i need a test that only one box can be checked not 2 or 3 at the same time.

#include <GUIConstants.au3>

GUICreate("Windows Xp Checkbox",499,488 )

Func _run($q)

Select

Case $q = 0

Msgbox ( 0 , '' , 'Program 1' )

Case $q = 1

Msgbox ( 0 , '' , 'Program 2' )

Case $q = 2

Msgbox ( 0 , '' , 'Program 3' )

EndSelect

EndFunc

GUISetState ()

Opt ( 'GUICoordMode' , 2 )

Dim $a[3]

$a[0]=GUICtrlCreateCheckbox ( '1' , 5 , 5 )

$a[1]=GUICtrlCreateCheckbox ( '2' , -1 , 2 )

$a[2]=GUICtrlCreateCheckbox ( '3' , -1 , 2 )

Opt ( 'GUICoordMode' , 1 )

$okbutton = GUICtrlCreateButton ("Auswahl",200,340,70,20)

While 1

$msg = GUIGetMsg()

Select

Case $msg = $GUI_EVENT_CLOSE

Exit

Case $msg = $okbutton

ExitLoop

EndSelect

Wend

Dim $o[3]

For $n=0 To 2

$o[$n]=GUICtrlRead ( $a[$n] )

If $o[$n]=1 Then _run($n)

Next

Greets Timo

ps

sorry for english for runaways

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...