chengjinn 发表于 2009-9-11 15:10:55

关于hotsetkey转回主程序

本帖最后由 chengjinn 于 2009-9-11 16:44 编辑

$flag=True
local $inpwd,$password='knights'
HotKeySet("{SPACE}", "PAUSE")
while 1
      Sleep(100)
                if winexists('我的电脑') then winkill('我的电脑')
WEnd

Func PAUSE()
       
      If $flag = True Then
                        $inpwd=inputbox('输入暂停密码','请输入密码','','*M16','','','','',6)
                        if $inpwd=$password then
                Tooltip('暂停中', @Desktopwidth-120,@Desktopheight-88,'程序提示',1,1)
                                Sleep(3000)
                                tooltip('')
                                $flag = False
                               
                        Else
                                Exit
                        EndIf
                       
      Else
               Tooltip('继续运行', @Desktopwidth-120,@Desktopheight-88,'程序提示',1,1)
                                Sleep(3000)
                                tooltip('')
                                $flag = True
      EndIf
EndFunc   ;==>PAUSE
这个继续运行时要怎么跳回主程序啊?~``
按热键暂停就可以
只要在暂停那里加上一个WHILE 1就可以了.
关于我问的问题真不好意思.自已犯傻了.
函数运行完后就会自动跳回主程序的..
自已测试好了.`.`.

afan 发表于 2009-9-11 15:21:12

你这不是要跳回吧，而是暂停没用吧$flag = True
Local $inpwd, $password = 'knights'
HotKeySet("{SPACE}", "PAUSE")
While 1
        Sleep(100)
        If $flag = True Then
                If WinExists('我的电脑') Then WinKill('我的电脑')
        Endif
WEnd

Func PAUSE()
        If $flag = True Then
                $inpwd = InputBox('输入暂停密码', '请输入密码', '', '*M16', '', '', '', '', 6)
                If $inpwd = $password Then
                        ToolTip('暂停中', @DesktopWidth - 120, @DesktopHeight - 88, '程序提示', 1, 1)
                        Sleep(3000)
                        ToolTip('')
                        $flag = False
                Else
                        Exit
                EndIf
        Else
                ToolTip('继续运行', @DesktopWidth - 120, @DesktopHeight - 88, '程序提示', 1, 1)
                Sleep(3000)
                ToolTip('')
                $flag = True
        EndIf
EndFunc   ;==>PAUSE

chengjinn 发表于 2009-9-11 16:23:22

我的暂停是有用的.
我是要当提示继续运行后要跳回主程序...继续监控我的电脑的标题.`.

afan 发表于 2009-9-11 16:27:50

3# chengjinn



...
while 1
      Sleep(100)
                if winexists('我的电脑') then winkill('我的电脑')
WEnd ...
chengjinn 发表于 2009-9-11 15:10 http://www.autoitx.com/images/common/back.gif

你的循环中没有判断$flag真假，一直都在监视，怎么暂停？

chengjinn 发表于 2009-9-11 16:43:31

按热键暂停就可以
只要在暂停那里加上一个WHILE 1就可以了.
关于我问的问题真不好意思.自已犯傻了.
函数运行完后就会自动跳回主程序的..
自已测试好了.`.`.
页: [1]
查看完整版本: 关于hotsetkey转回主程序