|
Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » Использование Radio переключателя... |
|
Использование Radio переключателя...
|
Старожил Сообщения: 379 |
Профиль | Отправить PM | Цитировать Сам понимаю, что вопрос нубский, но всётаки....
можно пример простого скрипта с переключателем, при нажатии которого будет в скрипт вписываться какой-нибудь сторонний код Например: нажали => У нас в середине скрипта гденибудь добавилось sleep (10000) P.S. Высокоуважеамый "beve" и "CreatoR@ надаежда на Вас xDDD |
|
Отправлено: 13:40, 14-05-2009 |
Ветеран Сообщения: 553
|
Профиль | Отправить PM | Цитировать Так чтоль ? ... что бы где то появилось 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 |
Отправлено: 14:04, 14-05-2009 | #2 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
Ветеран Сообщения: 553
|
Профиль | Отправить PM | Цитировать Ещё так наверно можно ... больше незнаю как
#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 |
Отправлено: 14:25, 14-05-2009 | #3 |
Must AutoIt Сообщения: 3054
|
Профиль | Сайт | Отправить PM | Цитировать Цитата sashadeg:
#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 |
|
------- Отправлено: 17:18, 14-05-2009 | #4 |
Старожил Сообщения: 206
|
Профиль | Отправить PM | Цитировать Цитата sashadeg:
|
||
Отправлено: 04:40, 15-05-2009 | #5 |
Участник сейчас на форуме | Участник вне форума | Автор темы | Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
Интернет - All radio | ALaN_1 | Программное обеспечение Windows | 8 | 13-12-2010 15:29 | |
FM-Radio на ПК | united | Программное обеспечение Windows | 7 | 03-03-2007 15:56 | |
[решено] возле переключателя языка- слово адрес | it_s_me | Microsoft Windows 2000/XP | 2 | 15-01-2006 17:36 | |
Nokia + Radio | Greyman | Мобильные ОС, смартфоны и планшеты | 9 | 13-08-2004 00:47 |
|