
易语言高手进!
怎么在软件右上角添加个时钟?是读取本地时间的。。。然后可以设置本地时间到了几点几分几秒后自动点击按钮1这要怎么弄??设置几点几分几秒点击按钮的是24小时的就是说你可以有2...
怎么在软件右上角添加个时钟? 是读取本地时间的。。。然后可以设置本地时间到了几点几分几秒后自动点击按钮1 这要怎么弄??设置几点几分几秒点击按钮的是24小时的 就是说你可以有24个选项 格式比如说05:01:09 这就要5点1分9秒的时候自动点击按钮1然后这种时间格式可以设置24个每隔小时的1分9秒都让他按一下按钮1这样怎么弄?! 能用的加分!!
还是不懂。。。你弄一个源码吧。。发到我邮箱:576776159@qq.com 展开
还是不懂。。。你弄一个源码吧。。发到我邮箱:576776159@qq.com 展开
2个回答
展开全部
在窗口里建一个时钟组件和按钮组件,时钟周期设为:1000
下面是源码:
------------------------------------
.版本 2
.支持库 spec
.程序集 窗口程序集1
.子程序 _按钮1_被单击
' 这里添加你需要的命令
.子程序 _时钟1_周期事件
.局部变量 时间分, 整数型
.局部变量 时间秒, 整数型
时间分 = 取分钟 (取现行时间 ())
时间秒 = 取秒 (取现行时间 ())
.如果真 (时间分 = 1 且 时间秒 = 9)
调用子程序 (&_按钮1_被单击, , , )
.如果真结束
--------------------------------------
源码结束。
上面的源码设置的是1分9秒。如果你嫌死板,就在弄2个编辑框,一个设置分,一个设置秒。再把“如果真”代码改一下就行了。抛砖引玉,我想不用我再说了吧,字打的好辛苦,希望再奖励我点分(*^__^*) 嘻嘻……
下面是源码:
------------------------------------
.版本 2
.支持库 spec
.程序集 窗口程序集1
.子程序 _按钮1_被单击
' 这里添加你需要的命令
.子程序 _时钟1_周期事件
.局部变量 时间分, 整数型
.局部变量 时间秒, 整数型
时间分 = 取分钟 (取现行时间 ())
时间秒 = 取秒 (取现行时间 ())
.如果真 (时间分 = 1 且 时间秒 = 9)
调用子程序 (&_按钮1_被单击, , , )
.如果真结束
--------------------------------------
源码结束。
上面的源码设置的是1分9秒。如果你嫌死板,就在弄2个编辑框,一个设置分,一个设置秒。再把“如果真”代码改一下就行了。抛砖引玉,我想不用我再说了吧,字打的好辛苦,希望再奖励我点分(*^__^*) 嘻嘻……
展开全部
按ctrl+~键就能呼出你要注册热键
自动缩回复制以下代码在启动窗口时写入子程序侧边隐藏
.版本 2
.子程序 侧边隐藏, , 公开
.参数 侧边窗口, 窗口
.参数 收边速度, 整数型
.局部变量 鼠标垂直位置, 整数型
.局部变量 鼠标水平位置, 整数型
.局部变量 屏幕宽度, 整数型
.局部变量 屏幕高度, 整数型
.局部变量 收边, 整数型
.局部变量 高位, 整数型
屏幕宽度 = 取屏幕宽度 ()
屏幕高度 = 取屏幕高度 ()
鼠标垂直位置 = 取鼠标垂直位置 ()
鼠标水平位置 = 取鼠标水平位置 ()
收边 = 侧边窗口.宽度 ÷ 收边速度
高位 = 侧边窗口.高度 ÷ 收边速度
.如果 (鼠标垂直位置 > 侧边窗口.顶边 且 鼠标垂直位置 < 侧边窗口.顶边 + 侧边窗口.高度 且 鼠标水平位置 > 侧边窗口.左边 且 鼠标水平位置 < 侧边窗口.左边 + 侧边窗口.宽度)
.如果真 (侧边窗口.左边 + 侧边窗口.宽度 > 屏幕宽度)
.如果 (侧边窗口.左边 + 侧边窗口.宽度 - 屏幕宽度 > 收边 + 5)
侧边窗口.移动 (侧边窗口.左边 - 收边, , , )
.否则
侧边窗口.移动 (屏幕宽度 - 侧边窗口.宽度 + 2, , , )
.如果结束
.如果真结束
.否则
.如果真 (侧边窗口.左边 + 侧边窗口.宽度 > 屏幕宽度 - 10)
.如果 (屏幕宽度 - 侧边窗口.左边 > 收边 + 5)
侧边窗口.移动 (侧边窗口.左边 + 收边, , , )
.否则
侧边窗口.移动 (屏幕宽度 - 5, , , )
.如果结束
.如果真结束
.如果结束
.如果 (鼠标垂直位置 > 侧边窗口.顶边 且 鼠标垂直位置 < 侧边窗口.顶边 + 侧边窗口.高度 且 鼠标水平位置 > 侧边窗口.左边 且 鼠标水平位置 < 侧边窗口.左边 + 侧边窗口.宽度)
.如果真 (侧边窗口.顶边 < 5)
.如果 (侧边窗口.顶边 < 0 - 高位 - 5)
侧边窗口.移动 (, 侧边窗口.顶边 + 高位, , )
.否则
侧边窗口.移动 (, -1, , )
.如果结束
.如果真结束
.否则
.如果真 (侧边窗口.顶边 < 10)
.如果 (侧边窗口.顶边 + 侧边窗口.高度 > 高位 + 5)
侧边窗口.移动 (, 侧边窗口.顶边 - 高位, , )
.否则
侧边窗口.移动 (, 0 - 侧边窗口.高度 + 5, , )
.如果结束
.如果真结束
自动缩回复制以下代码在启动窗口时写入子程序侧边隐藏
.版本 2
.子程序 侧边隐藏, , 公开
.参数 侧边窗口, 窗口
.参数 收边速度, 整数型
.局部变量 鼠标垂直位置, 整数型
.局部变量 鼠标水平位置, 整数型
.局部变量 屏幕宽度, 整数型
.局部变量 屏幕高度, 整数型
.局部变量 收边, 整数型
.局部变量 高位, 整数型
屏幕宽度 = 取屏幕宽度 ()
屏幕高度 = 取屏幕高度 ()
鼠标垂直位置 = 取鼠标垂直位置 ()
鼠标水平位置 = 取鼠标水平位置 ()
收边 = 侧边窗口.宽度 ÷ 收边速度
高位 = 侧边窗口.高度 ÷ 收边速度
.如果 (鼠标垂直位置 > 侧边窗口.顶边 且 鼠标垂直位置 < 侧边窗口.顶边 + 侧边窗口.高度 且 鼠标水平位置 > 侧边窗口.左边 且 鼠标水平位置 < 侧边窗口.左边 + 侧边窗口.宽度)
.如果真 (侧边窗口.左边 + 侧边窗口.宽度 > 屏幕宽度)
.如果 (侧边窗口.左边 + 侧边窗口.宽度 - 屏幕宽度 > 收边 + 5)
侧边窗口.移动 (侧边窗口.左边 - 收边, , , )
.否则
侧边窗口.移动 (屏幕宽度 - 侧边窗口.宽度 + 2, , , )
.如果结束
.如果真结束
.否则
.如果真 (侧边窗口.左边 + 侧边窗口.宽度 > 屏幕宽度 - 10)
.如果 (屏幕宽度 - 侧边窗口.左边 > 收边 + 5)
侧边窗口.移动 (侧边窗口.左边 + 收边, , , )
.否则
侧边窗口.移动 (屏幕宽度 - 5, , , )
.如果结束
.如果真结束
.如果结束
.如果 (鼠标垂直位置 > 侧边窗口.顶边 且 鼠标垂直位置 < 侧边窗口.顶边 + 侧边窗口.高度 且 鼠标水平位置 > 侧边窗口.左边 且 鼠标水平位置 < 侧边窗口.左边 + 侧边窗口.宽度)
.如果真 (侧边窗口.顶边 < 5)
.如果 (侧边窗口.顶边 < 0 - 高位 - 5)
侧边窗口.移动 (, 侧边窗口.顶边 + 高位, , )
.否则
侧边窗口.移动 (, -1, , )
.如果结束
.如果真结束
.否则
.如果真 (侧边窗口.顶边 < 10)
.如果 (侧边窗口.顶边 + 侧边窗口.高度 > 高位 + 5)
侧边窗口.移动 (, 侧边窗口.顶边 - 高位, , )
.否则
侧边窗口.移动 (, 0 - 侧边窗口.高度 + 5, , )
.如果结束
.如果真结束
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询