李青松 发表于 2023-10-30 14:23:36

关闭，退出，不出现附图中的对话框

本帖最后由 李青松 于 2023-10-30 14:24 编辑

关闭，不保存，退出，不出现附图中的对话框。用在cad2005中。编个程序

嘒彼小星 发表于 2023-10-30 14:51:51

本帖最后由 嘒彼小星 于 2023-10-30 15:01 编辑

(command "_CLOSE" "y")

李青松 发表于 2023-11-2 13:53:41

嘒彼小星 发表于 2023-10-30 14:51
(command "_CLOSE" "y")
这种方式，cad2005上用不了，cad2010上能用，我试过了
需要换一种方式

chixun99 发表于 2023-12-26 18:35:20

lisp的不会弄，不过在vba里有个方法:用close关闭文件不保存，并用quit方法退出cad。
VBA:
object.Close [, FileName]
object是需要关闭的文件docment对象，savechanges=false时不保存，直接关闭文件。
VBA:
object.Quit
object是application对象，就是cad应用程序自己，可以写acadapplication。运行这个方法，将退出cad并关闭vba程序本身。

d1742647821 发表于 2023-12-27 10:30:53

本帖最后由 d1742647821 于 2023-12-27 10:44 编辑

powerer by IFoxCAD

https://gitee.com/inspirefunction/ifoxcad

attach://131691.flv


public static void Test()
{
    IdleAction.Add(() => Env.Document.CloseAndDiscard());
}


OooCcc 发表于 2024-3-26 14:52:40

lisp代码不能关闭当前活动文档，但是可以用以下代码实现关闭指定文件。或者遍历关闭所有打开的文档

(setq docs(vla-get-documents(vlax-get-acad-object)))
(vla-close (vla-item docs "Drawing1.dwg") vlax:false)

页: [1]
查看完整版本: 关闭，退出，不出现附图中的对话框