在通用对话框点击取消，数据源也能读入数据？

精易1

宇智波·晓易 发表于 2014-6-25 22:51
利用一下 通用对话框1.打开 ()  的返回值就好。

不要这样那样，存到文件之后从文件读，在通用对话框点“点消”就读入了

精易1

精易1 发表于 2014-6-25 22:56
不要这样那样，存到文件之后从文件读，在通用对话框点“点消”就读入了

在通用对话框点击“取消”就读入了

精易1

宇智波·晓易 发表于 2014-6-25 23:07
直接要结果是吧。
把你所有 通用对话框1.打开 () 这行代码换为下面两行。

加上这两行代码，可以避免在通用对话框点击“取消”也能读入数据的情况；

不加上这两行代码点击“取消”也能读入数据，易语言本来就是这样的？

luoke

不清楚，同求

凌木

你代码位置写错了
局_逻辑 ＝ 数据源.存到文件 (通用对话框1.文件名)
这一句写到如果里边就对了

精易1

凌木 发表于 2014-7-8 13:19
你代码位置写错了
局_逻辑 ＝ 数据源.存到文件 (通用对话框1.文件名)
这一句写到如果里边就对了

感谢回答，您的回答貌似解决不了问题

秋风萧瑟

  

窗口程序集名	保 留	保 留	备 注
窗口程序集1

子程序名	返回值类型	公开	备 注
_按钮_存到文件_被单击

变量名	类 型	静态	数组	备 注
局_逻辑	逻辑型

通用对话框1.过滤器 ＝ “所有文件 *.*|*.*”
通用对话框1.类型 ＝ 1
如果真 (通用对话框1.打开 ()) ' 打开通用对话框要判断的
局_逻辑 ＝ 数据源.存到文件 (通用对话框1.文件名)
如果 (局_逻辑 ＝ 真)
信息框 (“保存文件成功。” ＋ #换行符 ＋ “文件名：” ＋ 通用对话框1.文件名, 0, )
数据源.清除 (1, 1, 数据源.取行数 (), 数据源.取列数 ())
信息框 (“保存文件失败。”, #错误图标, )

子程序名	返回值类型	公开	备 注
_按钮_从文件读_被单击

变量名	类 型	静态	数组	备 注
局_逻辑	逻辑型

通用对话框1.过滤器 ＝ “所有文件 *.*|*.*”
通用对话框1.类型 ＝ 0
如果真 (通用对话框1.打开 ())
局_逻辑 ＝ 数据源.从文件读 (通用对话框1.文件名)
如果 (局_逻辑 ＝ 真)
信息框 (“从文件读取成功。”, 0, )
信息框 (“读取文件失败。”, #错误图标, )

.版本 2<br /> <br /> .程序集 窗口程序集1<br /> <br /> .子程序 _按钮_存到文件_被单击<br /> .局部变量 局_逻辑, 逻辑型<br /> <br /> 通用对话框1.过滤器 ＝ “所有文件 *.*|*.*”<br /> 通用对话框1.类型 ＝ 1<br /> .如果真 (通用对话框1.打开 ()) ' 打开通用对话框要判断的<br /> 局_逻辑 ＝ 数据源.存到文件 (通用对话框1.文件名)<br /> .如果 (局_逻辑 ＝ 真)<br /> 信息框 (“保存文件成功。” ＋ #换行符 ＋ “文件名：” ＋ 通用对话框1.文件名, 0, )<br /> 数据源.清除 (1, 1, 数据源.取行数 (), 数据源.取列数 ())<br /> .否则<br /> 信息框 (“保存文件失败。”, #错误图标, )<br /> .如果结束<br /> <br /> .如果真结束<br /> <br /> <br /> .子程序 _按钮_从文件读_被单击<br /> .局部变量 局_逻辑, 逻辑型<br /> <br /> 通用对话框1.过滤器 ＝ “所有文件 *.*|*.*”<br /> 通用对话框1.类型 ＝ 0<br /> .如果真 (通用对话框1.打开 ())<br /> 局_逻辑 ＝ 数据源.从文件读 (通用对话框1.文件名)<br /> .如果 (局_逻辑 ＝ 真)<br /> 信息框 (“从文件读取成功。”, 0, )<br /> .否则<br /> 信息框 (“读取文件失败。”, #错误图标, )<br /> .如果结束<br /> <br /> .如果真结束

帮你修改了一下，自己直接复制代码吧！

剩下我de孩子气

加个如果 判断    取消直接返回()

清风渐微

是这样吗

如果真 (通用对话框1.打开 ())

1.zip (1.4 KB, 下载次数: 1)

2014-7-19 23:12 上传

点击文件名下载附件

潇逸仙

判断通用对话框.文件名啊