网站首页 > 易语言相关 > 系统工具源码 正文
系统文件夹伪装精灵源码
.版本 2 .支持库 iext .支持库 iext5 .程序集 窗口程序集_启动窗口 .程序集变量 FilePath, 文本型 .程序集变量 ToPath, 文本型 .子程序 __启动窗口_创建完毕 状态条1.置文本 (0, 目录框_路径.目录) 组合框_伪装样式.现行选中项 = 0 信息提示 () .子程序 _目录框_路径_目录被改变 状态条1.置文本 (0, 目录框_路径.目录) FilePath = 目录框_路径.目录 .子程序 _驱动器框_选择分区_驱动器被改变 目录框_路径.目录 = 驱动器框_选择分区.驱动器 + “:\” .子程序 _按钮_伪装_被单击 .如果 (组合框_伪装样式.现行选中项 < 0) 信息框 (“对文件夹的伪装保护出错!请重试”, #错误图标, “文件夹保护出错”) .否则 .判断开始 (组合框_伪装样式.现行选中项 = 0) ToPath = FilePath + #控制面板 .判断 (组合框_伪装样式.现行选中项 = 1) ToPath = FilePath + #打印机 .判断 (组合框_伪装样式.现行选中项 = 2) ToPath = FilePath + #回收站 .判断 (组合框_伪装样式.现行选中项 = 3) ToPath = FilePath + #网页 .判断 (组合框_伪装样式.现行选中项 = 4) ToPath = FilePath + #IE .判断 (组合框_伪装样式.现行选中项 = 5) ToPath = FilePath + #网上邻居 .判断 (组合框_伪装样式.现行选中项 = 6) ToPath = FilePath + #拨号网络 .判断 (组合框_伪装样式.现行选中项 = 7) ToPath = FilePath + #计划任务 .判断 (组合框_伪装样式.现行选中项 = 8) ToPath = FilePath + #临时文件 .默认 .判断结束 写到文件 (“c:\wzwj.bat”, 到字节集 (“move/y ” + FilePath + “ ” + ToPath + #换行符 + “del %0”)) 运行 (“c:\wzwj.bat”, 假, #隐藏窗口) 信息框 (“恭喜你!文件夹伪装保护成功”, 64, “保护成功”, ) .如果结束 .子程序 _按钮_解除_被单击 .如果真 (取文本右边 (FilePath, 39) = #控制面板 或 取文本右边 (FilePath, 39) = #打印机 或 取文本右边 (FilePath, 39) = #回收站 或 取文本右边 (FilePath, 39) = #网页 或 取文本右边 (FilePath, 39) = #IE 或 取文本右边 (FilePath, 39) = #网上邻居 或 取文本右边 (FilePath, 39) = #拨号网络 或 取文本右边 (FilePath, 39) = #计划任务 或 取文本右边 (FilePath, 39) = #临时文件) ToPath = 取文本左边 (FilePath, 取文本长度 (FilePath) - 39) 写到文件 (“c:\jcwz.bat”, 到字节集 (“move/y ” + FilePath + “ ” + ToPath + #换行符 + “del %0”)) 运行 (“c:\jcwz.bat”, 假, #隐藏窗口) 信息框 (“恭喜你!文件夹解除保护成功”, 64, “解除保护成功”) 返回 () .如果真结束 信息框 (“文件夹解除保护出错!请重试”, #错误图标, “解除保护出错”) .子程序 _按钮_退出_被单击 播放音乐 (#关闭, ) 关闭程序 () .子程序 __启动窗口_可否被关闭, 逻辑型 播放音乐 (#关闭, ) 关闭程序 () .子程序 _按钮_关于_被单击 载入 (窗口_关于, , 真) .子程序 信息提示 信息提示框.关联组件 (组合框_伪装样式, “选择你想要伪装的系统文件样式”, -1, , , , ) 信息提示框.关联组件 (按钮_伪装, “开始对文件夹进行伪装保护”, -1, , , , ) 信息提示框.关联组件 (按钮_解除, “解除对文件夹的伪装保护”, -1, , , , ) 信息提示框.关联组件 (按钮_关于, “关于作者”, -1, , , , ) 信息提示框.关联组件 (按钮_退出, “退出”, -1, , , , ) 信息提示框.关联组件 (目录框_路径, “选择你要进行伪装的文件夹的路径”, -1, , , , ) 信息提示框.关联组件 (驱动器框_选择分区, “选择当前操作的磁盘”, -1, , , , )
@易语言入门教程
猜你喜欢
- 2021-11-09 快启动源码(类似音速启动)
- 2021-11-07 Edis86-易语言独立开发的反汇编引擎纯源码
- 2021-11-06 Windows仿资源管理器
- 2021-10-29 WINDOWS/LINUX/SFTP远程连接管理工具V3.0加强开源
- 2019-07-25 修改易语言模块图标源码
- 2019-06-21 基于SunDay匹配算法改良的寻找字节集易语言源码
- 2019-04-21 易语言获取本机信息源码
- 2019-03-31 电脑缓存清理助手易语言源码
- 2019-03-30 Windows系统管理工具源码
- 2019-01-15 内存特征码搜索定位(采用KMP算法)
你 发表评论:
欢迎- 百度站内搜索
- 关注微信公众号
- 网站分类
-
- 网站公告
- 电子书书籍
- 程序员工具箱
- 编程工具
- 易语言相关
- 网络相关源码
- 图形图像源码
- 系统工具源码
- 易语言模块源码
- 易语言支持库
- 数据库类源码
- 易语言例程
- 易语言游戏开发
- 易语言模块
- 多媒体类源码
- 易语言资源网
- 易语言视频教程
- JS分析教程
- 易语言图文教程
- 易语言常见问题及笔记
- 工具源码
- 易语言版本
- 网络编程
- javascript
- PHP编程
- html
- 正则表达式
- 面试题
- nodejs
- 其它综合
- 脚本专栏
- python
- 按键精灵相关
- 按键精灵图文教程
- 按键精灵视频教程
- 按键精灵Q语言
- 按键精灵安卓版
- golang
- 游戏安全
- 火山相关
- 火山安卓软件
- 火山常见问题及笔记
- 火山安卓源码
- 火山视频教程
- 火山PC版本下载
- 火山PC视窗例程
- 互联网那些事
- 引流推广
- 项目揭秘
- 网络营销
- 营销软件
- QQ营销软件
- 娱乐软件
- 机器人插件
- 培训教程
- 技术教程
- 活动线报
- 数据库
- Redis
- Access
- MongoDB
- Mysql
- 问答
- 其它
- 易语言
- 需求
- 在线教程
- 多线程培训班
- 觅风易语言教程
- 模拟系列教程
- 集中营易语言教程
- 历史数据
- 随机tag
本文暂时没有评论,来添加一个吧(●'◡'●)