自动保存关闭窗口所有图纸

努.力

Gu_xl 2013-9-10 http://bbs.mjtd.com/thread-107528-1-1.html


闭其他窗口 https://forums.autodesk.com/t5/v ... no-save/m-p/2662606

qazxswk

我来个相反的功能
(defun c:11(/ docs cdoc)  ;;不保存并关闭所有文档窗口
(setq docs (vla-get-documents (vlax-get-acad-object)))
(setq cdoc (vla-get-ActiveDocument (vlax-get-acad-object)))
(vlax-for doc docs(if (not (equal cdoc doc))(vla-close doc :vlax-false)))
(if (=(getvar "blockeditor") 1)
(progn(vl-cmdf "bclose" "D")
       (vl-cmdf "quit" "y"))
       (vl-cmdf "quit" "y"))
(princ))

tranque

之前用过的一个工具箱可以实现这个功能。。。。。
但是我没这方面的需求

tigcat

挺好的,支持楼主.

lxx2003

看看是什么东西

aws

qazxswk 发表于 2024-7-6 22:49
我来个相反的功能
(defun c:11(/ docs cdoc)  ;;不保存并关闭所有文档窗口
(setq docs (vla-get-document ...

关闭全部窗口其实可以直接右上角关掉cad就行了，有没有办法实现，只保留当前文档，而关闭其他窗口呢？

Bao_lai

aws 发表于 2024-7-7 09:25
关闭全部窗口其实可以直接右上角关掉cad就行了，有没有办法实现，只保留当前文档，而关闭其他窗口呢？

获得所有文档名称，不是当前的，关闭。

aws

Bao_lai 发表于 2024-7-7 09:54
获得所有文档名称，不是当前的，关闭。

对于文件处理这块，我不太熟悉，能不能稍微提点一下，用哪些函数呢

Bao_lai

aws 发表于 2024-7-7 10:33
对于文件处理这块，我不太熟悉，能不能稍微提点一下，用哪些函数呢

看5楼，基本上都有。

qazxswk

aws 发表于 2024-7-7 09:25
关闭全部窗口其实可以直接右上角关掉cad就行了，有没有办法实现，只保留当前文档，而关闭其他窗口呢？

右上角关闭，会弹出保存文件的提示。