Global $a=2,$str='正在复制'
AdlibRegister("MyAdlib",5000)
MyAdlib()
$a=DirCopy("源路径","目的路径",1)；开始拷贝
;...
Exit
Func MyAdlib()
If $a<>2 then
AdlibUnRegister("MyAdlib")
TrayTip("")
else
$str&="."
TrayTip($str)
endif
EndFunc
如果只是要提示的话，试试这个。
3mile 发表于 2010-12-31 16:44 http://autoitx.com/images/common/back.gif
Global $a=2
AdlibRegister("MyAdlib",3000)
MyAdlib()
$a=DirCopy("E:\back\a","d:\a",1) ;开始拷贝
Func MyAdlib()
If $a<>2 then
AdlibUnRegister("MyAdlib")
TrayTip("","kaobeijieshu",5)
else
TrayTip("","正在复制。 ",5)
Sleep (500)
TrayTip("清除","",5)
TrayTip("","正在复制。。",5)
Sleep (500)
TrayTip("清除","",5)
TrayTip("","正在复制。。。",5)
Sleep (500)
TrayTip("清除","",5)
endif
EndFunc
我是这么写的，帮我看一下，现在碰到的问题是
AdlibRegister("MyAdlib",3000)，这句的时间问题，如果时间比较长，就没气球一直变得没有效果了
如果时间设短了，似乎就没有时间执行dircopy操作了
实际情况是这样，拷贝40M的文件
我设成5秒，执行下一次要等5秒，拷贝成功
我设成250毫秒，500毫秒，或1秒，气球提示的效果是有了
但是文件一直也拷贝不过去…… 加了SLEEP?那还执行什么？ 加了SLEEP?那还执行什么？
3mile 发表于 2010-12-31 19:01 http://autoitx.com/images/common/back.gif
如果我不加sleep的话，就显示一个，就不像动画了……
在有问一下，sleep会影响拷贝的速度
traytip呢？一直提示traytip会不会影响dircopy的速度呢？
页:
1
[2]