열린 모든 캐드 파일을 저장하지 않고 종료
To quit all of open cad files without save
CAD Forum - How to quit all open drawings without saving?
If you want to quickly close (abandon, quit) all drawings opened in your AutoCAD session, without saving and without any prompts and questions, you can use the following VisualLISP macro: ;Quit all drawings without saving (CAD Studio - www.cadforum.cz) (vl
www.cadforum.cz
(vl-load-com)
(defun C:QA ( / dwg);;QuitAll
(vlax-for dwg (vla-get-Documents (vlax-get-acad-object))
(if (= (vla-get-active dwg) :vlax-false)(vla-close dwg :vlax-false))
)
(command "._close" "_y")
)
reference
(if(=(getvar "dbmod")0)
(command ".close")
(command ".close" "y")
)
I ran into this problem quite awhile back and this is how I worked around it.
(if(=(getvar "dbmod")0)
(command ".close")
(command ".close" "y")
)
If the drawing has been modified and the "dbmod" variable is not set to "0", then the prompt for the "Really want to discard all changes to drawing? " comes up. If "dbmod" is set to "0" then, the command ".close" is all that is needed.
Hope that helps you out. jcurley@rbf.com
https://forums.autodesk.com/t5/visual-lisp-autolisp-and-general/command-quot-close-quot/td-p/821339
'autocad' 카테고리의 다른 글
ACAD Open Read-only (0) | 2023.02.15 |
---|---|
Overkill > Audit > Purge (0) | 2023.02.15 |
Set the 'Windows Desktop' Unit format on all dimstyles (0) | 2023.01.05 |
Change Fonts of All Styles to "simplex.shx,whgtxt.shx" (0) | 2022.12.01 |
STAIR CALCULATOR (1) | 2022.09.30 |