关于INSERT插入块的问题

XTdwynij

1205这样时代 发表于 2019-11-14 13:24
(defun c:sz()
(vl-load-com)
(setq old (getvar "cmdecho")

多谢大佬解答。由于12的文件名太多了，我都找不到在哪里。感谢。

XTdwynij

start4444 发表于 2019-11-13 23:57
把块名改一下就行了，怎么搞那么复杂的代码。

把12.dwg 放d盘根目录：

给力。代码简洁。但插入时比例会变，并且也看不到全图。我自己加上去了。谢谢你。

XTdwynij

start4444 发表于 2019-11-13 23:57
把块名改一下就行了，怎么搞那么复杂的代码。

把12.dwg 放d盘根目录：

开发一个进阶版的功能需要多少钱呢？浏览器文件夹的dwg图纸(面板可视化)，双击插入图纸。

start4444

XTdwynij 发表于 2019-11-14 18:40
开发一个进阶版的功能需要多少钱呢？浏览器文件夹的dwg图纸(面板可视化)，双击插入图纸。

不懂，我也不是专业编程的，只学了点皮毛写几句码辅助一下作图而已。

1205这样时代

XTdwynij 发表于 2019-11-14 17:36
多谢大佬解答。由于12的文件名太多了，我都找不到在哪里。感谢。

PATH = "D:\\Program Files\\Autodesk\\AutoCAD 2014\\Support"
你提取的不是这个文件夹吗

随便放一个文件夹，加入可搜索路径，直接输入块名，直接插入块。块名前加*号，自动分解块。可视化，用CAD自带插入块命令就好了把。自带对话框，可以浏览文件

XTdwynij

start4444 发表于 2019-11-13 23:57
把块名改一下就行了，怎么搞那么复杂的代码。

把12.dwg 放d盘根目录：

还有个问题，插入的时候把图层乱七八糟的东西也带进来了。有木有办法解决？

XTdwynij

1205这样时代 发表于 2019-11-15 08:58
PATH = "D:\\Program Files\\Autodesk\\AutoCAD 2014\\Support"
你提取的不是这个文件夹吗

谢谢你了。👏

yuyehuan

1205这样时代 发表于 2019-11-14 13:24
(defun c:sz()
(vl-load-com)
(setq old (getvar "cmdecho")

不错不错不错