Использование Radio переключателя...

[sashadeg]

Сам понимаю, что вопрос нубский, но всётаки....
можно пример простого скрипта с переключателем, при нажатии которого будет в скрипт вписываться какой-нибудь сторонний код :)
Например: нажали => У нас в середине скрипта гденибудь добавилось sleep (10000)

P.S.
Высокоуважеамый "beve" и "CreatoR@ надаежда на Вас xDDD

[FlatX007]

Так чтоль ? ... что бы где то появилось Sleep (10000) нужно его сначала задать Sleep (0)

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

$Form2 = GUICreate("Form2", 294, 126, 302, 218)
$Radio1 = GUICtrlCreateRadio("Пауза 10 секунд", 32, 16, 249, 17)
$Radio2 = GUICtrlCreateRadio("Пауза 20 секунд", 32, 48, 257, 17)
$Button1 = GUICtrlCreateButton("Go!", 64, 88, 169, 33, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$sleep = 0
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

Case $Button1
If GUICtrlRead ($Radio1) = 1 Then
$sleep = 10000
EndIf

If GUICtrlRead ($Radio2) = 1 Then
$sleep = 20000
EndIf

Sleep ($sleep)
MsgBox(0,"","Пауза " & $sleep &" секунд")
EndSwitch
WEnd

[FlatX007]

Ещё так наверно можно ... больше незнаю как :dont-know

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

$Form2 = GUICreate("Form2", 294, 126, 302, 218)
$Radio1 = GUICtrlCreateRadio("Пауза 10 секунд", 32, 16, 249, 17)
$Radio2 = GUICtrlCreateRadio("Пауза 20 секунд", 32, 48, 257, 17)
$Button1 = GUICtrlCreateButton("Запустить", 64, 88, 169, 33, 0)
GUISetState(@SW_SHOW)

$sleep = 0
$rIndex = ""

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

Case $Button1
If GUICtrlRead ($Radio1) = 1 Then
$sleep = 10000
$rIndex = 1
EndIf
If GUICtrlRead ($Radio2) = 1 Then
$sleep = 20000
$rIndex = 2
EndIf

#comments-start
......................

Сдесь чего-то написанно :) тут ваш код
.......................

#comments-end

If $rIndex = 1 Then Sleep ($sleep) ; Тут нам нужно получит паузу 10 секунд <<<< ------------------

#comments-start
......................

Сдесь чего-то написанно :) тут ваш код
.......................

#comments-end

If $rIndex = 2 Then Sleep ($sleep) ; Тут нам нужно получит паузу 20 секунд <<<< ------------------

EndSwitch
WEnd

[Creat0R]

пример простого скрипта с переключателем, при нажатии которого будет в скрипт вписываться какой-нибудь сторонний код »
Что значит сторонний код? Код выполняется, и в это время добавить ничего нельзя, то что прописано, то и будет выполняться.

#include <GuiConstantsEx.au3>

$GUI = GUICreate("Test Script", 300, 200)

$Radio1 = GUICtrlCreateRadio("Radio 1", 20, 40)
$Radio2 = GUICtrlCreateRadio("Radio 2", 20, 70)

GUISetState(@SW_SHOW, $GUI)

While 1
$nMsg = GUIGetMsg()

Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Radio1, $Radio2
ConsoleWrite("Выполняем код (" & GUICtrlRead($nMsg, 1) & ")" & @CRLF)
EndSwitch
WEnd

[Yashied]

У нас в середине скрипта где нибудь добавилось sleep (10000) »
Программа на то и есть программа, что у нее где нибудь не бывает. Где нибудь бывает только с женщинами. А сторонний код в данном контексте звучит как вредоностный код. Если Вы хотите сделать что-то определенное, то сказать об этом было бы хорошей идеей с Вашей стороны. Вот.

:)