[求助]：无法删除的层

fylinwater · 发表于 2002-7-2 19:33:52

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

附件里的层XH无法删除除非删除图形
已经找到原因 TABLE中定义块的图元被定义在层XH里
但是用ENTMOD 修改不了
测试如下：

(setq tb (tblnext "block" t )) =>((0 . "BLOCK") (2 . "7$4$2") (70 . 0) (10 0.0 0.0 0.0) (-2 . <Entity name:
25a0520>))

(setq mainbname (cdr (assoc 2 tb))) =>"7$4$2"

  (setq mainbnlst (entget (TBLOBJNAME "BLOCK" mainbname ))) =>((-1 . <Entity name: 25a0538>) (0 . "BLOCK") (5 . "ACDF") (100 . "AcDbEntity")
(67 . 0) (8 . "XH") (62 . 4) (6 . "CONTINUOUS") (100 . "AcDbBlockBegin") (70 .
0) (10 0.0 0.0 0.0) (-2 . <Entity name: 25a0520>) (2 . "7$4$2") (3 . ""))

(if (setq lay (assoc 8 mainbnlst))
      (setq mainbnlst  (entmod (subst (cons 8 "0") lay mainbnlst)))
)
=> nil
?????为什么就失败了呢？

fylinwater · 发表于 2002-7-2 19:37:40

忘了上图形文件了

fylinwater · 发表于 2002-7-5 20:38:00

哪位朋友可以解决这个问题?

aeo · 发表于 2002-7-5 22:57:47

我觉的"block"是不记录层的
应该改块里的实体<25a0520>起的实体的层到0层
改完后试试

fylinwater · 发表于 2002-7-8 18:18:46

不对阿要是<25a0520>改到0层我将块炸开后实体不就在0层了，这与初衷有背

账号		自动登录	找回密码
密码			立即注册

[求助] [求助]：无法删除的层

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子