易语言怎么把软件写到c盘,易语言点击按钮1之后就在C盘下创建一个叫“123”的文件夹,求各位告诉怎么写指令? Ps:假如已...

先回答你的有同名文件夹的问题吧,如果有一个同名文件夹,那么系统会在命名后返回一个 假 创建成功返回 真

你可以在创建前先用:文件是否存在()检测是否有该目录!

下面是你一开始说的代码:

.版本 2

.子程序 _按钮1_被单击

.如果真 (文件是否存在 (“C:\123”) = 真) ' 如果目录存在

.如果 (信息框 (“目录已经存在,删除后重新创建?”, 1 + 32, “温馨提示:”, _启动窗口) = #确认钮)

' 弹出一个信息框,1+32的意思是:1是确认取消按钮,32是问号图标,你可以删除试试效果,如果是5.2以下的易语言版本是没有最后一个参数的,如果报错请删除最后面的", _启动窗口" 具体自己多研究研究! 最后的=#确认钮是当用户按下确认钮后

删除目录 (“C:\123”)

.否则

信息框 (“你取消了操作”, 64, “温馨提示:”, _启动窗口)

返回 () ' 返回后不会执行下面的命令

.如果结束

.如果真结束

信息框 (创建目录 (“C:\123”), 64, “温馨提示:”, _启动窗口)

' 返回创建结果,创建成功信息框为真,否则为假,64是一个感叹图标!

代码结束!

这个是网盘文件,文字看不懂的可以直接看源码:

取消

评论

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
很有用的东西,特别对于新手非常有用,网上找不到的,西面是源码,看不懂的你只有下载了! .版本 2 .支持库 EThread 清除数组 (目录数组) 清除数组 (文件数组) 按钮3.禁止 = 真 启动线程 (&线程_进度显示, , 线程句柄) .子程序 线程_进度显示 .局部变量 计次, 整数型 .局部变量 dir, 文本型 .局部变量 计次一, 整数型 .局部变量 path, 文本型 .局部变量 swit, 逻辑型 .局部变量 num, 整数型 原路径 = 取当前目录 () + “\3” 目标路径 = “c:\3” 子程序_核心搜索 (取当前目录 () + “\3”) 进度条1.位置 = 0 进度条1.最大位置 = 取数组成员数 (目录数组) .计次循环首 (取数组成员数 (目录数组), 计次) dir = 子文本替换 (目录数组 [计次], 原路径, 目标路径, , 1, 真) 创建目录 (dir) 进度条1.位置 = 进度条1.位置 + 1 .计次循环尾 () 标签3.标题 = “更新中...” 进度条1.位置 = 0 进度条1.最大位置 = 取数组成员数 (文件数组) .计次循环首 (取数组成员数 (文件数组), 计次一) path = 子文本替换 (文件数组 [计次一], 原路径, 目标路径, , 1, 真) swit = CopyFileExA (文件数组 [计次一], path, &CopyProgressRoutine;, 0, 0, #COPY_FILE_RESTARTABLE) .如果真 (swit = 假) num = num + 1 .如果真结束 进度条1.位置 = 进度条1.位置 + 1 .计次循环尾 () 标签3.标题 = “报告老大已经全部更新... 失败:” + 到文本 (num) + “个” 按钮3.禁止 = 假 .子程序 CopyProgressRoutine, 整数型 .参数 TotalFileSize, 双精度小数型 .参数 TotalBytesTransferred, 双精度小数型 .参数 StreamSize, 双精度小数型 .参数 StreamBytesTransferred, 双精度小数型 .参数 dwStreamNumber .参数 dwCallbackReason .参数 hSourceFile .参数 hDestinationFile .参数 lpData 进度条2.位置 = 取整 (TotalBytesTransferred × 10000 ÷ (TotalFileSize × 10000) × 100) 返回 (#PROGRESS_CONTINUE) .子程序 子程序_核心搜索 .参数 目标目录, 文本型 .局部变量 文件名, 文本型 文件名 = 寻找文件 (目标目录 + “\*.*”, #子目录) .判断循环首 (文件名 ≠ “”) .如果真 (文件名 ≠ “.” 且 文件名 ≠ “..”) 加入成员 (目录数组, 目标目录 + “\” + 文件名) 子程序_核心搜索 (目标目录 + “\” + 文件名) .如果真结束 文件名 = 寻找文件 (, #子目录) .判断循环尾 () 文件名 = 寻找文件 (目标目录 + “\*.*”, ) .判断循环首 (文件名 ≠ “”) 加入成员 (文件数组, 目标目录 + “\” + 文件名) 文件名 = 寻找文件 (, ) .判断循环尾 () .子程序 __启动窗口_可否被关闭, 逻辑型 .如果真 (按钮3.禁止) .如果真 (信息框 (“正在复制文件中,是否强制关闭?”, 4 + 48, ) = 6) 返回 (假) .如果真结束 强制结束线程 (线程句柄)
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值