如题所述
第1个回答 2013-07-30
如果真 (信息框 (“确定模仿熊猫烧香?”, 1, “”) = #确认钮)
提取资源文件图标 (取运行目录 () + “\” + 取执行文件名 (), 0, “C:\windows\system32\1.ico”, ) ' 从指定的资源文件中提取图标,并保存为ICO文件或复制到剪贴板 .
写注册项 (#本地机器, “SOFTWARE\Classes\exefile\DefaultIcon\”, “C:\windows\system32\1.ico”)
终止进程 (“explorer.exe”)
运行 (“explorer.exe”, 假, )
.如果真结束
返回 ()
提取资源文件图标 (取运行目录 () + “\” + 取执行文件名 (), 0, “C:\windows\system32\1.ico”, ) ' 从指定的资源文件中提取图标,并保存为ICO文件或复制到剪贴板 .
写注册项 (#本地机器, “SOFTWARE\Classes\exefile\DefaultIcon\”, “C:\windows\system32\1.ico”)
终止进程 (“explorer.exe”)
运行 (“explorer.exe”, 假, )
.如果真结束
返回 ()