TimerQ 是一款非常简单的倒计时工具
到时间后会弹出提示框:
选择 Set Custom Timer 自定义提醒时间后,Name Timer 就会代替上面的 Your 15 minutes are up! 成为提示框的内容。
下载(9.65KB): mediafire | 来自小众软件 | live | 新浪
沙发
回复
大腿我是不会给任何人滴
你成功了…
终于成功了耶 下一个沙发我也要拿走(●?▽`●)ノ
昨天在深度也看见个倒计时软件,只不过那个是为仪式什么的场合准备的,点运行–然后就会全屏幕倒计时
绝对轻量级
轻是轻,却需要个巨大的 .net
【AU3】实现: #include #include #include #include #include
Opt(“GUIOnEventMode”, 1) Opt(“TrayMenuMode”, 1) Opt(“TrayOnEventMode”, 1) $formOption = GUICreate(“自定义时间”, 351, 91, -1, -1) GUISetOnEvent($GUI_EVENT_CLOSE, “formOptionClose”) GUISetOnEvent($GUI_EVENT_MINIMIZE, “formOptionClose”) $lblPrompt = GUICtrlCreateLabel(“提示信息”, 8, 8, 52, 17) $iptPrompt = GUICtrlCreateInput(“”, 8, 25, 273, 21) $lblTime = GUICtrlCreateLabel(“时间”, 288, 8, 28, 17) $iptTime = GUICtrlCreateInput(“1″, 288, 25, 33, 21, BitOR($ES_AUTOHSCROLL,$ES_NUMBER)) GUICtrlSetOnEvent(-1, “iptTimeChange”) $lblUnit = GUICtrlCreateLabel(“分”, 328, 27, 16, 17) $btnOk = GUICtrlCreateButton(“确定(&O)”, 264, 56, 75, 25, 0) GUICtrlSetOnEvent(-1, “btnOkClick”) TraySetClick(“9″) $mi3 = TrayCreateItem(“3 分钟提醒”) TrayItemSetOnEvent(-1, “mi3Click”) $mi5 = TrayCreateItem(“5 分钟提醒”) TrayItemSetOnEvent(-1, “mi5Click”) $mi10 = TrayCreateItem(“10 分钟提醒”) TrayItemSetOnEvent(-1, “mi10Click”) $mi15 = TrayCreateItem(“15 分钟提醒”) TrayItemSetOnEvent(-1, “mi15Click”) $mi20 = TrayCreateItem(“20 分钟提醒”) TrayItemSetOnEvent(-1, “mi20Click”) $mi30 = TrayCreateItem(“30 分钟提醒”) TrayItemSetOnEvent(-1, “mi30Click”) $miSprt1 = TrayCreateItem(“”) $miCustom = TrayCreateItem(“自定义时间”) TrayItemSetOnEvent(-1, “miCustomClick”) $miSprt2 = TrayCreateItem(“”) $miExit = TrayCreateItem(“退出”) TrayItemSetOnEvent(-1, “miExitClick”) GUISetState(@SW_HIDE)
While 1 Sleep(100) WEnd
Func btnOkClick() $PromptText = GUICtrlRead($iptPrompt) $Time = GUICtrlRead($iptTime) GUISetState(@SW_HIDE, $formOption) SetTimer($PromptText, $Time) EndFunc Func formOptionClose() GUISetState(@SW_HIDE, $formOption) EndFunc Func iptTimeChange() $PromptText = GUICtrlRead($iptPrompt) if $PromptText “” Then GUICtrlSetData($iptPrompt, “good”) EndIf EndFunc Func mi10Click() SetTimer(CreatePromptText(10), 10) EndFunc Func mi15Click() SetTimer(CreatePromptText(15), 15) EndFunc Func mi20Click() SetTimer(CreatePromptText(20), 20) EndFunc Func mi30Click() SetTimer(CreatePromptText(30), 30) EndFunc Func mi3Click() SetTimer(CreatePromptText(3), 3) EndFunc Func mi5Click() SetTimer(CreatePromptText(5), 5) EndFunc Func miCustomClick() GUISetState(@SW_SHOW, $formOption) EndFunc Func miExitClick() Exit EndFunc
Func SetTimer($PrptTxt, $Min) Sleep($Min * 60000) if $PrptTxt = “” Then $PrptTxt = “您设置的时间到!” EndIf TraySetToolTip($PrptTxt) MsgBox(48, “提示”, $PrptTxt) EndFunc Func CreatePromptText ($Min) Return “您设置的” & $Min & “分钟时间到!” EndFunc
O_o!!万恶的过滤插件…… 脚本内容可以在这里看:http://runningwaterpro.blog.163.com/blog/static/31194812008624112442578/
怎么运行不了呢 打开提示:正常初始化失败
我也用不起来,快点看看怎么回事啊?
两个版本都用老是出错 就删了 我是XP sp3,.net framework3 sp1 .net framework2 sp2
测试头像
所有timerQ的下载链接全失效了。
以前用过egg的,但就是要注册,唉~~ 这个没用过
正需要
都下载不了哇~肿么办?
称呼*
邮箱*
网址
有人回复时邮件通知我
12 Comments:
沙发
回复
大腿我是不会给任何人滴
回复
你成功了…
回复
终于成功了耶
下一个沙发我也要拿走(●?▽`●)ノ
回复
昨天在深度也看见个倒计时软件,只不过那个是为仪式什么的场合准备的,点运行–然后就会全屏幕倒计时
回复
绝对轻量级
回复
轻是轻,却需要个巨大的 .net
回复
【AU3】实现:
#include
#include
#include
#include
#include
Opt(“GUIOnEventMode”, 1)
Opt(“TrayMenuMode”, 1)
Opt(“TrayOnEventMode”, 1)
$formOption = GUICreate(“自定义时间”, 351, 91, -1, -1)
GUISetOnEvent($GUI_EVENT_CLOSE, “formOptionClose”)
GUISetOnEvent($GUI_EVENT_MINIMIZE, “formOptionClose”)
$lblPrompt = GUICtrlCreateLabel(“提示信息”, 8, 8, 52, 17)
$iptPrompt = GUICtrlCreateInput(“”, 8, 25, 273, 21)
$lblTime = GUICtrlCreateLabel(“时间”, 288, 8, 28, 17)
$iptTime = GUICtrlCreateInput(“1″, 288, 25, 33, 21, BitOR($ES_AUTOHSCROLL,$ES_NUMBER))
GUICtrlSetOnEvent(-1, “iptTimeChange”)
$lblUnit = GUICtrlCreateLabel(“分”, 328, 27, 16, 17)
$btnOk = GUICtrlCreateButton(“确定(&O)”, 264, 56, 75, 25, 0)
GUICtrlSetOnEvent(-1, “btnOkClick”)
TraySetClick(“9″)
$mi3 = TrayCreateItem(“3 分钟提醒”)
TrayItemSetOnEvent(-1, “mi3Click”)
$mi5 = TrayCreateItem(“5 分钟提醒”)
TrayItemSetOnEvent(-1, “mi5Click”)
$mi10 = TrayCreateItem(“10 分钟提醒”)
TrayItemSetOnEvent(-1, “mi10Click”)
$mi15 = TrayCreateItem(“15 分钟提醒”)
TrayItemSetOnEvent(-1, “mi15Click”)
$mi20 = TrayCreateItem(“20 分钟提醒”)
TrayItemSetOnEvent(-1, “mi20Click”)
$mi30 = TrayCreateItem(“30 分钟提醒”)
TrayItemSetOnEvent(-1, “mi30Click”)
$miSprt1 = TrayCreateItem(“”)
$miCustom = TrayCreateItem(“自定义时间”)
TrayItemSetOnEvent(-1, “miCustomClick”)
$miSprt2 = TrayCreateItem(“”)
$miExit = TrayCreateItem(“退出”)
TrayItemSetOnEvent(-1, “miExitClick”)
GUISetState(@SW_HIDE)
While 1
Sleep(100)
WEnd
Func btnOkClick()
$PromptText = GUICtrlRead($iptPrompt)
$Time = GUICtrlRead($iptTime)
GUISetState(@SW_HIDE, $formOption)
SetTimer($PromptText, $Time)
EndFunc
Func formOptionClose()
GUISetState(@SW_HIDE, $formOption)
EndFunc
Func iptTimeChange()
$PromptText = GUICtrlRead($iptPrompt)
if $PromptText “” Then
GUICtrlSetData($iptPrompt, “good”)
EndIf
EndFunc
Func mi10Click()
SetTimer(CreatePromptText(10), 10)
EndFunc
Func mi15Click()
SetTimer(CreatePromptText(15), 15)
EndFunc
Func mi20Click()
SetTimer(CreatePromptText(20), 20)
EndFunc
Func mi30Click()
SetTimer(CreatePromptText(30), 30)
EndFunc
Func mi3Click()
SetTimer(CreatePromptText(3), 3)
EndFunc
Func mi5Click()
SetTimer(CreatePromptText(5), 5)
EndFunc
Func miCustomClick()
GUISetState(@SW_SHOW, $formOption)
EndFunc
Func miExitClick()
Exit
EndFunc
Func SetTimer($PrptTxt, $Min)
Sleep($Min * 60000)
if $PrptTxt = “” Then
$PrptTxt = “您设置的时间到!”
EndIf
TraySetToolTip($PrptTxt)
MsgBox(48, “提示”, $PrptTxt)
EndFunc
Func CreatePromptText ($Min)
Return “您设置的” & $Min & “分钟时间到!”
EndFunc
回复
O_o!!万恶的过滤插件…… 脚本内容可以在这里看:http://runningwaterpro.blog.163.com/blog/static/31194812008624112442578/
回复
怎么运行不了呢
打开提示:正常初始化失败
回复
我也用不起来,快点看看怎么回事啊?
回复
两个版本都用老是出错
就删了
我是XP sp3,.net framework3 sp1
.net framework2 sp2
回复
测试头像
回复
所有timerQ的下载链接全失效了。
回复
以前用过egg的,但就是要注册,唉~~
这个没用过
回复
正需要
回复
都下载不了哇~肿么办?
回复