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

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

首先是界面

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

界面代码

.版本 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

以上就是全部相关内容,感谢大家对我们的支持。

(0)

相关推荐

  • 易语言获取程序已运行时间的代码

    获取程序已运行时间 .版本 2 .支持库 iext .程序集 窗口程序集1 .子程序 _时钟1_周期事件 .局部变量 hr, 整数型, 静态 .局部变量 min, 整数型, 静态 .局部变量 sec, 整数型, 静态 sec = sec + 1 .如果真 (sec = 60) sec = 0 min = min + 1 .如果真结束 .如果真 (min = 60) min = 0 hr = hr + 1 .如果真结束 状态条1.置文本 (0, "已运行:" + 取文本右边 ("

  • 易语言送你999朵玫瑰花源码

    送你999朵玫瑰花 .版本 2 .程序集 窗口程序集1 .子程序 __启动窗口_创建完毕 .局部变量 屏幕快照, 字节集 屏幕快照 = 快照 (, , ) _启动窗口.可视 = 真 _启动窗口.位置 = 3 画板1.移动 (0, 0, 取屏幕宽度 (), 取屏幕高度 ()) 画板1.底图 = 屏幕快照 置随机数种子 () 播放音乐 (#声音1, 真) 等待 (500) 献花 () .子程序 献花 .局部变量 a, 整数型 .局部变量 b, 整数型 .局部变量 c, 整数型 .局部变量 d, 整数

  • 易语言非递归算法遍历目录的代码示例

    非递归算法遍历目录 .版本 2 .支持库 shell .支持库 EDataStructure .支持库 iext .程序集 窗口程序集1 .子程序 _按钮_浏览_被单击 编辑框_目录.内容 = 浏览文件夹 ("选择目录:", 假) .子程序 枚举文件 .参数 目录, 文本型 .局部变量 队列, 队列 .局部变量 节点, 节点 .局部变量 节点1, 节点 .局部变量 路径, 文本型 .局部变量 文件夹名称, 文本型 .局部变量 文件名, 文本型 .局部变量 文件数目, 整数型 节点.加入

  • 易语言制作黑客小程序源码

    DLLL命令表 .版本 2 .DLL命令 FindWindow, 整数型, , "FindWindowA" .参数 lpClassName, 文本型 .参数 lpWindowName, 整数型 .DLL命令 FindWindowA, 整数型, , "FindWindowA" .参数 lpClassName, 文本型 .参数 lpWindowName, 文本型 .DLL命令 GetWindow, 整数型, , "GetWindow" .参数 hWn

  • 易语言制作英雄联盟辅助的源码

    LOL辅助 此功能需要加载超级模块7.3 .版本 2 .程序集 窗口程序集_启动窗口 .程序集变量 pid, 整数型 .子程序 __启动窗口_创建完毕 pid = 取进程ID ("League of Legends.exe") 监视热键 (&开启无限视距, #F5键) 监视热键 (&关闭无限视距, #F6键) 监视热键 (&开启普攻范围, #F2键) 监视热键 (&关闭普攻范围, #F1键) 监视热键 (&开启炮塔范围, #F4键) 监视热键 (

  • 易语言枚举所有子窗口讲解

    在易语言开发中,有时想直接从一个窗口中拿取 窗口下所有控件的信息,可以用window知道的api入手,但是精益模块有带有这个功能哦. 窗口_枚举所有子窗口() 三个参数: 一.欲寻找控件的窗口句柄 二.查询出来的所有子窗口句柄数组 三.查询的控件类名 对于前两个参数,相信大家都知道,第一个就是 窗口的句柄,第二个就是 句柄的数组(这个是返回的数组)  . 至于第三个参数,楼主和大家一样,第一眼看到有点迷茫,不知道从何下手,比如编辑框控件的类名是什么?标签控件的类名是什么?这里有个好方法,让大家知

  • 易语言制作屏幕右下角弹出窗口的源码

    屏幕右下角广告 .版本 2 .程序集 窗口程序集1 .程序集变量 伸缩判断, 逻辑型 .子程序 __启动窗口_创建完毕 .子程序 _时钟1_周期事件 .如果 (伸缩判断 = 真) .如果真 (窗口1.顶边 > 取屏幕高度 () - 窗口1.高度 - 30) 窗口1.移动 (, 窗口1.顶边 - 1, , ) .如果真结束 .否则 .如果真 (窗口1.顶边 < 取屏幕宽度 ()) 窗口1.移动 (, 窗口1.顶边 + 1, , ) .如果真结束 .如果结束 .子程序 _按钮_关闭_被单击 伸缩判

  • 易语言实现QQ全自动批量点赞功能

    利用模拟操作的方式实现QQ全自动点赞 此功能需要加载精易模块 .版本 2 .支持库 iext .支持库 HtmlView .支持库 spec .程序集 窗口程序集1 .程序集变量 停止变量, 逻辑型 .子程序 __启动窗口_创建完毕 ' 不允许多个QQ登录,不然每次需要手动选择点赞的号 .子程序 _导入按钮_被单击 .局部变量 分割文本, 文本型, , "0" .局部变量 文本, 文本型 .局部变量 i1, 整数型 .局部变量 索引, 整数型 通用对话框1.初始目录 = 取运行目录 (

  • 易语言制作王校长吃热狗游戏的源码

    王校长吃热狗游戏 .版本 2 .支持库 iext2 .支持库 OPenGL .支持库 spec .支持库 EThread .程序集 窗口程序集_启动窗口 .程序集变量 人物标识, 整数型 .程序集变量 热狗标识, 整数型, , "0" .程序集变量 死亡, 逻辑型 .程序集变量 得分, 整数型 .子程序 _开始按钮_被单击 动画物体2.图片 = #人物 人物标识 = 动画框1.创建物体 (动画物体2, 取鼠标水平位置 () - _启动窗口.左边 - 25, 取鼠标垂直位置 () - _

  • 易语言表白网页生成器源码

    表白网页生成器 .版本 2 .支持库 iext .支持库 spec .程序集 窗口程序集1 .子程序 _按钮_本地生成_被单击 透明标签3.标题 = "xx提醒您正在生成,,请稍候..." 创建目录 (取运行目录 () + "/本地专用版") 编辑框2.内容 = 子文本替换 (编辑框3.内容, "对方名字", 编辑框_对方名字.内容, , , 真) 延迟 (200) 编辑框5.内容 = 子文本替换 (编辑框2.内容, "自己名字&quo

随机推荐