2000字范文,分享全网优秀范文,学习好帮手!
2000字范文 > 易语言取c盘文件夹中的文件被占用 易语言教程移动文件复制文件删除文件

易语言取c盘文件夹中的文件被占用 易语言教程移动文件复制文件删除文件

时间:2022-12-23 14:04:02

相关推荐

易语言取c盘文件夹中的文件被占用 易语言教程移动文件复制文件删除文件

课程示范了移动文件()、复制文件()、删除文件()命令的使用注意事项,并采用拖放对象写了一个小程序,本节课针对的对象只是文件,

系统核心支持库-复制移动删除文件

新命令

1、复制文件()

2、移动文件()

3、删除文件()

用到的命令(复习)

1、取文本右边()

2、取文本长度()

3、倒找文本()

4、浏览文件夹()

5、取运行目录 ()

新组建

拖放对象

视频教程源码:

.版本 2

.支持库 edroptarget

.支持库 shell

.程序集 窗口程序集_启动窗口

.子程序 __启动窗口_创建完毕

拖放对象1.注册拖放控件 (编辑框_源文件路径.取窗口句柄 ())

.子程序 _拖放对象1_得到文件

.参数 接收到的文件路径, 文本型

编辑框_源文件路径.内容 = 接收到的文件路径

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

编辑框_新文件路径.内容 = 浏览文件夹 (“保存路径”, )

.子程序 _按钮2_被单击, , , 移动文件

.局部变量 文件名, 文本型

.局部变量 str, 逻辑型

' C:\Users\zcp\Desktop\易语言教程-39\测试.txt

文件名 = 取文本右边 (编辑框_源文件路径.内容, 取文本长度 (编辑框_源文件路径.内容) - 倒找文本 (编辑框_源文件路径.内容, “\”, , 假))

str = 移动文件 (编辑框_源文件路径.内容, 编辑框_新文件路径.内容 + “\” + 文件名)

.如果 (str = 真)

标签3.标题 = “移动成功!”

.否则

标签3.标题 = “移动失败!”

.如果结束

.子程序 _按钮3_被单击, , , 复制文件

.局部变量 str, 逻辑型

.局部变量 文件名, 文本型

' 复制文件 (, )

文件名 = 取文本右边 (编辑框_源文件路径.内容, 取文本长度 (编辑框_源文件路径.内容) - 倒找文本 (编辑框_源文件路径.内容, “\”, , 假))

str = 复制文件 (编辑框_源文件路径.内容, 编辑框_新文件路径.内容 + “\” + 文件名)

.如果 (str = 真)

标签3.标题 = “复制成功!”

.否则

标签3.标题 = “复制失败!”

.如果结束

.子程序 _按钮4_被单击, , , 删除文件

.局部变量 str, 逻辑型

str = 删除文件 (编辑框_源文件路径.内容)

.如果 (str = 真)

标签3.标题 = “删除成功!”

.否则

标签3.标题 = “删除失败!”

.如果结束

本内容不代表本网观点和政治立场,如有侵犯你的权益请联系我们处理。
网友评论
网友评论仅供其表达个人看法,并不表明网站立场。