[讨论]帮看看为什么空白CAD文件都那么大。

qqask

能解释一下(cdr (nth 36 xdicts))这些句子是什么意思吗？看不懂，嗬嗬。

(entdel (cdr (nth 36 xdicts)))
(entdel (cdr (nth 34 xdicts)))
(entdel (cdr (nth 32 xdicts)))
(entdel (cdr (nth 30 xdicts)))

dunkel

这些是 ACAD 的内置的开放环境 lsp 的遇见, 目的就是将这个文件词典库中的 KS_ 打头的那几个词典组删除了.
(setq xdicts (entget (namedobjdict)))  ; 获取词典库列表到 xdicts 变量
(entdel (cdr (nth 36 xdicts)))  ; 删除词典库中的第 36 项指示的词典组, 序号由  0 开始
(entdel (cdr (nth 34 xdicts)))  ;    在词典库列表中, 每个词典项由名称和实体名两个单元组成
(entdel (cdr (nth 32 xdicts)))  ;    看第一语句执行后的屏幕显示, 倒数着的前面几个就是它们了
(entdel (cdr (nth 30 xdicts)))  ;

至于在上面提及的删除些 CLASS 的定义, 这个我还没发现有简单的方法, 除非是在 dxf 中进行清理, 不过还是很麻烦, 而且也可能会出错. 其实, 只有在 ACAD 中通过命令 ProxyNotice 置 0 就可以不再提示代理图形了.

觅食的鱼

这两个命令要怎么用啊？不会用啊，求助。

ylsjq

看看再说撒百度