Что нового

Как реализовать форму с кнопкой остановки цикла?

heyjoe

Новичок
Сообщения
9
Репутация
0
Здравствуйте. Есть следующий бесконечный цикл
Код:
While 1
Run("notepad.exe")
$hWnd = WinWait("[CLASS:Notepad]", "")
Sleep (5000)
WinClose($hWnd)
WEnd

Необходимо реализовать форму с двумя кнопками:первая запускает цикл, вторая - останавливает
Каким образом это сделать? Самому не получается разобраться.


Используйте для AutoIt кода тег [autoit]
autoit.gif

madmasles.
 

MnM

Post-Hardcore
Сообщения
679
Репутация
90
Код:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
Opt("GUIOnEventMode", 1)
$Form1 = GUICreate("Win", 297, 95, 254, 124)
GUISetOnEvent($GUI_EVENT_CLOSE, "_CloseWin")
$Button1 = GUICtrlCreateButton("Старт", 32, 24, 97, 25)
GUICtrlSetOnEvent($Button1, "_Start")
$Button2 = GUICtrlCreateButton("Стоп", 136, 24, 97, 25)
GUICtrlSetOnEvent($Button2, "_Stop")
Global $trig = 0
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	if $trig = 1 Then
		Run("Notepad.exe")
		$hWnd = WinWait("[CLASS:Notepad]", "")
		Sleep(5000)
		WinClose($hWnd)
	ElseIf $trig = 0 Then
		Sleep(10)
	EndIf
WEnd

Func _Stop()
	$trig = 0
EndFunc

Func _Start()
	$trig = 1
EndFunc

Func _CloseWin()
	Exit
EndFunc
 
Автор
H

heyjoe

Новичок
Сообщения
9
Репутация
0
Дружище, спасибо большое. :beer:
 
Верх