有什么办法能让右下角任务栏autoit图标在特定条件下变成红色或者动状一闪一闪的
像QQ如果有信息则闪动图标,有没有什么办法让autoit也这样呢?比如autoit在检测网页,读取网页后,如果发现一特定字符,比如在网页上发现了“失恋了是一种什么感觉”时,则让autoit图标由黑色变成红色或闪动,如果间隔一段时间再读取网页发现找不到“失恋了是一种什么感觉”时,则让autoit图标由红色变回黑色,或不再闪动。 循环 TraySetIcon() 这个想法挺有意思! 本帖最后由 sdc7 于 2012-2-4 23:03 编辑呵呵 闪烁的话好办 就是不知道怎么设置图片闪烁的时间! 红色图片 你用TraySetIcon()设置更换成红色的图标,然后 TraySetState (4) 这样 不会影响程序执行 图标就一闪一闪了 不过 感觉傻的不是QQ好看,闪的有点傻慢
#NoTrayIcon
Opt("TrayMenuMode",1) ; 默认菜单项目 (脚本暂停中/退出)(Script Paused/Exit) 将不会显示.
Local $exititem = TrayCreateItem("退出")
TraySetIcon("警告")
TraySetToolTip("SOS")
TraySetState() ; 显示托盘图标
Local $toggle = 0
TraySetState (4)
While 1
Sleep(1000)
WEnd 我试着编了一下软件,发现并不是图标本身变化,而是又产生了一个图标在变化,而且我不知道怎么把这个变化的图标干掉,即变没。或者消失。else里应该怎么写呢?
$location = StringInStr($html, "30MB")
If $location > 1 Then
$num = -Random(0,100,1) ; 负的随机数
TraySetIcon("Shell32.dll",$num)
$start = TimerInit()
EndIF 本帖最后由 半芯竹 于 2012-2-5 12:28 编辑
回复 5# sex123 #NoTrayIcon
Local $i
HotKeySet("{esc}","_Exit")
Opt("TrayOnEventMode", 1)
Opt("TrayMenuMode",1) ; 默认菜单项目 (脚本暂停中/退出)(Script Paused/Exit) 将不会显示.
Local $exititem = TrayCreateItem("退出")
TrayItemSetOnEvent($exititem, "_Exit" )
TraySetIcon("Shell32.dll", 10)
TraySetToolTip("SOS")
TraySetState() ; 显示托盘图标
TraySetState (4);让托盘图标闪烁
While 1
Sleep(500)
$i+=1
If$i > 10 Then
TraySetIcon();还原默认图标
TraySetState (8);让托盘图标停止闪烁
EndIf
WEnd
Func _Exit()
Exit
EndFunc增加还原图标,停止闪烁
页:
[1]