Autolisp - 隐藏“以只读方式打开”对话框

Question

我试图同时打开多个图形，在这些图形上运行代码（如果只读则跳过），然后关闭文件。我遇到的问题是，如果我打开一个写保护的文件，则会出现以下对话框并停止代码。是否有一个函数或命令可以在不出现此对话框的情况下打开文件？启用/禁用功能？

我使用的 CAD 应用程序是 DraftSight。

Answer 1

有一个棘手的方法。 （感谢@LeeMac）

(setq ans(vl-catch-all-apply 'vl-file-rename (list path path )))

如果返回

nil

，则表示文件已锁定。