易语言截屏后怎么自动创建文件夹
展开全部
.版本 2
.子程序 _保存_被单击
.参数 图片, 字节集
.局部变量 图片名称, 文本型
写到文件 (取运行目录 () + “\截图的图片\1.txt”, 到字节集 (“”)) ' 写到一个文件,如果目录存在,文件写进去;不存在,写不进去
.判断开始 (文件是否存在 (取运行目录 () + “\截图的图片\1.txt”) = 真) ' 如果文件存在
输入框 (“文件名”, “输入文件名”, , 图片名称, ) ' 输入文件名
写到文件 (取运行目录 () + “\截图的图片\” + 图片名称 + “.jpg”, 图片) ' 保存
删除文件 (取运行目录 () + “\截图的图片\1.txt”) ' 删除掉前面的文件
.默认
创建目录 (取运行目录 () + “\截图的图片”) ' 如果文件不存在,就输出目录
输入框 (“文件名”, “输入文件名”, , 图片名称, ) ' 输入文件名
写到文件 (取运行目录 () + “\截图的图片\” + 图片名称 + “.jpg”, 图片) ' 保存
————————————————————————————————————————
引用这个子程序就行了,记得引用时要在括号里填上存放你截的图的变量名称。
.子程序 _保存_被单击
.参数 图片, 字节集
.局部变量 图片名称, 文本型
写到文件 (取运行目录 () + “\截图的图片\1.txt”, 到字节集 (“”)) ' 写到一个文件,如果目录存在,文件写进去;不存在,写不进去
.判断开始 (文件是否存在 (取运行目录 () + “\截图的图片\1.txt”) = 真) ' 如果文件存在
输入框 (“文件名”, “输入文件名”, , 图片名称, ) ' 输入文件名
写到文件 (取运行目录 () + “\截图的图片\” + 图片名称 + “.jpg”, 图片) ' 保存
删除文件 (取运行目录 () + “\截图的图片\1.txt”) ' 删除掉前面的文件
.默认
创建目录 (取运行目录 () + “\截图的图片”) ' 如果文件不存在,就输出目录
输入框 (“文件名”, “输入文件名”, , 图片名称, ) ' 输入文件名
写到文件 (取运行目录 () + “\截图的图片\” + 图片名称 + “.jpg”, 图片) ' 保存
————————————————————————————————————————
引用这个子程序就行了,记得引用时要在括号里填上存放你截的图的变量名称。
追问
怎么没说写到什么地方呢?
是C盘还是啥?
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询