没有营养的贴砖越来越多了,(在当前CAD打开CAD文件)
;5.打开文件(defun QYD:opendwg (fn / name File_new);;;fn带路径的文件名。
(setq name (vl-filename-mktemp "open" nil ".scr"))
(setq File_new (open name "w"))
(write-line(strcat "open" (chr 32) fn ) File_new)
(close File_new)
(command"script" name)
)
最近搞了一个在当前CAD窗口打开dwg文件。只是不能删除生成的临时文件很苦恼。
还有最近发现没营养的贴太多,甚至有的人玩起来双簧,这个发帖下面有人留言让你看更不相干的贴。珍惜希望大家保持平台互帮互助,高效的风格。
谢谢大佬分享 感谢楼主分享 http://bbs.mjtd.com/thread-29775-2-1.html
感谢楼主分享 Andyhon 发表于 2023-11-17 22:18
http://bbs.mjtd.com/thread-29775-2-1.html
大佬,之前也跟您学习过用这个。也很好用,但是这个是在最新打开的CAD中打开dwg。我这个是在当前CAD窗口打开dwg文件
页:
[1]