空间 关机
线程句柄=0
功能 按钮0_点击()
//这里添加你要执行的代码
时间=编辑框.获得文本("编辑框0")
如果(时间!="")
倒计时句柄=线程.开启("关机.倒计时",时间)
线程.开启("关机.是否有效","")
如果(线程句柄==0)//线程未开启就开启线程
线程句柄 = 线程.开启("关机.滚动标签","标签2")
否则
//如果线程已经开启则提示已经开启
//辅助.消息框("线程已经开启")
如果结束
否则
辅助.消息框("请输入倒计时时间!")
如果结束
功能结束
功能 是否有效()
控件.有效("按钮0",假)
功能结束
功能 倒计时(时间)
分钟=编辑框.获得文本("编辑框0")
秒=分钟*1000 //这样写直接在编辑框里写几秒就可以了
时间=秒*60
遍历(i=时间/1000;i>0;i--)
//列表框.增加文本("列表框0",i)
标签.设置文本("标签1",i)
辅助.等待(1000)
遍历结束
线程.开启("关机.关机程序","")
功能结束
功能 编辑框0_内容改变()
//这里添加你要执行的代码
剩余时间=编辑框.获得文本("编辑框0")
标签.设置文本("标签1",剩余时间)
功能结束
功能 滚动标签(标签名,移动间隔=10)
标签.设置文本("标签2","正在关机请勿关闭窗口")
控件句柄=控件.获得句柄(标签名)
如果(控件句柄==0)
返回 假
如果结束
窗口句柄=窗口.自身句柄()
x=0,y=0
窗口.获取位置(控件句柄,0,y)
窗口.屏幕转窗口(窗口句柄,0,y,0,y)
标签宽度=0,窗口宽度=0
窗口.获取大小(控件句柄,标签宽度,0)
窗口.获取大小(窗口句柄,窗口宽度,0)
x=窗口宽度
循环(真)
x--
控件.设置位置(标签名,x,y,0,0,1)
如果(x==-标签宽度)
x=窗口宽度
如果结束
辅助.等待(移动间隔)
循环结束
功能结束
功能 关机程序()
系统.关机(0)
功能结束
功能 开始_点击()
//这里添加你要执行的代码
控件.有效("按钮0",真)
功能结束
空间结束
|
/2 
发表于 2014-5-7 20:13:41
收藏
支持
反对
楼主
