[讨论]用lisp关闭文件，求改进

xiaoquansb

(defun c:Q()
(command "zoom" "e" )
(command "quit" )
)

目的很简单，在退出前缩放到满屏，但是(command "quit" )为什么会跟直接在命令行输入quit不同，要在命令行里选择是否保存，而不会弹出对话框，点击按钮来操作，求大家帮忙改一改，谢谢！

citykunan

(defun c:Q()
(command "zoom" "e" )

(command "_qsave")
(command "quit" )
)

xiaoquansb

的确有弹出对话框，不过刚才那个文件已经关掉了，对话框是关闭其他文件时弹出来的，而且还是关闭所有文件，可不是全部文件都要关闭掉，我只想关当前的文件而已，还有没有别的方法啊~