TENGOMARK 发表于 2014-7-23 23:52:26

为何执行了以下程序后，返回空报警

(setq        fname (getfiled        "Pls input file name"
                        ""
                        "pot"
                        8
              )
)
(setq fim (open fname "r"))
(setq strname (read-line fim))
(close fim)

该段程序走到(setq strname (read-line fim))
时候返回文件空的报警，不再执行下去，不知道为何？文件用附件的文件。我的版本是2011与2012

ZZXXQQ 发表于 2014-7-24 08:06:36

这句(setq fname (getfiled "Pls input file name" "" "pot" 8))
改成(setq fname (getfiled "Pls input file name" "" "pot" 2))
试下。

TENGOMARK 发表于 2014-7-24 22:11:43

该问题果然能够以此来解决，非常感谢版主，这样读文件算是稳定了。后面需要攻破"-image"命令了。
再次谢谢，群里果然高人很多。

虔诚的小学生
页: [1]
查看完整版本: 为何执行了以下程序后，返回空报警