新网创想网站建设,新征程启航

为企业提供网站建设、域名注册、服务器等服务

易语言去广告软件制作讲解

该程序使用到了最新的精易模块V3.68,跟程序平行的有个closeProcess.txt用来配置需要关闭的广告后台进程。支持腾讯视频客户端、PPS客户端、PPTV客户端等一些主流的视频客户端的广告屏蔽,再也不用担心观看视频有60秒的广告了。

目前创新互联建站已为上1000+的企业提供了网站建设、域名、虚拟主机、网站托管、服务器托管、企业网站设计、柳北网站维护等服务,公司将坚持客户导向、应用为本的策略,正道将秉承"和谐、参与、激情"的文化,与客户和合作伙伴齐心协力一起成长,共同发展。

首先是界面

易语言去广告软件制作讲解

给程序添加一个时钟,两个按钮,时钟用来控制循环监听任务管理器的进程,主要思想:遇到广告后台程序,强制关掉。

界面代码

.版本 2

.程序集 窗口程序集1

.子程序 __启动窗口_创建完毕
.局部变量 目录, 文本型
.局部变量 文件ID, 整数型
.局部变量 内容, 文本型


目录 = 取运行目录 ()
.如果真 (文件是否存在 (目录 + “/closeProcess.txt”) = 假)
  信息框 (“找不到closeProcess.txt文件!”, 0, )
.如果真结束
文件ID = 打开文件 (目录 + “/closeProcess.txt”, , )
内容 = 读入一行 (文件ID)
.判断循环首 (内容 ≠ “”)
  加入成员 (进程数组, 内容)
  内容 = 读入一行 (文件ID)
.判断循环尾 ()
' 信息框 (取数组成员数 (进程数组), 0, )
关闭文件 (文件ID)
关闭进程 ()
' 时钟1.时钟周期 = 5000
_按钮1_被单击 ()

.子程序 关闭进程
.局部变量 i, 整数型
.局部变量 进程ID, 整数型

.变量循环首 (1, 取数组成员数 (进程数组), 1, i)
  进程ID = 进程_名取ID (进程数组 [i])
  .如果真 (进程ID ≠ 0)
    进程_结束 (进程ID)
  .如果真结束

.变量循环尾 ()

.子程序 _按钮1_被单击

时钟1.时钟周期 = 5000
标签1.标题 = “程序监听中...”

.子程序 _时钟1_周期事件

关闭进程 ()

.子程序 _按钮2_被单击

时钟1.时钟周期 = 0
标签1.标题 = “程序监听取消了...”

.子程序 __启动窗口_托盘事件
.参数 操作类型, 整数型

.如果真 (操作类型 = 2) ' 操作类型2双击托盘图标
  可视 = 真
  位置 = 1
  置托盘图标 ({ }, “”)
.如果真结束


.子程序 __启动窗口_位置被改变

.如果真 (位置 = 2) ' 位置2窗口最小化
  置托盘图标 (#图片1, “noAd”)
  可视 = 假
.如果真结束

全局变量

.版本 2

.全局变量 进程数组, 文本型, , "0"

图标文件

添加一个图标文件以便于最小化到托盘

.版本 2

.图片 图片1

以上就是全部相关内容,感谢大家对创新互联的支持。


分享题目:易语言去广告软件制作讲解
网站路径:http://wjwzjz.com/article/jioihd.html
在线咨询
服务热线
服务热线:028-86922220
TOP