xz00311 发表于 2019-8-12 14:22:35

[已解决]求帮忙在while循环里面显示倒计时之后继续while循环

本帖最后由 xz00311 于 2019-8-13 11:54 编辑

求帮忙在while循环里面显示倒计时之后继续while循环,通过ToolTip来提示

Global $Paused
HotKeySet("{F2}", "TogglePause")
HotKeySet("{ESC}", "Terminate")
HotKeySet("{F1}", "MouseC")


While 1
   Sleep(500)
WEnd

Func TogglePause()
    $Paused = NOT $Paused
    While $Paused
      sleep(100)
      ToolTip('脚本暂停中',0,0)
    WEnd
    ToolTip("")
EndFunc

Func Terminate()
    Exit 0
EndFunc

Func MouseC()
while 1

      这里是通过sleep延时的,延时1分钟之后继续while循环,不知道能不能通过倒计时的方式来实现呢

WEnd
EndFunc


guoguo188 发表于 2019-8-12 14:45:58

用 for 循环

for $sj=60 to 0 step -1
ToolTip('倒计时:'&$sj,0,0)
sleep(1000)
next


while 也行 但增加个 函数记次数

$sj=60
while 1
ToolTip('倒计时:'&$sj,0,0)
sleep(1000)
$sj=$sj -1
if $sj=0 then exitloop
wend

xz00311 发表于 2019-8-13 11:07:49

本帖最后由 xz00311 于 2019-8-13 11:17 编辑

不退出循环一直循环啊你看看我上面那个代码就知道了.倒数完成之后重新倒数,还有倒数到1的时候就不减下去了

xz00311 发表于 2019-8-13 11:21:12

谢谢用for可以实现了

afan 发表于 2019-8-13 11:43:57

xz00311 发表于 2019-8-13 11:07
不退出循环一直循环啊你看看我上面那个代码就知道了.倒数完成之后重新倒数,还有倒数到1的时候就不减下去了
...

他那个只是倒计时的循环体,除了应该是 60 to 1 外没毛病~
如有问题那就是你的描述有问题

Dontang2018 发表于 2019-8-14 14:15:02

guoguo188 发表于 2019-8-12 14:45
用 for 循环

for $sj=60 to 0 step -1


Yes.學習,學習.
页: [1]
查看完整版本: [已解决]求帮忙在while循环里面显示倒计时之后继续while循环