Question

易语言的问题，我想用“设置保存路径”设置文件的保存路径，在“选择保存格式”处设置文件保存的格式

点击保存后可以直接保存为所选格式，并且保存到之前设置的路径中，点击清空，可以把大编辑框中的文字清空。求大神，求源码

Answer 1

先看下代码截图，代码在图下面：

 

 

代码：

-----------------------------------------------------------------------------------------

.版本 2
.支持库 jedi
.支持库 spec

.程序集 窗口程序集1
.程序集变量 文件号, 整数型

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

' 编辑框2是输入文件名用的，自己在桌面添加
组合框1.加入项目 (“.txt”, )
组合框1.加入项目 (“.html”, )
' 这里还可以添加文件类型，自己加吧
组合框1.现行选中项 ＝ 0
目录编辑框1.直接输入 ＝ 假
目录编辑框1.内容 ＝ 读配置项 (取运行目录 () ＋ “\配置文件.ini”, “保存”, “目录”, )

.子程序 _按钮1_被单击, , , 目录

目录编辑框1.按下 ()

.子程序 _按钮2_被单击, , , 保存

.如果真 (目录编辑框1.内容 ＝ “”)
    信息框 (“请设置保存路径！”, 0, )
    返回 ()
.如果真结束
文件号 ＝ 打开文件 (目录编辑框1.内容 ＋ “\” ＋ 编辑框2.内容 ＋ 组合框1.取项目文本 (组合框1.现行选中项), 5, )
.如果真 (文件号 ＞ 0)
    调试输出 (目录编辑框1.内容 ＋ “\” ＋ 编辑框2.内容 ＋ 组合框1.取项目文本 (组合框1.现行选中项))
    移到文件尾 (文件号)
    写出文本 (文件号, 编辑框1.内容)
    信息框 (“数据保存成功！”, 0, )
.如果真结束
关闭文件 (文件号)

.子程序 _按钮3_被单击, , , 空

编辑框1.内容 ＝ “”

.子程序 _目录编辑框1_内容被改变

写配置项 (取运行目录 () ＋ “\配置文件.ini”, “保存”, “目录”, 目录编辑框1.内容)

Answer 2

用通用对话框就好了。

追问

用了，每次保存还要重新指定路径和文件名，很麻烦