社区 › AutoLISP/Visual LISP 编程技术 › [求助]点选一个图块，删除文件中所有同名的图块

jdhszh 发表于 2007-10-6 21:41:00

是你错了,可能你粘贴的时候少了括号或多了一个空行

dforme 发表于 2011-12-30 16:13:09

不错，很实用，但是如果能加上选区就好了

Andyhon 发表于 2011-12-30 16:22:24

选区...

(SETQ NNM (ASSOC 2 ENT)
         SS (SSGET "X" (LIST '(0 . "INSERT") NNM)))
==>
(SETQ NNM (ASSOC 2 ENT)
         SS (SSGET (LIST '(0 . "INSERT") NNM)))

lixuedong 发表于 2011-12-30 17:27:04

最好，先显示一下，确定后在删除.

lenlenq 发表于 2012-1-2 21:01:27

jdhszh 发表于 2007-10-6 10:25 static/image/common/back.gif
purge好像不必(ENTDEL
        (SSNAME SS (SETQ I (1+ I)))这一句已经够了,entdel 函数既可以删除图形对象，又可 ...

虽然块的图形是删除了，但文档中还是存在着此图块。用PURGE可以彻底的删除此图块，来达到给文件减肥的目的

dforme 发表于 2012-1-3 14:24:28

本帖最后由 dforme 于 2012-1-3 14:26 编辑

感谢ZZXXQQ ， 感谢Andyhon ，感谢这么多热心的朋友，帮我解决了一个大问题

cairao32 发表于 2013-6-20 17:21:41

现在正在找这个程序，终于被我发现了。

lvkl119 发表于 2013-10-3 13:09:11

比较好用，谢谢回复

英明神武的大叔 发表于 2015-8-18 11:18:36

厉害啊!高手好多！

英明神武的大叔 发表于 2015-8-18 11:30:07

这个问题相当不错~我也会遇到这样的问题

查看完整版本: [求助]点选一个图块，删除文件中所有同名的图块