2个回答
展开全部
不多说,上代码
.版本 2
.支持库 xplib
.支持库 shell
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
XP风格 (2)
.子程序 _按钮游戏目录_被单击
编辑框1.内容 = 浏览文件夹 (“请选择游戏所在的文件夹”, )
.如果 (编辑框1.内容 = “”)
返回 ()
.否则
.如果结束
.如果 (取文本长度 (编辑框1.内容) ≠ 倒找文本 (编辑框1.内容, “\”, , 假)) ' 一般打开的路径后面没有“\”,要添加“\”
编辑框1.内容 = 编辑框1.内容 + “\”
.否则
.如果结束
.子程序 _按钮删除_被单击
.如果 (寻找文件 (编辑框1.内容 + “addons”, #子目录) ≠ “”) ' 查找addons文件夹是否存在
.如果 (删除目录 (编辑框1.内容 + “addons”) = 真) ' 删除addons,并返回结果
信息框 (“删除成功!”, 0, “提示”)
.否则
信息框 (“删除失败!”, 0, “提示”)
.如果结束
.否则
信息框 (“请确认是否选择了游戏目录!”, 0, “提示!”) ' 所选目录无addons文件夹,返回提示
绝对原创!
.版本 2
.支持库 xplib
.支持库 shell
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
XP风格 (2)
.子程序 _按钮游戏目录_被单击
编辑框1.内容 = 浏览文件夹 (“请选择游戏所在的文件夹”, )
.如果 (编辑框1.内容 = “”)
返回 ()
.否则
.如果结束
.如果 (取文本长度 (编辑框1.内容) ≠ 倒找文本 (编辑框1.内容, “\”, , 假)) ' 一般打开的路径后面没有“\”,要添加“\”
编辑框1.内容 = 编辑框1.内容 + “\”
.否则
.如果结束
.子程序 _按钮删除_被单击
.如果 (寻找文件 (编辑框1.内容 + “addons”, #子目录) ≠ “”) ' 查找addons文件夹是否存在
.如果 (删除目录 (编辑框1.内容 + “addons”) = 真) ' 删除addons,并返回结果
信息框 (“删除成功!”, 0, “提示”)
.否则
信息框 (“删除失败!”, 0, “提示”)
.如果结束
.否则
信息框 (“请确认是否选择了游戏目录!”, 0, “提示!”) ' 所选目录无addons文件夹,返回提示
绝对原创!
展开全部
.版本 2
删除目录 ()
调用格式: 〈逻辑型〉 删除目录 (文本型 欲删除的目录名称) - 系统核心支持库->磁盘操作
英文名称:RmDir
删除一个存在的目录及其中的所有子目录和下属文件,请务必谨慎使用本命令。成功返回真,失败返回假。本命令为初级命令。
参数<1>的名称为“欲删除的目录名称”,类型为“文本型(text)”。该目录应实际存在,如果目录中存在文件或子目录,将被一并删除,因此使用本命令请千万慎重。
操作系统需求: Windows、Linux
删除目录 ()
调用格式: 〈逻辑型〉 删除目录 (文本型 欲删除的目录名称) - 系统核心支持库->磁盘操作
英文名称:RmDir
删除一个存在的目录及其中的所有子目录和下属文件,请务必谨慎使用本命令。成功返回真,失败返回假。本命令为初级命令。
参数<1>的名称为“欲删除的目录名称”,类型为“文本型(text)”。该目录应实际存在,如果目录中存在文件或子目录,将被一并删除,因此使用本命令请千万慎重。
操作系统需求: Windows、Linux
更多追问追答
追问
能举个例子吗?或者加QQ 24095681 教教我,
追答
把你要删的 目录写进去 就可以了啊
还有一个 命令 是 删除文件 也是一样 把 你要删的 文件 写进去 就可以了
删除目录 (“E:\地下城与勇士”)
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询