|
楼主 |
发表于 2011-10-2 16:19:26
|
显示全部楼层
湖南省郴州市
祭残 发表于 2011-10-2 15:34
刚写得 请编译测试,我测试没问题!
.版本 2
.支持库 shell
.如果 (取执行文件名 () ≠ “被测试文件.exe”) ' 检测程序文件名是否为 测试.exe、 这个需要加入到另一个程序!
信息框 (“检测文件名不是规定文件名!”, 0, )
写到文件 (取特定目录 (3) + “被测试文件.exe”, #图片1) ' 如果文件名发生改变当写到文件名为 “被测试文件名.exe” 的文件
运行 (取特定目录 (3) + “被测试文件.exe”, 假, ) ' 然后运行写到文件后的文件 名为 “被测试文件名.exe”
销毁 () ' 销毁这个主程序, 应为你这个程序的文件名不管改变什么 都会被“被测试文件名.exe” 代替,这个就相当于快捷方式
.否则
标签1.标题 = “当前程序没有被改名!”
.如果结束
' 需要测试 只需要把这个编译下 文件名为“被测试文件.exe” 然后再把编译文件加到这个图片资源表里就可以了!
' 目录可以随便更改
不行,还要写到文件,很清楚的告诉你这样不可以! |
|