adc 发表于 2014-7-17 12:05:08

请教怎样判断某个dwg文件是否已经打开?

请教怎样判断某个dwg文件(如1.dwg)是否已经打开?

nzl1116 发表于 2014-7-17 13:22:49

遍历文档集合

xhq1954425 发表于 2014-7-17 16:17:28

(if (= (VL-FILE-SYSTIME "D:/文件夹A/文件A.dwg") nil) (alert "文件正在使用 ") (alert "该文件没被打开 "))

tranney 发表于 2014-7-19 10:53:44

借了上面代码修改了我一个程序,呵呵谢谢
;打开水图例图纸
(defun c:stl ()
(setq acadApp (vlax-get-acad-object)
   acadDocs (vla-get-documents acadApp))
   (if (= (VL-FILE-SYSTIME "d:/AUTool/bak/水图例.dwg") nil) (alert "文件正在使用 ") (vla-open acadDocs "d:/AUTool/bak/水图例.dwg"))
(princ))
页: [1]
查看完整版本: 请教怎样判断某个dwg文件是否已经打开?