Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » [решено] существует ли: sleep($input1)????????????????

Ответить
Настройки темы
[решено] существует ли: sleep($input1)????????????????

Новый участник


Сообщения: 24
Благодарности: 1

Профиль | Отправить PM | Цитировать


Добрыи день я всё немогу закончить скрипт. Нехвотает 2 функции. Я уже всё перепробовал но как-то неполучаетса.
1> в funk generate() значение sleep() должно менятся на задонное число в GUICtrlCreateInput. Как это правильно сделать? Я считал что sleep($input1) должно быть правильным но както неработает. скрипт начинает работать как бы без функции sleep
2:Мне надо чтоб после того как нажмёш на BUTTON1 чтоб GUI окошко исчезало и скрипт продолжил работу без него. Но как то я ненахожу подходящих кодов.

Заранее благодарю.


Вот начало скрипта:

Код: Выделить весь код
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>


$Form1 = GUICreate("БезСЕРДечныи БОТ", 269, 99, -1, -1)
$Input1 = GUICtrlCreateInput("2000", 72, 16, 121, 21)
$Button1 = GUICtrlCreateButton("let's hack....", 96,56, 75, 25, 0)
GUISetState(@SW_SHOW)




$start=TimerInit()
Do
  $n = GUIGetMsg ()
     
   If $n = $button1 Then
    call("start")
	 $start=TimerInit()
   EndIf
Until $n = $GUI_EVENT_CLOSE


Func start ()
WinWaitActive("www.---.de - Windows Internet Explorer")
sleep(100)
Call("generate")
EndFunc

Func generate ()
    ;TrayTip("...", "...", 3, 16)
    Sleep($Input1) ;ТУТ ДОЛЖЕН БЫТЬ ВСТАВЛЕН INPUT.
    $random = Random(0, 1, 1)
    If $random = 0 Then
        ;TrayTip("", "....", 4, 2)
        odin()
        ;TrayTip("", "", 0)
    Else
        ;TrayTip("", "....", 4, 2)
        dva()
        ;TrayTip("", "", 0, 16)
    EndIf

EndFunc

Отправлено: 17:49, 18-04-2010

 

Аватара для kaster

Старожил


Сообщения: 367
Благодарности: 91

Профиль | Отправить PM | Цитировать


Код: Выделить весь код
Sleep(GUICtrlRead($Input1))

-------
Русское сообщество пользователей AutoIt
autoit@conference.jabber.ru - Конференция на jabber.ru

Это сообщение посчитали полезным следующие участники:

Отправлено: 18:17, 18-04-2010 | #2



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.


Новый участник


Сообщения: 24
Благодарности: 1

Профиль | Отправить PM | Цитировать


спасибо огромное. а второи вопрос решим? чтобы окошко исчезало?

Отправлено: 18:43, 18-04-2010 | #3


Аватара для kaster

Старожил


Сообщения: 367
Благодарности: 91

Профиль | Отправить PM | Цитировать


ты хочешь чтобы окно исчезло насовсем или только скрылось из виду, а потом можно было восстановить его видимость, скажем через гор. клавишу?

-------
Русское сообщество пользователей AutoIt
autoit@conference.jabber.ru - Конференция на jabber.ru


Отправлено: 18:51, 18-04-2010 | #4


Новый участник


Сообщения: 24
Благодарности: 1

Профиль | Отправить PM | Цитировать


насовсем ушло а скрипт дальшеработал

Отправлено: 17:26, 21-04-2010 | #5


Аватара для kaster

Старожил


Сообщения: 367
Благодарности: 91

Профиль | Отправить PM | Цитировать


Код: Выделить весь код
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>


$Form1 = GUICreate("БезСЕРДечныи БОТ", 269, 99, -1, -1)
$Input1 = GUICtrlCreateInput("2000", 72, 16, 121, 21)
$Button1 = GUICtrlCreateButton("let's hack....", 96,56, 75, 25, 0)
GUISetState(@SW_SHOW)




$start=TimerInit()
Do
	$n = GUIGetMsg ()
	
	If $n = $button1 Then
		GUIDelete()
		While 1
			start()
			$start=TimerInit()
		WEnd
		
	EndIf
Until $n = $GUI_EVENT_CLOSE


Func start()
	WinWaitActive("www.---.de - Windows Internet Explorer")
	sleep(100)
	generate()
EndFunc

Func generate ()
	;TrayTip("...", "...", 3, 16)
	Sleep(GUICtrlRead($Input1)) ;ТУТ ДОЛЖЕН БЫТЬ ВСТАВЛЕН INPUT.
	$random = Random(0, 1, 1)
	If $random = 0 Then
		;TrayTip("", "....", 4, 2)
		odin()
		;TrayTip("", "", 0)
	Else
		;TrayTip("", "....", 4, 2)
		dva()
		;TrayTip("", "", 0, 16)
	EndIf

EndFunc

-------
Русское сообщество пользователей AutoIt
autoit@conference.jabber.ru - Конференция на jabber.ru

Это сообщение посчитали полезным следующие участники:

Отправлено: 17:39, 21-04-2010 | #6


Новый участник


Сообщения: 24
Благодарности: 1

Профиль | Отправить PM | Цитировать


спасибо большое.

Отправлено: 23:01, 22-04-2010 | #7



Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » [решено] существует ли: sleep($input1)????????????????

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
[решено] Прерывание sleep() горячей клавишей... sashadeg AutoIt 3 27-06-2009 18:16
Cryostasis: Sleep of Reason Luka55555 Игры 1 26-03-2009 06:21
C/C++ - C++Builder Sleep() alextrs Программирование и базы данных 2 15-03-2008 22:47
[info]Sleep VS Stand by & Hibernate newbigmir Microsoft Windows Vista 0 15-03-2007 20:27
Как отключить кнопки power и sleep Guest Непонятные проблемы с Железом 11 28-04-2003 08:59




 
Переход