[求助]：求助:一个错误处理的问题

tc405003 · 发表于 2006-1-4 02:12:24

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

(defun tc_dwj ()
  (setq dat_file (getfiled "读取设置" "" "ini" 2))
  (setq ff (open dat_file "r"))
  (setq ta1  (read-line ff)
ta2  (read-line ff)
ta3  (read-line ff)
ta4  (read-line ff)
ta5  (read-line ff)
ta6  (read-line ff)
ta7  (read-line ff)
ta8  (read-line ff)
ta9  (read-line ff)
ta10 (read-line ff)
ta11 (read-line ff)
  )

此种读取文件的LISP在对话框嵌TAO中如果按取消可否回到前一对话框，如何处理

似水无痕 · 发表于 2006-1-4 11:48:10

是这样的么？

(setq dat_file1 (getfiled "读取设置" "" "ini" 2))
(if (null (setq dat_file2 (getfiled "读取设置" "" "ini" 2)))
(setq dat_file1 (getfiled "读取设置" "" "ini" 2))
)

tc405003 · 发表于 2006-1-4 12:51:09

如果我想回到上一级的菜单如何写啊

账号		自动登录	找回密码
密码			立即注册

[求助] [求助]：求助:一个错误处理的问题

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子