如何用按键停止一个无线循环的脚本?

twh2000

我用AU3写一个无限循环的脚本?
设2个按键
按键1执行无限循环脚本
按键2停止无限循环脚本

按键1执行无限循环脚本没问题
但无法用按键2停止无限循环脚本

请问按键2要用甚么语句来停止无限循环脚本
谢谢

augual

可以把代码发上来看看.
一般是EXITLOOP命令

twh2000

#include <GUIConstants.au3>
Opt("GUIOnEventMode", 1)  ; 切换为 OnEvent 模式
$mainwindow = GUICreate("测试", 600, 400) ; 创建窗口并返回窗口句柄
GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEClicked") ; 设置窗口关闭事件
$okbutton = GUICtrlCreateButton("执行", 70, 150, 60)  ;按钮"执行"
GUICtrlSetOnEvent($okbutton, "OKButton")              
$nobutton = GUICtrlCreateButton("暂停", 70, 200, 60)  ;按钮"暂停"
GUICtrlSetOnEvent($nobutton, "NOButton")              
GUISetState(@SW_SHOW)
While 1
  Sleep(10000)  ; 不做任何事
WEnd

Func OKButton()        ;按钮"执行"
   while 1=1
          
        ;无限循环脚本   
          
          
        WEnd                                    
EndFunc

Func NOButton() ;按钮"暂停"
        ;我要如何暂停脚本???

EndFunc

Func CLOSEClicked()
;;;;;;;;;;;;结速程式;;;;;;;;;;;;;;;
  Exit
EndFunc



以上是代码
我要用按键"暂停"停止无限循环
谢谢

sensel

请参考HotKeySet函数示例。
将暂停和继续分开成两个键，简单修改代码如下：

; Press Esc to terminate script, Pause/Break to "pause"

Global $Paused
HotKeySet("{F1}", "Pause")
HotKeySet("{F2}", "Continue")
HotKeySet("{ESC}", "Terminate")
HotKeySet("+!d", "ShowMessage") ;Shift-Alt-d

;;;; Body of program would go here ;;;;
While 1
        Sleep(100)
        ToolTip('Script is "Run"', 0, 0)
WEnd
;;;;;;;;

Func Pause()
        $Paused = True
        TogglePause()
EndFunc   ;==>Pause

Func Continue()
        $Paused = False
        TogglePause()
EndFunc   ;==>Continue

Func TogglePause()
        While $Paused
                Sleep(100)
                ToolTip('Script is "Paused"', 0, 0)
        WEnd
;        ToolTip("")
EndFunc   ;==>TogglePause

Func Terminate()
        Exit 0
EndFunc   ;==>Terminate

Func ShowMessage()
        MsgBox(4096, "", "This is a message.")
EndFunc   ;==>ShowMessage

51ak

收藏了，有用时好看。

anyky123

没钱下载了。

316428696

HOTKEY的办法是最好的办法！

lgmpds

收藏了，有用时好看。

caodongchun

收藏了，有用时好看。
lgmpds 发表于 2009-12-31 14:55

NO！
windows事件是最好的方法！
http://www.autoitx.com/forum.php ... o=lastpost#lastpost

caodongchun

HOTKEY的办法是最好的办法！
316428696 发表于 2009-12-23 23:44

http://www.autoitx.com/forum.php ... o=lastpost#lastpost