找回密码
 加入
搜索
查看: 1515|回复: 4

[AU3基础] 请教如何在循环前后执行文件!

[复制链接]
发表于 2011-2-7 01:22:17 | 显示全部楼层 |阅读模式
请教一下大虾们,如何在进度条一直滚动当中前后执行文件,执行文件的同时,进度条还要一直在滚动,请问这样能否做到?

这两个用那个都可以,谢谢了!
#include <GuiConstants.au3>
Opt("GUIOnEventMode", 1)
dim $start=0
    Global Const $PrCopyGui = GUICreate("测试", 220, 40)
    $Progress = GUICtrlCreateProgress(6, 10, 207, 20)
    GUISetState(@SW_SHOW)
    GUISetOnEvent($GUI_EVENT_CLOSE, "gui")
While 1
If $start >= 0 Then
        GUICtrlSetData($Progress, $start)
        Sleep(50)
        $start+=1
        If $start >= 100 Then $start = 0
Endif
WEnd

Func gui()
 Switch @GUI_CtrlId
  Case $GUI_EVENT_CLOSE
   Exit
 EndSwitch
EndFunc   ;==>gui
第二段:
ProgressOn("进度条", "Increments every second", "0 %")
For $i = 1 to 100 step 1
    sleep(100)
    ProgressSet( $i, $i & " %")
Next
ProgressSet(100 , "完成", "Complete")
sleep(500)
ProgressOff()
发表于 2011-2-7 02:31:19 | 显示全部楼层
等待高手来吧,新手我看着.
 楼主| 发表于 2011-2-7 11:50:52 | 显示全部楼层
高人们,请问有没办法解决这个问题呢?
发表于 2011-2-7 12:30:41 | 显示全部楼层
进度做成一个过程或函数,中间的SLEEP不要,执行过程调用就行了
 楼主| 发表于 2011-2-7 13:11:56 | 显示全部楼层
这样是可以,但是没有一种一直滚动的感觉,我是想在一直滚动的时候前后执行文件,但我试了很多方法也无法现实,所以请教一下论坛的强人!
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-11-15 18:15 , Processed in 0.088953 second(s), 23 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表