[PROBLEM]Radiobutton i 2 skrypty

[(-.Kosiarka.-)]

Cześć, chciałem zrobić dwa radiobutton'y, i w zależności który zaznacze, i kliknę button 'start' to taki skrypt mi weźmie. Szukałem na F1, lecz tylko znalazłem coś podobnego do GUIGetMsg. Pomożecie?

[Keniger]

No to jazda tworzysz te radiobuttony, oraz przycisk

 

Dajmy na to ze twój przycisk zwie sie :

$Button1

 

While 1

[...]

Case $Button1

$czytaj = GUICtrlRead($radio1)

If $czytaj = "funkcja1" then

; instrukcja (_func1, czyli funkcja jaka ma wykonac)

Else

; druga funkcja i instrukcja (_func2)

EndIf

EndSwitch

Wend

 

Coś w ten deseń Musisz dac GuiCtrlRead($uchwyt) i jezeli to sie równa czemuś to taką funkcje wywołuje :P

 

zaraz ci to napisze

 

masz zakomentowane :_:

 

#include <GUIconstants.au3>

GUICreate("hehehszki ...", 190, 160)    

; kontrolki gui
$button_1 = GUICtrlCreateButton ("Start", 30, 85, 120, 35)    

GUIStartGroup()
$radio_1 = GUICtrlCreateRadio ("Script 1", 50, 25, 100, 20)  
$radio_2 = GUICtrlCreateRadio ("Script 2", 50, 50, 100, 20)

GUISetState () ; wyswietl all

While 1
   $msg = GUIGetMsg()
   Select
      Case $msg = $GUI_EVENT_CLOSE
         Exit
         
      Case $msg = $button_1
        If GUICtrlRead($radio_1) = $GUI_CHECKED Then ; sprawdza czy radiobutton1 jest wybrany jezeli tak to instrukcja jezeli nie to idizie dalej
      MsgBox(64, "hehe", "skrypt1")
      ;instrukcje
      ElseIf GUICtrlRead($radio_2) = $GUI_CHECKED Then ; to samo sprawdza czy 2 radio button jest klikniety jezeli tak to instrukcja jezeli nie to leci dalej
      MsgBox(64, "hehe", "skrypt2")
      ;instrukcje
            Else
            MsgBox(64, "NOTE!", "Wybierz skrypt") ; jak ziomek nic nie wybra to msg box ze nic nie wybral ;d
            Exit
            EndIf
   EndSelect
WEnd

licze na +