(已解决)请教一个程序，如何实现运行30分钟后自动退出

faceyao · 发表于 2011-4-29 20:00:32

本帖最后由 faceyao 于 2011-5-1 18:36 编辑

从双击软件开始运行时开始计时，达到30分钟就自动退出。不能使用sleep语句。因为sleep一用软件就卡在那里不工作了。

3mile · 发表于 2011-4-29 21:48:21

AdlibRegister("MyAdlib",30*60*1000)

Func MyAdlib()
exit
EndFunc

faceyao · 发表于 2011-4-30 12:35:42

楼上的代码，运行后没有反应，一运行就退出。

easefull · 发表于 2011-4-30 12:48:24

另外给你个思路,用
TimerInit
TimerDiff

Ziya · 发表于 2011-4-30 13:00:56

While 1
        AdlibRegister("MyAdlib",30*60*1000)
        WEnd

Func MyAdlib()
      exit
EndFunc

这样呗

jaymin · 发表于 2011-4-30 13:01:20

计时，或者和系统比对时间都可以

lpxx · 发表于 2011-5-1 01:32:31

方法很多，看你的思路了。

faceyao · 发表于 2011-5-1 17:53:10

这样呗
Ziya 发表于 2011-4-30 13:00

While 1

        AdlibRegister("MyAdlib",9*1*1000)


WEnd


Func MyAdlib()

      exit

EndFunc

运行后 9秒到时间并没有退出啊

easefull · 发表于 2011-5-1 18:00:16

别总直接复制了别人的代码就直接用,好歹也要了解一下那代码的意思啊.

AdlibRegister("MyAdlib",9*1*1000)
While 1
        Sleep(100)
WEnd

Func MyAdlib()
        exit
EndFunc

faceyao · 发表于 2011-5-1 18:35:54

谢谢楼上，可以了，已经解决

Ziya · 发表于 2011-5-3 10:06:17

没仔细看,随手打的,竟然错了....哈哈

		自动登录	找回密码
密码			加入

[AU3基础] (已解决)请教一个程序，如何实现运行30分钟后自动退出