易语言制作定时自动关机软件源码下载

admin

请点击此处下载

查看状态：需购买或无权限

您的用户组是：游客

提取密码:5ifx88 
下载次数:1  文件大小:0 Bytes 
下载权限: 不限 以上或 VIP会员   [加入VIP]   [获取金币]  [免费赚金币]

部分代码如下

  

窗口程序集名	保 留	保 留	备 注
窗口程序集1

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
时	文本型
分	文本型

' 禁止重复运行 (“定时关机软件”)
置托盘图标 ( #ico, “定时关机软件”)
设置自动运行 (“定时关机软件”, 取运行目录 () ＋ “\定时关机软件.exe”, )
时钟1.时钟周期 ＝ 100
时 ＝ 读配置项 (取运行目录 () ＋ “\Config.ini”, “定时配置”, “时”, )
分 ＝ 读配置项 (取运行目录 () ＋ “\Config.ini”, “定时配置”, “分”, )
如果真 (文件是否存在 (取运行目录 () ＋ “\Config.ini”) ＝ 真)
标签9.标题 ＝ 时 ＋ “时” ＋ 分 ＋ “分”

子程序名	返回值类型	公开	备 注
_时钟1_周期事件

标签1.标题 ＝ 到文本 (取时间部分 (取现行时间 (), #小时 )) ＋ “时” ＋ 到文本 (取时间部分 (取现行时间 (), #分钟 )) ＋ “分”
标签6.标题 ＝ 到文本 (取现行时间 ())
如果 (标签9.标题 ＝ 标签1.标题)
时钟1.时钟周期 ＝ 0
关闭系统 ( #关机, 真)

子程序名	返回值类型	公开	备 注
_选择框1_被单击

如果真 (选择框1.选中 ＝ 真)
标签9.标题 ＝ “”
删除文件 (取运行目录 () ＋ “\Config.ini”)
选择框1.选中 ＝ 假

子程序名	返回值类型	公开	备 注
__启动窗口_可否被关闭	逻辑型

如果 (_启动窗口.位置 ＝ 2)  ' 如果窗口已经是最小化的，便允许关闭，反之，则最小化，这样则可解决程序不可关闭但关机时能正常关闭
返回 (真)
_启动窗口.可视 ＝ 假
返回 (假)

子程序名	返回值类型	公开	备 注
__启动窗口_托盘事件
参数名	类 型	参考	可空	数组	备 注
操作类型	整数型

判断 (操作类型 ＝ 3)  ' 右键单击
弹出托盘菜单 (管理)  ' 弹出托盘菜单
判断 (操作类型 ＝ 1)  ' 左键单击
_启动窗口.可视 ＝ 真
_启动窗口.获取焦点 ()

子程序名	返回值类型	公开	备 注
_退出_被选择

结束 ()

子程序名	返回值类型	公开	备 注
_关于_被选择

打开指定网址 (“www.cnsjh.com”)

子程序名	返回值类型	公开	备 注
_超级按钮1_被单击

如果 (编辑框2.内容 ≠ “”)

如果 (编辑框3.内容 ≠ “”)

信息框 (“没有设置关机时间！”, #错误图标 ＋ 0, “世纪虹网络”)
返回 ()

标签9.标题 ＝ 编辑框2.内容 ＋ 标签2.标题 ＋ 编辑框3.内容 ＋ 标签3.标题
写配置项 (取运行目录 () ＋ “\Config.ini”, “定时配置”, “时”, 编辑框2.内容)
写配置项 (取运行目录 () ＋ “\Config.ini”, “定时配置”, “分”, 编辑框3.内容)

i支持库列表	支持库注释
eAPI	应用接口支持库
shell	操作系统界面功能支持库

.版本 2<br /> .支持库 eAPI<br /> .支持库 shell<br /> <br /> .程序集 窗口程序集1<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 时, 文本型<br /> .局部变量 分, 文本型<br /> <br /> ' 禁止重复运行 (“定时关机软件”)<br /> 置托盘图标 (#ico, “定时关机软件”)<br /> 设置自动运行 (“定时关机软件”, 取运行目录 () ＋ “\定时关机软件.exe”, )<br /> 时钟1.时钟周期 ＝ 100<br /> 时 ＝ 读配置项 (取运行目录 () ＋ “\Config.ini”, “定时配置”, “时”, )<br /> 分 ＝ 读配置项 (取运行目录 () ＋ “\Config.ini”, “定时配置”, “分”, )<br /> .如果真 (文件是否存在 (取运行目录 () ＋ “\Config.ini”) ＝ 真)<br />     标签9.标题 ＝ 时 ＋ “时” ＋ 分 ＋ “分”<br /> .如果真结束<br /> <br /> <br /> .子程序 _时钟1_周期事件<br /> <br /> 标签1.标题 ＝ 到文本 (取时间部分 (取现行时间 (), #小时)) ＋ “时” ＋ 到文本 (取时间部分 (取现行时间 (), #分钟)) ＋ “分”<br /> 标签6.标题 ＝ 到文本 (取现行时间 ())<br /> .如果 (标签9.标题 ＝ 标签1.标题)<br />     时钟1.时钟周期 ＝ 0<br />     关闭系统 (#关机, 真)<br /> .否则<br /> <br /> .如果结束<br /> <br /> <br /> .子程序 _选择框1_被单击<br /> <br /> .如果真 (选择框1.选中 ＝ 真)<br />     标签9.标题 ＝ “”<br />     删除文件 (取运行目录 () ＋ “\Config.ini”)<br />     选择框1.选中 ＝ 假<br /> .如果真结束<br /> <br /> <br /> .子程序 __启动窗口_可否被关闭, 逻辑型<br /> <br /> .如果 (_启动窗口.位置 ＝ 2)  ' 如果窗口已经是最小化的，便允许关闭，反之，则最小化，这样则可解决程序不可关闭但关机时能正常关闭<br />     返回 (真)<br /> .否则<br />     _启动窗口.可视 ＝ 假<br />     返回 (假)<br /> .如果结束<br /> <br /> <br /> .子程序 __启动窗口_托盘事件<br /> .参数 操作类型, 整数型<br /> <br /> .判断开始 (操作类型 ＝ 3)  ' 右键单击<br />     弹出托盘菜单 (管理)  ' 弹出托盘菜单<br /> .判断 (操作类型 ＝ 1)  ' 左键单击<br />     _启动窗口.可视 ＝ 真<br />     _启动窗口.获取焦点 ()<br /> .默认<br /> <br /> .判断结束<br /> <br /> <br /> .子程序 _退出_被选择<br /> <br /> 结束 ()<br /> <br /> .子程序 _关于_被选择<br /> <br /> 打开指定网址 (“<a href="http://www.cnsjh.com" target="_blank">www.cnsjh.com</a>”)<br /> <br /> .子程序 _超级按钮1_被单击<br /> <br /> .如果 (编辑框2.内容 ≠ “”)<br /> <br /> .否则<br />     .如果 (编辑框3.内容 ≠ “”)<br /> <br />     .否则<br />         信息框 (“没有设置关机时间！”, #错误图标 ＋ 0, “世纪虹网络”)<br />         返回 ()<br />     .如果结束<br /> <br /> .如果结束<br /> 标签9.标题 ＝ 编辑框2.内容 ＋ 标签2.标题 ＋ 编辑框3.内容 ＋ 标签3.标题<br /> 写配置项 (取运行目录 () ＋ “\Config.ini”, “定时配置”, “时”, 编辑框2.内容)<br /> 写配置项 (取运行目录 () ＋ “\Config.ini”, “定时配置”, “分”, 编辑框3.内容)