终止正在运行的某个函数怎么写？

silvay22

本人想写个：当按到ESC这个键时，就终止目前正在执行的函数，而不是退出程序。而我写的总是直接就退出了程序。
HotKeySet("{ESC}", "terminate")
Func terminate()
        Exit
EndFunc   ;==>terminate

[ 本帖最后由 silvay22 于 2008-7-14 09:10 编辑 ]

顽固不化

看看能否在函数中加热键。
你的热键就是退出吗。

silvay22

不是，我的意思是能不能设定一个热键，当我按下这个热键时，正在执行的程序的函数就会终止执行，而程序本身的界面不退出去。

qop1830

HotKeySet("{ESC}", "terminate")
Local $i = 0, $s = 0, $x = ""
While 1
        Sleep(500)
        $i = $i + 1
        TrayTip("第一个", $i, "", 2)
        If $x = "exit" Then ExitLoop
WEnd

While 1
        Sleep(500)
        $s = $s + 1
        TrayTip("第二个", $s, "", 2)
WEnd

Func terminate()
        $x = "exit"
EndFunc   ;==>terminate

silvay22

十分感谢qop1830大侠的提示及源代码。问题得以完美解决！谢谢您！

sonny

呵呵~~ 没太用心学，也再找跳出循环~   exitloop